我在Access中创建了一个表单,在这个表单中有一个按钮,允许用户将记录插入表中(" Tbl")
此表的格式为: Report1_Field1 Report1_Field2 Report2_Field1 Report2_Field2(依此类推)
表格会要求用户: - 选择报告名称(" ReportName");这可能是" Report1"或" Report2" - 输入Field1和Field2的值
按钮后面的VBA代码如下:
Private Sub ButtonUpdate
Dim NameReport as String
Dim FirstField as String
Dim SecondField as String
NameReport = ReportName
FirstField = ReportName & "_Field1"
SecondField = ReportName & "_Field2"
DoCmd.RunSQL "INSERT INTO tbl (FirstField, SecondField) VALUES (Field1, Field2)"
End Sub
然而,我收到运行时错误3127:INSERT INTO语句包含以下未知字段名称:' FirstField'。确保您已正确输入名称,然后再次尝试操作。
思想?
答案 0 :(得分:1)
SQL字符串正在读取" FirstField"和#34; SecondField"作为文字文本而不是使用您的变量。试试这个:
DoCmd.RunSQL "INSERT INTO tbl (" & FirstField & ", " & SecondField & ") VALUES (Field1, Field2)"