تحية طيبة للجميع...
تظهر لي رسالة
Syntax error in INSERT INTO statement.
If TextBox1.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then
MsgBox("Some data required", MsgBoxStyle.Critical, "Error") : Exit Sub
End If
con.Close()
Dim savein As New OleDbCommand
savein.Connection = con
savein.CommandType = CommandType.Text
savein.CommandText = "INSERT INTO Suppliers2(Received_item,date2,company,price,note) values ('" & Trim(TextBox1.Text) & "' , '" & DateTimePicker1.Value.ToString("mm/dd/yyyy") & "' , '" & Trim(TextBox3.Text) & "' , '" & Trim(TextBox4.Text) & "' , '" & Trim(TextBox5.Text) & "')"
con.Open()
savein.ExecuteNonQuery()
MsgBox("Done")ممكن توضيح سبب الخطأ.
ومشكورين مقدماً.