Problems with "OpenQueryDef"

[AUJoe]

I'm converting several older databases from Access 97 to 2003 and then to 2007. The database I'm working on now has several lines of code referencing "QueryDef" which is causing compile errors. Particularly the "OpenQueryDef" line which I belive to be obsolete. Does anyone have any suggestions?

Dim qudef As QueryDef

Set qudef = dbABC.OpenQueryDef("Pur-PO-Log-Query", SQLPOLogForm())

[boblarson]

How are you using it (you didn't give much to go on):

Dim qudef As QueryDef

Set qudef = Currentdb.QueryDefs("Pur-PO-Log-Query")

[AUJoe]

I believe it is being referenced on a form via a radio button. Here is the full section of code.

Private Sub cboUserID_Click()
Dim dbABC As Database
Dim qudef As QueryDef
iActivity = True
Set dbABC = DBEngine.Workspaces(0).Databases(0)
sUserID = cboUserID.Column(0)
sUserName = cboUserID.Column(1)
txtUserName.Value = sUserName
iNoUserID = False
DelQuery dbABC, "Pur-PO-Log-Query"
Set qudef = dbABC.OpenQueryDef("Pur-PO-Log-Query", SQLPOLogForm())
qudef.Close
CloseDB dbABC
End Sub