Vraag : toegangs verandering Dlookup in recordset

Ik heb de volgende code:
JobID = GetID () 'brengt jobID aantal ertoe om partij in te vullen fields
JobNum = DLookup („JobNumTN“, „JobsDoors“,“ [identiteitskaart] = " & JobID)
JobSuf = DLookup („JobSuffix“, „JobsDoors“, „identiteitskaart =“ & JobID)
JobBat = DLookup („BatchNum“, „JobsDoors“, „identiteitskaart =“ & JobID)
JobDrs = DLookup („Deuren“, „qryOpenJobsDoors“,“ [identiteitskaart] = " & JobID)

I zou houden aan ues van een recordset ==> dit is wat ik heb geprobeerd:
Dim rst als DAO.Recordset

Set rst = CurrentDb.OpenRecordset („SELECTEER * UIT JobsDoors WAAR [identiteitskaart] = JobId)
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Close
Set rst = Nothing

I am probleem hebben die de criteria ertoe brengen om te werken en ik moet een andere recordset voor de JobDrs waarde I need.

Any- suggesties openen?

Thanks,

Antwoord : toegangs verandering Dlookup in recordset

Schemerige rst als DAO.Recordset
JobID = GetID ()
Reeks rst = CurrentDb.OpenRecordset („SELECTEER * UIT JobsDoors WAAR [identiteitskaart] =“ & JobId)
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Sluit
Plaats rst = niets


of

Schemerige rst als DAO.Recordset

Reeks rst = CurrentDb.OpenRecordset („SELECTEER * UIT JobsDoors WAAR [identiteitskaart] =“ & GetID ())
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Sluit
Plaats rst = niets