تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] خطأ فى كود الحذف
#1
لدى قاعدة بيانات بها جدول EMPLOYEE  به حقل salary
ولدى Adodc1 متصل بهذا الجدول و DataGrid1 متصلة بال Adodc1
وكتبت كودآ للزر DELET بحيث يقوم البرنامج بعد الحذف باعادة ترتيب الأرقام المسلسلة للموظفين

فمثلآ اذا كانوا 6 موظفين أرقامهم المسلسلة 1,2,3,4,5,6 وقمت بحذف السجل صاحب الرقم  2
أجد السجلات الخمسة المتبقية  أرقامهم المسلسلة 1,2,3,4,5 (لا أجدها 1,3,4,5,6)
فكان يعمل دون أى مشاكل أثناء وجود جملتى الmsgbox التى وضعتهما مؤقتين لنفسى لمتابعة سير خطوات البرنامج لحين الانتهاء من اجراء تجاربى عليه
MsgBox "/////////////", vbOKOnly, "fffffffffff"
فلما حذفت هتين الجملتين من الكود ظهرت رسالة خطأ عند عمل ال RUN 
أرجو تصحيح الكود أو تصحيح البرنامج المرفق بأى طريقة
بحيث لا يوجد فى الكود أى جملة MSGBOX
وبحيث يتم اعادة ترتيب الأرقام المسلسلة فى ال DataGrid بعد الضغط على الزرDELET

ولكم ألف شكر


الملفات المرفقة
.rar   الموظفين.rar (الحجم : 148.42 ك ب / التحميلات : 39)
الرد }}}
تم الشكر بواسطة:
#2
أهلا أخي الكريم , أعتقد السبب هو في الإتصال بقاعدة البيانات بالـ ADO وأداة الـ ADODC في نفس الوقت , تم التعديل .


الملفات المرفقة
.rar   الموظفين1.rar (الحجم : 149.05 ك ب / التحميلات : 60)
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , عبد العزيز البسكري
#3
جزاك الله خيرآ  أستاذ أحمد
ولكنه رفض التنفيذ من البداية معترضآ على الجملة
PHP كود :
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnumByVal pError As ADODB.ErroradStatus As ADODB.EventStatusEnumByVal pRecordset As ADODB.Recordset
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#4
أهلا أخي الكريم , لم يعترض علي شئ عندي يعمل المثال بشكل جيد , يمكن أنت أضفت اكواد أخرى .
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy
#5
إقتباس :يمكن أنت أضفت اكواد أخرى .
لم أضف أى شئ لا فى الأكواد ولا فى خصائص الأدوات
بمجرد أن حملت الفولدر فتحته وقمت بعمل الRUN فأظهر رسالة اعتراضية بعنوان  compile error  يقول فيها
procedure declaration does not match description of event or procedure having the same name
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الحذف والاضافة والتعديل فى dao hosney 3 2,011 12-12-12, 11:11 AM
آخر رد: hosney
  مشكلة كبيرة في عملية الحذف بعد البحث Ahmed Abdulla 6 2,828 10-10-12, 01:24 PM
آخر رد: Ahmed Abdulla

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم