जब आप ADODB का उपयोग करके कमांड का एक बैच चलाते हैं, तो मेरा मानना है कि यह हर एक को अलग से चलाता है। अगली कमांड को चलाने के लिए बाध्य करने के लिए, आपको निम्नलिखित का उपयोग करना होगा:
Set rs = rs.NextRecordset()
अपनी दिनचर्या के अंत को निम्नलिखित में बदलना चाहिए:
Set rs = New ADODB.Recordset
rs.Open SQLStr, cn, adOpenKeyset, adLockOptimistic
Set rs = rs.NextRecordset
MsgBox (rs.Fields(0).Value)