عند ربط قاعدة البيانات مع الكود لم يفلح في في ارسال البيانات الي الجدول :
الكود على النحو التالي:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ShowForm As New MainForm()
Dim OCon As SqlClient.SqlConnection = New SqlClient.SqlConnection()
OCon.ConnectionString = ("Data Source=local;Initial Catalog=Family Tree;Integrated Security=SSPI;")
Dim Str As String = "insert into Family(FamilyName,Notes)values('" & txtFyName.Text & "','" & txtFyDes.Text & "')"
Dim OCom As New SqlClient.SqlCommand(Str, OCon)
OCon.Open()
OCom.ExecuteNonQuery()
OCon.Close()
ShowForm.Show()
End Subهل الربط صحيح ؟ ام يوجد مشكلة ؟ ارجوا منكم المساعده .ومشكروين
بالنسبه للرساله التي تظهر ارفقتها مع المرفقات .