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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجو التعديل على الدالة المرفقة - الدالة تعيد الرقم -1 new_programer 4 91 20-03-24, 01:18 PM
آخر رد: تركي الحلواني
  كيفية تنفيذ امر عند التعليم على checkbox بالداتا جريد فيو heem1986 2 159 21-02-24, 01:37 AM
آخر رد: heem1986
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] كود التعديل Abdellatif 6 396 21-12-23, 02:01 PM
آخر رد: Abdellatif
  كود التعديل لم ينجح معي melad2002 4 298 16-12-23, 12:22 AM
آخر رد: anes
  هل حفظ الفيمة في Checkbox الخاص بـTreeView مسلم_١ 3 1,101 30-10-23, 08:13 PM
آخر رد: ahmad2023
  رجاء التعديل على الكود المرفق - كلاس لعرض كود المورد new_programer 4 357 13-10-23, 01:47 AM
آخر رد: new_programer
  اريد التعديل على كود اذا كان القيمة المدخلة مكررة بDataGridView يتم فقط زيادة العدد moh61 6 822 26-07-23, 10:41 AM
آخر رد: تركي الحلواني
  يوجد خطاء عند تحميل الفورم - مثال شجرة الحسابات new_programer 6 756 11-06-23, 06:47 PM
آخر رد: new_programer
  يوجد خطاء عند فتح الفورم مثال شجرة الحسابات new_programer 2 564 06-06-23, 02:41 PM
آخر رد: new_programer

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


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