+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [كود] كود الحذف لايحذف السجل الأول من الجدول (/showthread.php?tid=3937)
RE: كود الحذف لايحذف السجل الأول من الجدول - فاضل الحمود - 19-10-14
المرفق شغال عندي على كل حال
اشكرك اخي السيد الغالي لمحاولاتك وجزاك الله الف خير
RE: كود الحذف لايحذف السجل الأول من الجدول - فاضل الحمود - 19-10-14
التعديل على المرفق مرة تانية
مع ملاحظة انه شئ طبيعي عند فتح فورم الجدول لاتظهر اي بيانات
RE: كود الحذف لايحذف السجل الأول من الجدول - السيد الغالي - 20-10-14
الاخ العزيز السلام عليكم
المشكلة لديك هي كالاتي :
يوجد لديك جدولين الجدول الاول المعروض pharstore والجدول الاخر هو sale2 ولا توجد اي علاقة بين الجدولين فعندما تضيف اكثر من سجل في الفاتورة ثم تريد ان تحذفف السجل الاول فانك تحدفه من الجدول الاول pharstore وهنا لا توجد مشكلة لكن المشكلة في الجدول الثاني sale2 فعندما تحدد السجل الاول من الجدول pharstore فانك لا تحدد السجل الاول من الجدول الثاني sale2 بل على العكس انك وضعت كود في زر اتمام البيع rsn.MoveLast تجبره ان يذهب الى السجل الاخير
وعند الضغط على زر حذف يحذف السجل الاول من الجدول pharstore ويحذف السجل الاخير من الجدول sale2 والسجل الاول لا يحذف لانك لم تحدده وانما حددت السجل الاخير اما كود البحث الذي وضعت وهو
Data3.RecordSource = "select * from [sale2] where [ßæÏ ÇáÕäÝ]='" & Text5.Text & "' " '"
Data3.Recordset.Delete
Data3.Refresh
فانه يعقد المشكلة اكثر مما يحلها كيف؟
انت تبحث عن كود الصنف . وكود الصنف يمكن ان يتكرر في نفس الفاتورة واكيدا انه يتكرر في فواتير اخرى ففي هذه الحالة اي سجل سيحذف ؟ يحتمل ان يحذف سجل انت لا ترغب بحذفه لان كود البحث يعطيك جميع الاصناف التي لها نفس الكود ولجيمع الفواتير وهنا المشكلة !!!
لذا اخي العزيز حاول ان تحدد السجل الذي تريد ان تحذفة من الجدولين بعد ان تعرض الجدول sale2 من خلال DBGrid12 تربطها بالاداة data3 ويكون كود البحث برقم الفاتورة عندها تعرض لك السجلات لتلك الفاتورة ثم تحدد السجل الذي ترغب بحذفه من DBGrid1 و DBGrid2 يعني الاثنان معا ثم تنفذ عملية الحذف
هذه الاجراء غير عملي ولكن ايسر الطرق حاليا ويوجد حل اخر حسب رأيي واتمنى ان يكون صائبا وهو ان تعيد برمجة مشروعك بشكل عكسي يعني الذي يعرض هو الجدول sale2 وليس الجدول pharstore لانه لا تحتاجه حسب فهمي الا في حالة طرح عدد المواد من المواد المخزونة علما اني جربت الطريقة الاولى وعملت بالشكل الصحيح
جرب ذلك اوبلغني
واسف على الاطالة
تحياتي لك
RE: كود الحذف لايحذف السجل الأول من الجدول - فاضل الحمود - 20-10-14
بصراحة اخي السيد لقد وضعت يدك على الجرح وكلامك منطقي جدا ولكني لم استطيع ان اطبق ماقلته لأن اعصابي بازت من كتر المحاولات واحس نفسي عاجز تماما عن التطبيق فإذا سمحت ارفق لي تعديلك في الطرقة الأولى التي اشتغلت لكي اجربها ولكم كل الشكر
RE: كود الحذف لايحذف السجل الأول من الجدول - السيد الغالي - 20-10-14
انتظرني ان امكن
RE: كود الحذف لايحذف السجل الأول من الجدول - السيد الغالي - 20-10-14
السلام عليكم
تم عمل المطلوب حيث يمكنك حذف اي سجل بعد تحديده يعني السجل الاول او الثاني او اي سجل بعد اتباع الخطوات الموضحة في الصور المرفقة مع المشروع
ملاحظة : تم اجراء بعض التعديلات البرمجية الضرورية يرجى الاطلاع عليها
تحياتي لك
RE: كود الحذف لايحذف السجل الأول من الجدول - فاضل الحمود - 21-10-14
اخي السيد الغالي جزاك الله ألف خير فعلا كانت فكرة ذكية منك عجبتني كتير زادك الله علما
RE: كود الحذف لايحذف السجل الأول من الجدول - السيد الغالي - 21-10-14
حياك الله اخي العزيز
اتمنى ان تكون المشكلة قد حلت بالكامل
تحياتي لك
RE: كود الحذف لايحذف السجل الأول من الجدول - فاضل الحمود - 21-10-14
نعم اخي العزيز المشكلة حلت بالكامل واشكرك جزيل الشكر ولكن لدي استفسار هل يوجد كود في حل حددنا الصنف في DBGrid1 يتم تحديده تلقائيا في DataGrid1 بناءا على
رقم الفاتورة وتاريخ البيع والكمية ؟ بحيث تختصر علينا عملية التحديد اليدوي .
RE: كود الحذف لايحذف السجل الأول من الجدول - السيد الغالي - 21-10-14
السلام عليكم
مثل ما تفضلت اخي الكريم وقد اكدت لك سابقا بانها طريقة غير عملية لهذا السبب ولكنها اسهل الطرق كما اسلفت سابقا لذا اخي الكريم هل من الممكن اضافة حقل الى الجدول الاول pharstore يكون ترقيم تلقائي وكذلك للجدول الثاني sale2 لان قاعدة البيانات لا تفتح لدي وعند فتحها بالاكسس لايقبلها الفيجوال لذا اضف هذين الحقلين وساهتم بالموضوع
تحياتي لك