:s السلام
اخواني عندي كود للحذف بس يحذف من الفورم والمشكلة انه مايحذف شي من الجدول الي في قاعدة البيانات (الاكسس)
واريد كود البحث والتعديل
وهذا كود الحذف
وشكرا
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
If (Me.BindingContext(DataSet11, "employ").Count > 0) Then
Me.BindingContext(DataSet11, "employ").RemoveAt(Me.BindingContext(DataSet11, "employ").Position)
'Me.OleDbDataAdapter1.Update(DataSet11, "employ")
Me.Count()
End If
افا لنا اسبوع على ذا الحال ولا احد معبرنا ليه
السلام عليكم و رحمة الله
جرب هذا الكود اخى عساه يكون مفيد ان شاء الله
Dim cmd1 As New OleDbCommand("DELETE * FROM TableName WHERE ID=" & lngID & "", Con)
cmd1.ExecuteNonQuery()
حيث TableName هو اسم الجدول
lngID متغير من نوع لونج يحدد الصف المطلوب حذفه
con اسم الكونكشن
لاى استفسار عن الكود يسعدنى الاتصال بى على الميل
dev_code@hotmail.com
السلام عليكم
هل الجدول الذي تود الحذف منه هو وحيد في البرنامج أم أن هنالك علاقة بينه وبين جدول أخر
لو كانت هنالك علاقة و أن هذا الجدول هو بمثابة الأب فإن المفترض أن تحذف القيم المرتبطه به ( الموجودة في الابن)
إن كان هذا الكلام لا ينطبق على مشروعك
فلو تفضلك ووضعت لنا نسخة ولو مصغرة لينظر فيها الاخوة و أنا حتى نستطيع بحول الله أن نساعد بقدر الإمكان .
او مثلاً هل تظهر لك رسالة خطأ إن كانت فكتبها ؟
إذا كان الجواب لا فحاول التحديث عن طريق إنشاء dataset جديدة تأخذ الذي تم تحديثه بهذا الشكل
Dim DSC As New DataSet11 DSC = CType(DsMain1.GetChanges, DataSet11) OleDbDataAdapter1.Update(DSC) DataSet11.Merge(DSC) DataSet11.AcceptChanges()
العنصر DSC هو الـ DataSet الجديدة وهي إختصار لـ DataSetCopy DSC
السلوك GetChanges يقوم فقط بأخذ ما تم تحديثه في الـ DataSet11
ثم نقوم بعملية التحديث عن طريق الـسلوك Update
ثم عملية الضم من الـ DataSet الجديدة في الـ DataSet الإفتراضية
ثم ننادي السلوك AcceptChanges
هذا والله أعلى و أعلم
السلام عليكم
في المثال يتضح المقال
الحذف الفعلي في قاعدة البيانات يتم عندما تقوم بإستدعاء update لكنك غير مفعل السطر الذى يقوم بذلك
في حالة تفعيله ما الخطأ الذى يظهر لديك؟
لا تحزن:
إن كنت فقيرا فغيرك محبوس في دين، وإن كنت لا تملك وسيلة نقل فسواك مبتور القدمين، وان كنت تشكوا من آلام فغيرك يرقدون على الاسرة البيضاء و من سنوات، وان فقدت ولدا فغيرك فقد عددا من الأولاد و في حادث واحد.
لا تحزن:
فأنت تشرب الماء الزلال، و تستنشق الهواء الطلق، و تمشي على قدميك معافى، و تنام ليلك آمنا.
هذا الموضوع مغلق.