المشاركات : 10
المواضيع 3
الإنتساب : Mar 2014
السمعة :
0
الشكر: 6
تم شكره 0 مرات في 0 مشاركات
السلام عليكم
لدي برنامج يقوم باضافة السجلات و حفظها في قاعدة بيانات اكسس و يقوم بعرضها في اداة dataview وارغب باضافة زر حذف يقوم بحذف السطر المحدد من الـdataview من قاعدة البيانات مع رسالة تاكيد لمعلومات السطر المحذوف.
الرجاء مساعدتي في كود الحذف حيث انني فتشت كثيرا ولم استطع ترتيب الكود الازم لعملية الحذف.
شكرا.
المشاركات : 10
المواضيع 3
الإنتساب : Mar 2014
السمعة :
0
الشكر: 6
تم شكره 0 مرات في 0 مشاركات
شكرا لاهتمامك اخ vbnet
لكني لم استطع الاستفادة كثيرا من الرابط الذي اعطيتني اياه.
انني اريد من الفورم وعن طريق زر حذف ان احذف الصف بالكامل عن طريق الاندكس للسطر المحدد اذا ممكن.
شكرا
المشاركات : 7,391
المواضيع 803
الإنتساب : Sep 2013
السمعة :
846
الشكر: 13249
تم شكره 18795 مرات في 4414 مشاركات
الطريقة الاولى اسهل
فعل التحرير بالاداة في وضع التصميم .
وعند تنشيط اي صف انقر زر الحذف بلوحة المفاتيح
المشاركات : 10
المواضيع 3
الإنتساب : Mar 2014
السمعة :
0
الشكر: 6
تم شكره 0 مرات في 0 مشاركات
شكرا لك كثيرا اخ vbnet لقد تم عمل الكود بشكل رائع, بالاضافة الى انني تمكنت من استخدام الطريقة الاولى و هي جيدة ايضا.
شكرا اخ سعود على الاهتمام.
المشاركات : 10
المواضيع 3
الإنتساب : May 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
اخوان صارلي ثلاث ليالي اود وضع كود الحذف للزر
والطريقة التي تتبعتها في استيراد قاعدة البيانات هي من الفجيوال نفسه وليست عن طريق الاكواد
وحاولت ولم استطع مانجخت به فقط هو البث الخزن والاضافة
طبعا انا سحبت الجدول الى المشروع عن طريق اختيار تفاصيل ثم افلته بالمشروع وضهر الكونترول بوكس فق للمسح والاضافة ولكن انا اتمنى ان انجح في زر الحذف ياريت لو تساعدوني
المشاركات : 10
المواضيع 3
الإنتساب : May 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
طيب الله يوفقك كمل جميلك علي و زر الخزن
المشاركات : 10
المواضيع 3
الإنتساب : May 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
اخواني الاعزاء يعد ما نجحت بصنع ازرار الحذف والاضافة والمسح واللاغلاق وعند تشغيل البرنامج يعمل بصورة جيدة ولكن
عند اغلاق البرنامج اجد ان كل ما اضفته احتفى تماما ولا اعلم ماهي المشكلة اليكم الاكواد التي استخدمتها
AddNew
Me.Validate()
Me.InterfaceBindingSource.AddNew()
.................................................
save
Me.Validate()
Me.InterfaceBindingSource.EndEdit()
...................................................
Delete
Me.NameTextBox.Text = ""
Me.AddressTextBox.Text = ""
Me.ZipCodeTextBox.Text = ""
Me.Personal_NummberTextBox.Text = ""
Me.CityTextBox.Text = ""
Me.ConservatismTextBox.Text = ""
Me.ContryTextBox.Text = ""
Me.TelNumberHomeTextBox.Text = ""
Me.TelNumbermobileTextBox.Text = ""
Me.NotesTextBox.Text = ""
Me.NameTextBox.Focus()
..............................................
Close
Me.Close()
..................................................