[英]Unknown issue with insert statment
I have a sub form with staff records on it within a main form. 我有一个子窗体,在主窗体中有员工记录。 I am trying to allow the user to select a record from the sub form and add it to a table, here is my code which, to me, looks correct.
我试图允许用户从子表单中选择一条记录并将其添加到表中,这是我的代码,对我来说,它看起来是正确的。 However it gives me an error saying "Syntax error in INSERT INTO"
但是它给我一个错误,提示“ 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
There is an extra ")" in your query 您的查询中有一个额外的“)”
INSERT INTO tbl_CapexStaff ( Forename, Surname, EmployeeID, CAP_ID) )
插入tbl_CapexStaff(姓氏,姓氏,EmployeeID,CAP_ID)
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.