منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

ارجو المساعدة الكود لا يعمل
Private Sub btnsaveupdate1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsaveupdate1.Click
Dim updateok As Boolean = winclass.SQLExciute(" update patient SET name= " & txtname.Text & "' where id= " & txtrec1.Text) '")
If updateok = True Then
lblerror.Text = (" تمت عملية تعديل البيانات ")
lblerror.BackColor = Color.Green
lblerror.ForeColor = Color.White
btnsaveupdate1.Enabled = True
Else

MsgBox("خطأ فى عملية تعديل البيانات ", MsgBoxStyle.Critical)

End If
End Sub

السلام عليكم
في الحقيقة أنا لم استخدم هذه الطريقة في التعامل مع قواعد البيانات داخل vb.net اطلاقا وانما اتعامل مع قاعدة البيانات عن طريق العملاق bindingsource فهو اسهل كثيييييرا في التعامل

فمثلا كل الكود اللي تعبت انت في عمله راح اختصره انا في:

....فقط.