我在使用vba创建的SQL中有错误吗?

Tam*_* N. 0 sql ms-access vba

我不明白为什么这个查询不起作用.我用a msgbox来显示我的strSQL,但它对我来说看起来很完美.

Dim strSQL As String
strSQL = "INSERT INTO Jobs (Date, RefNo, ProjectID, PManager, PDesc, PONo, Src_Qty, WC_Qty, Rate, Total, Note, Company) "
strSQL = strSQL & "VALUES (" & JobDate.Value & ", '" _
                            & Text41.Value & "', '" _
                            & ProjectID.Value & "', '" _
                            & PManager.Value & "', '" _
                            & PDesc.Value & "', " _
                            & Text43.Value & ", " _
                            & Src_Qty.Value & ", " _
                            & WC_Qty.Value & ", " _
                            & newRate.Value & ", " _
                            & ProjTotal.Value & ", '" _
                            & Text38.Value & "', '" _
                            & newCompany.Value _
                            & "');"
MsgBox (strSQL)
DoCmd.RunSQL strSQL
Run Code Online (Sandbox Code Playgroud)

Kev*_*che 7

如果我没记错的话,你需要用英镑包装你的约会日期.

"VALUES (#" & JobDate.Value & "#, '" _
Run Code Online (Sandbox Code Playgroud)

而且我认为最后你不需要分号....

  • +1是最有可能的解决方案,没有任何错误消息或更清晰的OP (2认同)