Здравствуйте, уважаемые эксперты!
Прошу вас ответить на следующий вопрос:
Пишу на VB в среде разработки VSExpress2013. При обращении таблице БД с целью добавить строку выдает следующую ошибку: "Необработанное исключение типа "System.Data.OleDb.OleDbException" в System.Data.dll
Дополнительные сведения: Ошибка синтаксиса в инструкции INSERT INTO."
Может я не понимаю чего, но я уже несколько раз перепроверяла.
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Dim s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13 As String
Dim r As DialogResult
Form3.ShowDialog()
s1 = Grid1.CurrentRow.Cells("Код").Value
s2 = Form3.TextBox2.Text
s3 = Form3.TextBox3.Text
s4 = Form3.TextBox4.Text
s5 = Form3.TextBox5.Text
s6 = Form3.TextBox6.Text
s7 = Form3.TextBox7.Text
s8 = Form3.TextBox8.Text
s9 = Form3.TextBox9.Text
s10 = Form3.TextBox10.Text
s11 = Form3.TextBox11.Text
s12 = Form3.TextBox12.Text
s13 = Form3.TextBox13.Text
r = Form3.DialogResult
Form3.Close()
If r <> DialogResult.OK Then
Exit Sub
End If
Dim c As New OleDbCommand
c.Connection = conn
c.CommandText = "insert into Заполнение(Код_клиента,Фамилия,Имя,Отчество,Дата_рождения,Пол,Место_рождения,Семейное_положение,Дата_регистрации_брака, ФИО_родителей, Место_регистрации, Наличие_ин_гражданства,Причина,) values('" & s1 & "','" & s2 & "','" & s3 & "','" & s4 & "','" & s5 & "','" & s6 & "','" & s7 & "','" & s8 & "','" & s9 & "','" & s10 & "','" & s11 & "','" & s12 & "','" & s13 & "')"
c.ExecuteNonQuery()
RefreshGrid2()
End Sub