访问报告提示打印作业的每个页面上的参数

时间:2013-11-14 21:34:20

标签: ms-access

我是Access的新手。我刚刚在Access 2010中创建了我的第一个数据库w / a报告。该报告需要运行一个参数。如果我运行报告,然后尝试打印,它会提示报告的每个页面的参数。这对我来说是一个交易破坏者。有什么我可以做的来“修复”这个。我可能会期待它一次,但不是每一页!

1 个答案:

答案 0 :(得分:0)

如果您不介意使用VBA,可以使用InputBox从Report的Open事件中获取用户的值。然后使用该值创建SQL语句并将其设置为Report的RecordSource。你的代码应该是这样的。请注意,我没有在MS Access中编写代码或测试它。

Private Sub Report_Open(Cancel as Integer)
    Dim sSQL As String, sInput as String
    sSQL = "SELECT * FROM Contacts "
    sInput = InputBox("Enter a Name", "Enter a Name")
    If sInput <> "" Then
        sSQL = sSQL & " WHERE FirstName = '" & Replace(sInput, "'", "''") & "'"
    End If
    Me.RecordSource = sSQL
End Sub