Can someone tell me what is wrong with this code? I get #name? on the report instead of the data.
'Load File Header Record 10 to the report
strSQL = "Select * from tbl_Rec10;"
Set rs = db.OpenRecordset(strSQL)
rs.MoveLast
rs.MoveFirst
For Cntr = 1 To rs.RecordCount
[Reports]![rpt_HSATxtfile].RecType10.ControlSource = rs.Fields("RecType10")
rs.MoveNext
Next
rs.Close
Set rs = Nothing
'Load File Header Record 10 to the report
strSQL = "Select * from tbl_Rec10;"
Set rs = db.OpenRecordset(strSQL)
rs.MoveLast
rs.MoveFirst
For Cntr = 1 To rs.RecordCount
[Reports]![rpt_HSATxtfile].RecType10.ControlSource = rs.Fields("RecType10")
rs.MoveNext
Next
rs.Close
Set rs = Nothing