G
Guest
Good Afternoon All,
What am I doing wrong with the following:
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Set db = CurrentDb()
Set qdf = db.QueryDefs("Append_tbl_Svc")
qdf.Parameters("tbl_Svc.RecordID") = Me.RecordID
qdf.Execute
The error reads Run-Time Error 3265 Item not found in this collection
and it highlights the "qdf.Parameters("tbl_Svc.RecordID") = Me.RecordID" line.
Thanks!
Renee
What am I doing wrong with the following:
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Set db = CurrentDb()
Set qdf = db.QueryDefs("Append_tbl_Svc")
qdf.Parameters("tbl_Svc.RecordID") = Me.RecordID
qdf.Execute
The error reads Run-Time Error 3265 Item not found in this collection
and it highlights the "qdf.Parameters("tbl_Svc.RecordID") = Me.RecordID" line.
Thanks!
Renee