تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] هل يوجد خطا في الكود الحذف تبعي ؟؟
#1
السلام عليكم

الكود كان يعمل ولكن ربما قمت بوضعه خطأ او قمت بإضافة شيء خطأ لم افهم الكود رغم اني قمت بكتابته يدويا بدل نسخه و اضافته .

اتمنى من الكل ان ينظر في الكود لمعرفه الخطأ .

كود :
Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Persist Security Info=False;")
       Dim sql As String =
           " DELETE FROM [Saller] " &
           " WHERE " &
           " (  Saller_Company,  Saller_Adderess,  Saller_Name,  Saller_Skype, Saller_Email, Saller_Email0, Saller_Phone, Saller_Phone0, Saller_Contry ) " &
           " VALUES " &
           " ( @Saller_Company, @Saller_Adderess, @Saller_Name, @Saller_Skype, @Saller_Email, @Saller_Email0, @Saller_Phone, @Saller_Phone0, @Saller_Contry ) "

       Dim cmd As New OleDbCommand(sql, conn)
       cmd.Parameters.AddWithValue("@Saller_Company", TextBox1.Text)
       cmd.Parameters.AddWithValue("@Saller_Adderess", TextBox2.Text)
       cmd.Parameters.AddWithValue("@Saller_Name", ComboBox1.Text)
       cmd.Parameters.AddWithValue("@Saller_Skype", TextBox3.Text)
       cmd.Parameters.AddWithValue("@Saller_Email", TextBox4.Text)
       cmd.Parameters.AddWithValue("@Saller_Email0", TextBox5.Text)
       cmd.Parameters.AddWithValue("@Saller_Phone", TextBox6.Text)
       cmd.Parameters.AddWithValue("@Saller_Phone0", TextBox7.Text)
       cmd.Parameters.AddWithValue("@Saller_Contry", TextBox8.Text)


       conn.Open()
       cmd.ExecuteNonQuery()
       conn.Close()

       MessageBox.Show("The data has been deleted successfully", "Congratulations", MessageBoxButtons.OK, MessageBoxIcon.Information)
الرد
تم الشكر بواسطة:
#2
انت تريد ان تحذف حقل معين لا تحتاج الى هذا كله تحتاج الى معرفة رقم المعرف او id واسم الجدول يعني
تحتاج الى

DELETE code
FROM Saller
WHERE code = @code


cmd.Parameters.AddWithValue(" @code", TextBox1.Text)

الباقي كما هو مع مراعاة تغير التسميات
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الكود يعمل بشكل صحيح ولكن خالد كامل1 5 89 أمس, 04:43 AM
آخر رد: خالد كامل1
Thumbs Up [VB.NET] هل ممكن تغيير رقم الهارد عن طريق الكود رمضان محمد 1 250 16-08-19, 11:08 PM
آخر رد: عماني939
  [VB.NET] هذا الخطأ في هذا الكود mac9 2 78 13-08-19, 01:33 AM
آخر رد: الرائد
Exclamation [VB.NET] خطأ في الكود عندما يعمل إثنين في الشبكة sniperjawadino 10 290 10-08-19, 01:47 PM
آخر رد: asemshahen5
  [VB.NET] تعديل الكود لطباعة محمد اسماعيل 0 58 06-08-19, 01:58 PM
آخر رد: محمد اسماعيل
  [سؤال] مساعده في الكود اليوم السابع 14 269 02-08-19, 06:58 AM
آخر رد: asemshahen5
  بالله عليكم احتاج مساعدة في انشاء هذا الكود mohamed11223 8 276 01-08-19, 07:02 PM
آخر رد: SnTnt
  [كود] تعديل بسيط علي الكود | انتظر احد المشرفين شكرا جزيلا اليوم السابع 14 282 31-07-19, 01:41 PM
آخر رد: asemshahen5
  [VB.NET] كود الحذف اسامه الهرماوي 4 95 31-07-19, 04:33 AM
آخر رد: اللورد محمود
  [VB.NET] ما هي المشكلة في هذا الكود فراس الغزي 5 196 30-07-19, 01:44 AM
آخر رد: اسامه الهرماوي

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


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