未知的問題與插入聲明

我有一個子窗體上的工作人員記錄在它的主窗體。我試圖讓用戶從子窗體中選擇一條記錄並將其添加到表中，這裏是我的代碼，對我來說，看起來是正確的。但是它給了我一個錯誤說「語法錯誤在INSERT INTO」未知的問題與插入聲明

Private Sub Command3_Click() 
Dim dbs As Database 
Dim sqlstr As String 
Set dbs = CurrentDb 
Forename = Nz(Forms!frm_Capex_Submission!frm_staffSub.Form.shy_forename, "") 
Surname = Nz(Forms!frm_Capex_Submission!frm_staffSub.Form.shy_surname, "") 
emp_no = Nz(Forms!frm_Capex_Submission!frm_staffSub.Form.shy_empno, "") 
CAP_ID = Forms!frm_Capex_Submission!CAP_ID 

sqlstr = "INSERT INTO tbl_CapexStaff (Forename, Surname, EmployeeID, CAP_ID))" _ 
& " SELECT '" & Nz(Me!shy_forename, "") & "' AS Expr1, '" & Nz(Me!shy_surname, "") & "' AS Expr2, '" & Nz(Me!shy_empno, "") & " AS Expr3, " & Forms!frm_Capex_Submission.CAP_ID & " as expr4, """ 
dbs.Execute (sqlstr) 
tbl_CapexStaff.Requery 
End Sub

來源

2013-06-18 Owen Brain

有一個額外的「）」在查詢

INSERT INTO tbl_CapexStaff（用的名字，姓氏，僱員，CAP_ID ））

來源

2013-06-18 11:07:54 mohkhan

那是什麼？ – mohkhan

哦，我什至沒有注意到！非常感謝但現在我有另一個錯誤; 運行時錯誤3075 查詢表達式中的字符串中的語法錯誤（表達式3和4）所以我認爲最後2個表達式存在問題任何想法？乾杯 –

你忘了在AS之前添加一個單引號（Me！shy_empno，「」）＆「'Ex Expr3' – mohkhan

未知的問題與插入聲明

回答

相關問題