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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  التعديل الذي أقوم به في الفورم لا يظهر عند عمل RUN نسيم 9 290 28-12-16, 05:10 PM
آخر رد: Basil Abdallah
  كيفية التعديل على كود HTML ومن ثم عرضه في WebBrowser bidaya 5 128 24-12-16, 03:47 PM
آخر رد: ابو ليلى
  [VB.NET] يرجى التعديل على هذا الكود dubai.eig 1 81 10-12-16, 12:18 PM
آخر رد: dubai.eig
  [VB.NET] طلب التعديل في كود بسيط rabeh.ram 2 102 29-11-16, 11:10 PM
آخر رد: rabeh.ram
  ما هو الخطاء فى هذا الكود "كود التعديل" السيد الجوهري 1 102 26-11-16, 03:22 AM
آخر رد: أبو عمر
  التعديل علي datagridview باستخدام sql command dark1459 6 190 21-11-16, 11:55 AM
آخر رد: dark1459
  [VB.NET] استفسار بخصوص استعلام التعديل dark1459 8 171 15-11-16, 12:31 AM
آخر رد: dark1459
Information [VB.NET] خطاء في الكرستال ريبورت عند تحويل قاعدة البيانات من اكسس إلى ميسكوال 3msoft 2 98 22-10-16, 11:49 PM
آخر رد: 3msoft
  التعديل في اكسس makky 1 124 22-09-16, 11:19 PM
آخر رد: ممدوح
  التعديل على هذا المشروع abdulla2 10 330 07-09-16, 12:39 AM
آخر رد: abdulla2

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


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