访问VBA SQL未执行

时间:2015-09-29 07:12:57

标签: vba ms-access access-vba

我有一个包含多个网站的报告,其中数据库中的每一行都是一个页面 我已经设置了一个宏来打印打印视图中的报告,并添加了一个功能
在开始上述报告。我们的想法是在打印整个报告时更新每行的值 我的方法:

Private Sub Dummy_Print(Cancel As Integer, PrintCount As Integer)
    Dim SQL As String

    SQL = "UPDATE dummy" & _
          "SET dummy.printed = TRUE, dummy.printed_at = Now()" & _
          "WHERE dummy.printed = FALSE AND dummy.id = " & Me.dummy_id

    DoCmd.RunSQL SQL   
End Sub

但是这段代码永远不会执行 我是否引用了每个dummy_id错误或语法错误?

1 个答案:

答案 0 :(得分:2)

你应该在SET和WHERE前面放置空格。