MySQL服務器版本正確的語法使用近「」，2016年1月13' 日，‘2016年1月14日’第1行

Question

Private Sub btnIssue_Click (sender As System.Object, e As Syste.EventArgs) Handles btnIssue_Click 

    Try 
    Dim dbquery As String = "insert into tblIssued 
      values (" & cmbBookId.SelectedText & ",' " & 
          cmbIssueto.SelectedText & " ',' " & 
          txtIssuedDate.Text & " ',' " & 
          datepickerduedate.Text & " ') " 
    Dim dbConnection As New MysqlConnection(dbconstring) 
    Dim dbCmd As New MySqlCommand(dbquery,dbCOnnection) 
    Dim dbReader As MySqlDataReader 
    dbConnection.Open() 
    dbReader = dbCmd.ExecuteReader() 
    MsgBox("Issued") 

Answer 1

您需要提供的列名）」，以及像

insert into tblIssued(col1,col2,col3,col4) 
values(value1,value2,value3,value4) 

所以你的情況會像

Dim query As String = "insert into tblIssued(Bookid,Idno,Issuedate,Duedate)  
       values (@Bookid,@Idno,@Issuedate,@Duedate)" 
Dim command As New SqlCommand(query, conn) 
command.Parameters.Add("@Bookid", SqlDbType.Int).Value = Convert.toInt32(cmbBookId.SelectedText) 
command.Parameters.Add("@Idno", SqlDbType.Int).Value = Convert.toInt32(cmbIssueto.Text) 
command.Parameters.Add("@Issuedate", SqlDbType.DateTime).Value = txtIssuedDate.Text 
command.Parameters.Add("@Duedate", SqlDbType.DateTime).Value = datepickerduedate.Text