如何解决执行时返回“找不到文件”的SQL语句
在我的代码中,我试图使用输入框将用户输入的值保存为字符串,然后使用sql来更新基于该字段的字段。
我的代码是:
Dim strinput
Dim strsql
Call CreateRevisions
strinput = InputBox(prompt:="Name of revision")
If Not IsNull(strinput) Then
'DoCmd.SetWarnings False
strsql = " UPDATE tblJobDetails.RevisionName"
strsql = strsql & " SET tblJobDetails.RevisionName = '" & strinput & "'"
strsql = strsql & " WHERE (((tblJobDetails.JobID)=[Forms]![JobQuote]![JobID]));"
'DoCmd.Runsql strsql
CurrentDb.Execute strsql
'docmd.setwarnings true
End If
End Sub
运行时,我得到提示,即将更新字段,然后出现输入框并允许我输入内容。我检查了strinput
的值,并正确地保存了该值,但是当我尝试实际执行sql语句时,可能会遇到一个我从未遇到过的有趣错误。
错误是:
Run-time error '3024':
Could not find file 'C\....
我之前已经运行了各种类似的语句,没有问题。但是,这是我第一次尝试使用输入框。是什么导致该错误?
我尝试将其更改为docmd
并添加了debug.print
,但是仍然会导致相同的错误。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。