Тусклое rst как DAO.Recordset
JobID = GetID ()
Установите rst = CurrentDb.OpenRecordset («ВЫБЕРИТЕ * ОТ JobsDoors ГДЕ [удостоверение личности] =» & JobId)
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Конец
Установите rst = ничего
или
Тусклое rst как DAO.Recordset
Установите rst = CurrentDb.OpenRecordset («ВЫБЕРИТЕ * ОТ JobsDoors ГДЕ [удостоверение личности] =» & GetID ())
JobNum = rst! JobNumTN
JobSuf = rst! JobSuffix
JobBat = rst! BatchNum
rst. Конец
Установите rst = ничего