Problem with Where Clause/Filter in a Report

[Guest]

Hi,

I need to print the individual information of one given project. All the
projects are stored in a table and I have a report that will print all the
projects in a table, unless I filter the data.

I have a control button in a form which will open the report like this:

'---------------------------------------------------------------------
Private Sub PrintProjectInfo_Click()

DoCmd.OpenReport "ProjectDetail", acViewPreview, , "ProjectCode = " & Me.
ProjectCode

End Sub
'---------------------------------------------------------------------

However, the report still shows all records in the table. Note that there
isn't any filter/where in the report query. I've tried Where Clause and
Filter, but nothing...

Anyone?

Thanks

Antonio

 

[Tom Lake]

I need to print the individual information of one given project. All the

projects are stored in a table and I have a report that will print all the
projects in a table, unless I filter the data.

I have a control button in a form which will open the report like this:

'---------------------------------------------------------------------
Private Sub PrintProjectInfo_Click()

DoCmd.OpenReport "ProjectDetail", acViewPreview, , "ProjectCode = " &
Me.
ProjectCode

End Sub
'---------------------------------------------------------------------

However, the report still shows all records in the table. Note that there
isn't any filter/where in the report query. I've tried Where Clause and
Filter, but nothing...

Is ProjectCode a number? If not, try this:

DoCmd.OpenReport "ProjectDetail", acViewPreview, , "[ProjectCode] = '" &
[ProjectCode] & "'"

Tom Lake

 

[Guest]

Yes, ProjectCode refers to a Text Field.

I'm now using:

StrFilter = "ProjectCode = '" & Me.ProjectCode & "'"

DoCmd.OpenReport "ProjectDetail", acViewPreview, , StrFilter

But it still returns all the records in the Table...

I need to print the individual information of one given project. All the
projects are stored in a table and I have a report that will print all the
projects in a table, unless I filter the data.

I have a control button in a form which will open the report like this:

'---------------------------------------------------------------------
Private Sub PrintProjectInfo_Click()

DoCmd.OpenReport "ProjectDetail", acViewPreview, , "ProjectCode = " &
Me.
ProjectCode

End Sub
'---------------------------------------------------------------------

However, the report still shows all records in the table. Note that there
isn't any filter/where in the report query. I've tried Where Clause and
Filter, but nothing...

Is ProjectCode a number? If not, try this:

DoCmd.OpenReport "ProjectDetail", acViewPreview, , "[ProjectCode] = '" &
[ProjectCode] & "'"

Tom Lake