Can someone help me....i cant insert my data from combobox into database....
Private Sub btnRegister_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRegister.Click
Dim objConn As OleDbConnection = New OleDbConnection(ConnectionString)
objConn.Open()
Dim MySQLCommand As OleDbCommand = New OleDbCommand()
'Building SQL INSERT statement
insertSQL = "INSERT INTO [register](courseCode,courseName,category)"
insertSQL = insertSQL & "Values"
insertSQL = insertSQL & "(" & ComboBox1.SelectedIndex & ",'" & ComboBox2.SelectedIndex & "','" & ComboBox3.SelectedIndex & "')"
' (" & CInt(TextBox1.Text) & ",'" & TextBox2.Text & "','" &_
'TextBox3.Text & "')"
MySQLCommand.CommandText = insertSQL
MySQLCommand.Connection = objConn
MySQLCommand.ExecuteNonQuery()
'objConn.Close()
MySQLCommand.Dispose()
objConn.Close()
End Sub
End Class