elmlk كتب :بعد تتبع الكود هذا نوع الخطأ incorrect syntax near 'values' ما هو الحل
Dim saveok As Integer saveok = 0 saveok = winclass.SQLEXICUTE(" INSERT INTO Users (username,userpass) [color=#FF0000]VALUES [/color]('" & TextBox1.Text & "'," & TextBox2.Text & " )") If saveok > 0 Then MsgBox("تمت عملية الاضافة", MsgBoxStyle.Exclamation) TextBox1.Text = "" TextBox2.Text = "" filldatagrid() End If