2016-08-02 54 views
-1

我掙扎着爬這段代碼在MS Access工作:試圖輸入記錄到一個表使用按鈕和文本框

Private Sub BtnIssue_Click() 

Dim db As Database 
Dim rec As Recordset 

Set db = CurrentDb 
Set rec = db.OpenRecordset("Select * from Current_Rentals") 

rec.AddNew 
rec("Game") = Me.Text85 
rec("Game_Copy") = Me.Text77 
rec("Member") = Me.Combo111 
rec("Issue_Date") = Me.Text154 
rec.Update 

Set rec = Nothing 
Set db = Nothing 

End Sub 

的問題是,訪問抱怨編譯錯誤, 「用戶定義類型未定義」

+1

錯誤說的是什麼? –

+0

剛剛試過你的代碼,它工作得很好。什麼是錯誤以及突出顯示哪一行? –

+1

如果我是老師,我會降低評分,降低評分,控制名稱的工作,如「Text85」或「Combo111」。有意義的名字好多了。 – Andre

回答

1
Dim rec as dao.recordset 
Set rec = db.openrecordset("current_rentals",dbopendynaset) 
+0

我試過這個,但它出現了相同的錯誤編譯錯誤用戶-defined type not defined – user6667916

+1

如果它的舊訪問權限可能需要引用dao庫? –

+0

沒有它的MS訪問2016 – user6667916

相關問題