07-02-17, 11:11 AM
السلام عليكم و رحمة الله وبركاته
اقوم بالعمل على قاعدة بيانات اكسس 2007وربطها بالفيجوال 2010
SQL = "insert into announce(ann_name, ann_num, ann_date, link) " & _
"values ('" & TextBox1.Text & "','" & TextBox2.Text & _
"','" & DateTimePicker1.Text & "','" & TextBox3.Text & _
"')"
Dim savinfo As New OleDbCommand(SQL, dbcon)
dbcon.Open()
savinfo.ExecuteNonQuery()
dbcon.Close()
MsgBox(" تمت عملية الاضافة بسلام")
Me.Close()
Form1.Show()
End Sub
يتوقف البرنامج عند سطر dbcon.Open() ويظهر رسالة تنسيق قاعدة البيانات لا يمكن التعرف عليه
أتمنى مساعدتي بذلك
اقوم بالعمل على قاعدة بيانات اكسس 2007وربطها بالفيجوال 2010
SQL = "insert into announce(ann_name, ann_num, ann_date, link) " & _
"values ('" & TextBox1.Text & "','" & TextBox2.Text & _
"','" & DateTimePicker1.Text & "','" & TextBox3.Text & _
"')"
Dim savinfo As New OleDbCommand(SQL, dbcon)
dbcon.Open()
savinfo.ExecuteNonQuery()
dbcon.Close()
MsgBox(" تمت عملية الاضافة بسلام")
Me.Close()
Form1.Show()
End Sub
يتوقف البرنامج عند سطر dbcon.Open() ويظهر رسالة تنسيق قاعدة البيانات لا يمكن التعرف عليه
أتمنى مساعدتي بذلك