Your technology certification is waiting. Enroll in Cloud Class ®
Dim rs as dao.recordset
Set rs = Forms!yourformname.recordsetclone
dim rsOut as dao.recordset '<--- this is the table where you are saving records to
set rsout = currentdb.openrecordset ("YourTable", dbopendynaset)
if rs.recordcount = 0 then
Msgbox "no records in form"
do until rs.eof
rsOut.edit ' or addnew if you are creating new records
rsOut!Field1 = rs!field1
rsOut!Field2 = rs!field2
set rs= nothing
set rsout = nothing
Open in new window
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.