If st.RecordCount = 0 Then
MsgBox("لا توجد أصناف", MsgBoxStyle.Critical)
Exit Sub
End If
ولا بيعترض ولا اي حاجة سواء كانت قاعدة البيانات فاضية اوماليانة
If st.RecordCount <> 0 Then
MsgBox("لا توجد أصناف", MsgBoxStyle.Critical)
Exit Sub
End If
عملت الكود دة اعترض وقالي لايوجد اصناف
بس بعد ماضفت الاصناف
كل ما افتح الفورم يظهر الاعتراض
لو سمحتم عايز الصح بتاعو
وشكرا جزيلا
السلام عليكم ورحمة الله وبركاتة
اولا احب ان ابدي بكل حب وتقدير لكل اللي الناس اللي مرت علي الموضوع
وعلي فكرة انا بعد البحث عرفت اوصل للتعديل الصحيح والحمد للة الكود اشتغل وبقي زي الفل
الكود هو
If st.BOF And st.RecordCount < 0 Then
MsgBox("لا توجد أصناف", MsgBoxStyle.Critical)
Exit Sub
End If
وشكرا جزيلا
مش إحنا اتكلمنا قبل كده في نفس الموضوع..؟
على أية حال بالتوفيق... وأنا في الخدمة.
In order to understand recursion, one must first understand recursion
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…