[الاستاذ خليل]

بصراحة لا استطيع المساعدة هكذا لاني اجرب الاكواد لكي اجدها تعمل او لا

لكن ممكن تعمل التالي :

data1.RecordSet.MoveFirst
     Do While Not (data1.RecordSet.EOF)
         '
         'code to process the current record
        اضف عنا كود يقوم بالتحقق من متغير السطر

         data1.RecordSet.MoveNext
     Loop