السلام عليكم
انا مستخدم جديد و عندي مشكلة في كود التالي و السابق
عند البحث و الوصول الى نتايج في قاعدة البيانات و عملت 2 زر التالي و السابق بالكود التالي:
rs.movenext
call data_show
if rs.EOF then
rs.movelast
call data_show
else
end if
exit sub
end if
و لا اعلم لما لا يتوقف عند نهاية السجلات
اعطية شرط
بعد
.recordcount
اذا كان في اخر سجل يرجع للأول
if .eof then .movefirist
من فضلك اريد الكود كامل
الكود
data1.recordsource="select * from table" data1.refrech with data1.recordset if .recordcount =0 then exit sub if .eof then .movefirist !xNo=text1.text end with
xNo! هو اسم الحقل
إن شاء الله تجي معاك
واذا في شي اسئل
تم تعديل هذه المشاركة بواسطة alameeeer في 3 مارس 2006 في 23:31
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…