Sorting a report

[purdybirds]

Good Day,

I've created a report and now I need to sort the datasource (an access database) so that the report only shows data for a certain month and year. here is my code.

Private Sub DataReport_Initialize()
Dim rmonth As String
Dim ryear As String
 
rmonth = RptStart.List1.Index = "0"
rmonth = RptStart.List1.Index = "0"
 
DataEnvironment1.Recordsets = "select * from giveway where month = rmonth and year = ryear order by name"
 
End Sub

I get an error that says invalid use of property. Can anyone help?

Thank you