i cant find the problem can anyone help me pls???
If userNameTextBox.Text <> "" Then
Dim sqlQRY As String = "INSERT INTO SalesOrder Values ('" & salesNoTextBox.Text & "', '" & orderDateTextBox.Text & "', '" & userNameTextBox.Text & "', '" & productCodeTextBox.Text & "', '" & quantityTextBox.Text & "')"
Try
conn.Open()
Dim cmd As OleDbCommand = New OleDbCommand(sqlQRY, conn)
cmd.ExecuteNonQuery()
Catch ex As OleDbException
MsgBox("Error: " & ex.ToString & vbCrLf)
Finally
conn.Close()
End Try
saveButton.Enabled = False
Else
MsgBox("Please select customer")
userNameTextBox.Focus()
End If