Fråga : ta fram ändring Dlookup till recordset

Jag har efter kodifiera:
JobID = GetID () 'får jobID numrerar för att fylla in grupperar fields
JobNum = DLookup (”JobNumTN”, ”JobsDoors”,” [LEGITIMATIONEN] = " & JobID)
JobSuf = DLookup (”JobSuffix”, ”JobsDoors”, ”LEGITIMATION =” & JobID)
JobBat = DLookup (”BatchNum”, ”JobsDoors”, ”LEGITIMATION =” & JobID)
JobDrs = DLookup (”dörrar”, ”qryOpenJobsDoors”,” [LEGITIMATIONEN] = " & JobID)

I skulle något liknande till ues en recordset==> som detta är vad jag har försökt: rst för
Dim som rst för DAO.Recordset

Set =
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Close
Set rst = Nothing

I förmiddagen som den har, besvärar att få kriterierna för att fungera, och jag behöver att öppna en annan recordset för JobDrsen värderar förslag för I need.

Any?

Thanks,


" klar "

Svar : ta fram ändring Dlookup till recordset

Dunkel rst som DAO.Recordset
JobID = GetID ()
Fastställd rst = CurrentDb.OpenRecordset (”VÄLJ * FRÅN JobsDoors VAR [LEGITIMATIONEN] =” & JobId)
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Nära
Fastställd rst = ingenting


eller

Dunkel rst som DAO.Recordset

Fastställd rst = CurrentDb.OpenRecordset (”VÄLJ * FRÅN JobsDoors VAR [LEGITIMATIONEN] =” & GetID ())
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Nära
Fastställd rst = ingenting