تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خطاء عند التعديل علي Checkbox
#1
PHP كود :
strsql "update USE_R set USER_NAME ='" Textuser.Text "'," _
        
"PASS = '" textpassword.Text "'" _
        
"P1 = '" CheckBox1.Checked "'" _
        
"where USER_ID = '" TXT_ID.Text "'"
 
       Dim acscmd As New SqlClient.SqlCommand
        sqlcmd
.CommandText strsql
        sqlcmd
.Connection sqlconn
        sqlcmd
.ExecuteNonQuery()
 
       sqlcmd.Dispose()
 
       MsgBox("تمت عملية التعديل على البيانات"
هذة رسالة الخطاء
Incorrect syntax near 'P1'.
هذا الخطاء عند تشيك بوكس
 & "P1 = '" & CheckBox1.Checked & "'" _
ارجو الحل
الرد }}}}
تم الشكر بواسطة:
#2
استبدل 
PHP كود :
"P1 = '" CheckBox1.Checked "'" 

بـ
PHP كود :
"P1 = " CheckBox1.Checked 

و الافضل استخدام الـ (Parameters)
تحياتي ..
الرد }}}}
تم الشكر بواسطة: amgad525 , amgad525
#3
(26-11-16, 10:14 PM)ابراهيم النعيمي كتب : استبدل 
PHP كود :
"P1 = '" CheckBox1.Checked "'" 

بـ
PHP كود :
"P1 = " CheckBox1.Checked 

و الافضل استخدام الـ (Parameters)
تحياتي ..
شكرا اخى الفاضل
الخطاء مازال قائم
الرد }}}}
تم الشكر بواسطة:
#4
PHP كود :
Dim strsql As String _
    
"UPDATE [USE_R]                     " _
    
"SET    [USER_NAME] = @USER_NAME,   " _
    
"       [PASS] = @PASS,             " _
    
"       [P1] = @P1                  " _
    
"WHERE  [USER_ID] = @USER_ID        "

Using acscmd As New SqlClient.SqlCommand(strsqlsqlconn)
    
acscmd.Parameters.AddWithValue("@USER_NAME"Textuser.Text)
    
acscmd.Parameters.AddWithValue("@PASS"textpassword.Text)
    
acscmd.Parameters.AddWithValue("@P1"CheckBox1.Checked)
    
acscmd.Parameters.AddWithValue("@USER_ID"TXT_ID.Text)

    If 
sqlconn.State <> ConnectionState.Open Then sqlconn.Open()
    
Dim ret As Integer acscmd.ExecuteNonQuery()
    
sqlconn.Close()

    If 
ret 0 Then MsgBox("تمت عملية التعديل على البيانات")

End Using 
الرد }}}}
تم الشكر بواسطة: ابراهيم النعيمي
#5
(27-11-16, 12:26 AM)amgad525 كتب :
PHP كود :
Dim strsql As String _
    
"UPDATE [USE_R]                     " _
    
"SET    [USER_NAME] = @USER_NAME,   " _
    
"       [PASS] = @PASS,             " _
    
"       [P1] = @P1                  " _
    
"WHERE  [USER_ID] = @USER_ID        "

Using acscmd As New SqlClient.SqlCommand(strsqlsqlconn)
 
   acscmd.Parameters.AddWithValue("@USER_NAME"Textuser.Text)
 
   acscmd.Parameters.AddWithValue("@PASS"textpassword.Text)
 
   acscmd.Parameters.AddWithValue("@P1"CheckBox1.Checked)
 
   acscmd.Parameters.AddWithValue("@USER_ID"TXT_ID.Text)

 
   If sqlconn.State <> ConnectionState.Open Then sqlconn.Open()
 
   Dim ret As Integer acscmd.ExecuteNonQuery()
 
   sqlconn.Close()

 
   If ret 0 Then MsgBox("تمت عملية التعديل على البيانات")

End Using 

شكرا اخى الكريم  
جزاك الله كل خير 
ضبط الكود مائة بالمائة
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] التعديل على الكود ليتناسق ما اريده 0theghost0 4 115 17-09-17, 03:35 PM
آخر رد: 0theghost0
  [VB.NET] لدي مشكلة مع كود التعديل 0theghost0 13 188 09-09-17, 05:24 PM
آخر رد: ola
  كيفية اضافة حقل CheckBox لعنوان العمود المتألق9 6 137 24-08-17, 04:18 PM
آخر رد: سعود الشامان
  استسفسار حول التعديل على فاتورة المشتريات والقيمة المتألق9 1 191 22-08-17, 02:47 PM
آخر رد: نبيل كونكت
  [VB.NET] اريد التعديل على الكود 0theghost0 2 102 04-08-17, 08:18 PM
آخر رد: 0theghost0
  [VB.NET] الرجاء التعديل ع كود الفترة التجريبة للبرنامج +سريال e-coder 1 133 04-08-17, 08:21 AM
آخر رد: zinom
  [VB.NET] لدي مشروع واريد التعديل عليه 0theghost0 2 131 02-08-17, 05:14 PM
آخر رد: 0theghost0
  مشروع صغير لبيانات الموظفين ارجو التعديل علية a.baomar 6 463 01-06-17, 01:39 PM
آخر رد: ahmedfa71
  مشكلة تفعيل ظهور checkbox في الفورم عامر الجبوري 4 217 21-05-17, 02:22 PM
آخر رد: alma2
  [VB.NET] كود التعديل في sql sal5033 1 133 19-05-17, 04:05 PM
آخر رد: alma2

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


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