تقييم الموضوع :
  • 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)

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] يرجى التعديل على الكود dubai.eig 4 74 18-01-17, 05:25 PM
آخر رد: dubai.eig
  [VB.NET] كود الفحص قبل الحفظ هل يوجد افضل منه ؟؟ 0theghost0 1 136 18-01-17, 11:43 AM
آخر رد: thevirus
  اريد تحول الكود لفيجوال 2008 abudawoodd 6 177 15-01-17, 02:11 PM
آخر رد: abudawoodd
  هل يوجد طريقة لارسال رسائل واتساب من البرنامج باستخدام vb.net 2010 ? Dr.Sherif Alazizi 15 502 12-01-17, 11:54 PM
آخر رد: Basil Abdallah
  هل يوجد مثال عن اقفال الفترات المالية السيد الجوهري 4 179 04-01-17, 05:18 PM
آخر رد: asemshahen
  [سؤال] كيف جمع عمود به قيمة فارغة يوجد مثال aboslah4u22 8 1,336 04-01-17, 12:48 PM
آخر رد: مساعدة
  تعديل الكود (ظهور مسج بوكس عند عدم وجود الاسم) Namer 10 413 04-01-17, 01:12 AM
آخر رد: Namer
  [VB.NET] هل الكود هذا صحيح dubai.eig 10 217 01-01-17, 10:15 PM
آخر رد: مساعدة
  اين اكتب هذا الكود anis_derna 3 140 28-12-16, 12:18 PM
آخر رد: thevirus
  تصحيح الكود الاتي CLARO 2 63 23-12-16, 02:12 PM
آخر رد: CLARO

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


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