26-09-17, 12:00 PM
السلام عليكم ورحمة الله وبركاته
اخواتي عندي مشكلة بزر اضافة جديد وهذه الرسالة تظهر حصراً عندما تكون قاعدة البيانات فارغة
اي عند اضافة اول حقل فقط
لاتظهر ابدا عندما يكون الجدول يحتوي على بيانات مضافة مسبقاً
يكون الخطأ عند السطر rst.movelast
الرسالة مبينة بالصورة المرفقة
ارجو منكم مساعدتي بحل المشكلة ولكم جزيل الشكر
اخواتي عندي مشكلة بزر اضافة جديد وهذه الرسالة تظهر حصراً عندما تكون قاعدة البيانات فارغة
اي عند اضافة اول حقل فقط
كود :
Call clear
rst.Open "Select * from tblprod", con, adOpenDynamic, adLockOptimistic
rst.MoveLast
lblpcode = "1" + Format(Date, "mmyy") + Format(Time, "hhmmss")
txtpname.SetFocus
rst.Close
لاتظهر ابدا عندما يكون الجدول يحتوي على بيانات مضافة مسبقاً
يكون الخطأ عند السطر rst.movelast
الرسالة مبينة بالصورة المرفقة
ارجو منكم مساعدتي بحل المشكلة ولكم جزيل الشكر