Sorry, I tried many times to figure out where the problem is and I found nothing, the error I get is "syntax error in update statement".
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Dim pos As Integer = BindingContext(clientsDT).Position
With clientsDT.Rows(pos)
.Item("Client_ID") = Client_IDTextBox.Text
.Item("Company_name") = Company_nameTextBox.Text
.Item("Address") = AddressTextBox.Text
.Item("City") = CityTextBox.Text
.Item("Personnel") = PersonnelTextBox.Text
.Item("Personnel_Gender") = Personnel_GenderComboBox.Text
.Item("Personnel_Phone") = Personnel_PhoneTextBox.Text
.Item("Client_Value") = Client_ValueTextBox.Text
.Item("Client_Added by") = Added_byTextBox.Text
.Item("Date_added") = Date_AddedDateTimePicker.Value
.Item("Time_added") = Time_AddedDateTimePicker.Value
End With
Try
Dim save As New OleDbCommandBuilder(clientsDA)
clientsDA.Update(clientsDT)
clientsDT.AcceptChanges()
MsgBox("Data Saved Successfully")
load_clients()
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
End Sub
this error I get whenever I tried to manipulate the database whether by updating or adding new data. please find attached, the error I always get exception error
Client_IDTextBox