0

我在主表单中有一个子表单，上面有员工记录。我试图允许用户从子表单中选择一条记录并将其添加到表中，这是我的代码，对我来说，它看起来是正确的。但是它给了我一个错误，说“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
4

1 回答 1

1

您的查询中有一个额外的“）”

插入 tbl_CapexStaff（名字、姓氏、雇员 ID、CAP_ID））

于 2013-06-18T11:07:54.550 回答