رسالة خطاء غير معروفة وغريبة

[b]تأكد من مسار قاعدة البيانات في الجهاز الذي لا يعمل عليه البرنامج وهل تم وضع البرنامج بالنسخ ام setup اي تثبيت

شكرا لك اخي على الاهتمام

لكن احب اقول لك ان البرنامج عندي يحفظ ويعدل على كل الجداول الا هذا الجدول عندما يقوم بعملية تعديل على هذا الجدول تظهر الرساله

والبرنامج انا مسويه والسورس كود عندي اكيد

هل الخطا من الجدول مثلا مع ان التعديل على الجداول الثانية صحيح جدا بدون اي خطا

الرجوا الرد سريعا

وشكرا

جرب في نفس الكود تغير اسم الجدول والحقول بحيث اذا استمر الخطأ يبقى الخطأ في الكود وإذا لم يظهر الخطأ فأن الخطأ في الجدول

الأخ الفاضل ...

جرب أستخدام:

Set invHRS = New ADODB.Recordset
		invHRS.Open "DELETE from gaid1 where g_no = " & Text3.Text & " and g_select = '" & Text2.Text & "'and p_name = '" & Text80.Text & "'", CN, adOpenStatic, adLockOptimistic

أو

CN.Execute "DELETE from gaid1 where g_no = " & Text3.Text & " and g_select = '" & Text2.Text & "'and p_name = '" & Text80.Text & "'"

بدلاً من

Set invHRS = New ADODB.Recordset
		invHRS.Open "select * from gaid1 where g_no = " & Text3.Text & " and g_select = '" & Text2.Text & "'and p_name = '" & Text80.Text & "'", CN, adOpenStatic, adLockOptimistic

		While Not invHRS.EOF
			invHRS.delete
			invHRS.MoveNext
		Wend

شكراً

ملحوظة: أستخدام "DELETE" يقوم بعمل (Close) لل invHRS