30-07-19, 02:56 AM
أنا بستخدم الكود دا وهو شغال معي 100%
كود :
Dim Cmd As New SqlCommand
With Cmd
.Connection = con
.CommandType = CommandType.Text
.CommandText = "Insert Into table (اسم_الخدمة,التكلفة)values('" & t1.Text & "','" & t2.Text & "')"
End With
If con.State = 1 Then con.Close()
con.Open()
Cmd.ExecuteNonQuery()
con.Close()
MsgBox("تم إضافة السجل بنجاح", MsgBoxStyle.Information, "حفظ")
Cmd = Nothingالمبرمج لا يفكر في المشكلة بل في الحل!!

