Urgent! Passing Paramters in data report

[Zainab]

Hi,
The following is my code which passes parameter to show the report. But on clicking cmdView it displays a complie error saying 'Invalid use of property'.

Does anyone have a solution to this?

Thanks

Private Sub cmdView_Click()
Load DataEnvironment1
With DataEnvironment1
If .rsCat_wise_issueM_Grouping.State <> 0 Then .rsCat_wise_issueM_Grouping.Close
.rsCat_wise_issueM_Grouping (txtCat.Text)
End With
rptCat_wise_issue.Refresh
If rptCat_wise_issue.Visible = False Then rptCat_wise_issue.Show

End Sub

[Hack]

Moved to reporting

[wes4dbt]

Is this what your trying to do?

If deCropbyuser.rsCommand1_Grouping.State = adStateOpen Then
deCropbyuser.rsCommand1_Grouping.Close
End If
deCropbyuser.Commands("Command1_grouping").Parameters("param1").Value = frmUrange!txtStart