تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
بحاجة لتعديل كود Update query
#1
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Dim cmd As New OleDbCommand
        cmd = New OleDbCommand("update table1 set where info = user_idinfo ='" & TextBox1.Text & "'user_fornameinfo ='" & TextBox2.Text & "'user_ genderinfo = '" & TextBox2.Text & "')", con)
        con.Open()
        cmd.ExecuteNonQuery()
        con.Close()
    End Sub
الرد
تم الشكر بواسطة:
#2
ضع أسماء أعمدة الجدول و اسم العامود الذي تعتمد عليه في البحث عن القيمة المراد تعديلها .
الرد
تم الشكر بواسطة:
#3
تفضل الكود بعد التعديل ولكن يتوقف على تاكيد المسميات لديك
كود :
       Dim cmd As New OleDbCommand
       cmd = New OleDbCommand("UPDATE info SET user_fornameinfo ='" & TextBox2.Text & "', user_ genderinfo = '" & TextBox3.Text & "' WHERE user_idinfo =" & TextBox1.Text & ")", con)
       con.Open()
       cmd.ExecuteNonQuery()
       con.Close()

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة:
#4
اولا اشكرك جداااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااااا صديقى العزيز 
ثانيا الكود مش شغال 
بيعطى خطأ فى جملة الكود

 Dim cmd As New OleDbCommand
       cmd = New OleDbCommand("UPDATE info SET user_fornameinfo ='" & TextBox2.Text & "', user_ genderinfo = '" & TextBox3.Text & "' WHERE user_idinfo =" & TextBox1.Text & ")", con)
       con.Open()
       cmd.ExecuteNonQuery()
       con.Close()
ممكن تعديل على هذا الكود لانه لايعمل اكون شاكر
الرد
تم الشكر بواسطة:
#5
كود :
If Conn.State = ConnectionState.Closed Then
               Conn.Open()
           End If

           Dim cmd As New OleDb.OleDbCommand
           cmd.Connection = Conn
           cmd.CommandType = CommandType.Text
           cmd.CommandText = "UPDATE info SET user_fornameinfo=@user_fornameinfo, genderinfo= @genderinfo WHERE user_idinfo= @user_idinfo"
cmd.Parameters.AddWithValue("@user_fornameinfo", TextBox2.Text.Trim)
           cmd.Parameters.AddWithValue("@genderinfo", TextBox3.Text.Trim)
           cmd.Parameters.AddWithValue("@user_idinfo", TextBox1.Text.Trim)
           cmd.ExecuteScalar()
           Conn.Close()
الرد
تم الشكر بواسطة:
#6
الكود مش شغال
الرد
تم الشكر بواسطة:
#7
ارفق المشروع
الرد
تم الشكر بواسطة: elgokr , احمد خطاب


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Information [VB.NET] بحاجة الى اكواد الاضافة و الحذف و التعديل و البحث .. georgos 7 207 15-02-19, 10:52 AM
آخر رد: georgos
  [SQL] Bulkcopy update kaiser3D 0 77 14-12-18, 10:22 PM
آخر رد: kaiser3D
  [VB.NET] بحاجة لمساعدة فى اتمام كود عملية حسابية وايضاً كود استعلام لاكثر من جدول السعيدي 14 599 01-12-18, 11:31 PM
آخر رد: السعيدي
  سؤال بخصوص ال update فى الاكسس mostafa nada 8 312 18-11-18, 06:08 PM
آخر رد: mostafa nada
  ما الخطأ في كود التعديل Update ؟ Hazem1 4 273 02-11-18, 05:23 PM
آخر رد: elgokr
  update العمر حافظ حافظ 2 180 23-09-18, 11:12 PM
آخر رد: 911
  [C#.NET] سلام عليكم يا أهل فيجوال بيسك بحاجة الى مساعدة aloush 5 268 02-09-18, 01:33 PM
آخر رد: aloush
  [سؤال] سؤال في QUERY hglogtd 5 319 17-04-18, 01:57 AM
آخر رد: ابو ليلى
  هل يمكن تحويل ال Query في السيكوال الي جدول مثل الاكسس khaled12345 2 352 19-11-17, 02:02 PM
آخر رد: khaled12345
Information update لعدة قيم الو0 3 316 17-11-17, 05:30 AM
آخر رد: الو0

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


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