I have Recordset rst1 which is the result of a query
dim strSQL as string
strSQL = "SELECT tblAppointment.lngAppointID, tblAppointment.lngPatientID, tblAppointment.dtmAppointDate, tblAppointment.dtmAppointTime, tblAppointment.txtAppointDesc, tblAppointment.chkKeptAppointYesNo, " _
& "...