One Report two parameters

[Guest]

I have a report that I want to pass to parameters on.
SELECT Responses.[Name of Business], Responses.[Main Category], *
FROM Responses
WHERE (((Responses.[Name of Business])=[Forms]![Main Reports].[BN]) AND
((Responses.[Main Category]) Like [Forms]![Main Reports].[cat] & "*"))
WITH OWNERACCESS OPTION;

When I open the report from the database window it works (I have to put in
the info)
But when I try to open the report from the form Main Reports it is blank?
The button that I created to open is:
Private Sub Command16_Click()
On Error GoTo Err_Command16_Click

Dim stDocName As String

stDocName = "Responses1"
DoCmd.OpenReport stDocName, acPreview

Exit_Command16_Click:
Exit Sub

Err_Command16_Click:
MsgBox Err.Description
Resume Exit_Command16_Click

End Sub

What am I doing wrong?
I have a similiar report that works - the only diffrence is the report only
has one parameter.

 

[Marshall Barton]

I have a report that I want to pass to parameters on.
SELECT Responses.[Name of Business], Responses.[Main Category], *
FROM Responses
WHERE (((Responses.[Name of Business])=[Forms]![Main Reports].[BN]) AND
((Responses.[Main Category]) Like [Forms]![Main Reports].[cat] & "*"))
WITH OWNERACCESS OPTION;

When I open the report from the database window it works (I have to put in
the info)
But when I try to open the report from the form Main Reports it is blank?
The button that I created to open is:
Private Sub Command16_Click()
On Error GoTo Err_Command16_Click

Dim stDocName As String

stDocName = "Responses1"
DoCmd.OpenReport stDocName, acPreview [...]
End Sub

I have a similiar report that works - the only diffrence is the report only
has one parameter.

The form must be open, of course, and the controls need to
have their values set, particularly the BN control. If the
controls are bound to data fields, then you need to navigate
to the appropriate record before opening the report.