Question

我有这两个sql语句。但是在执行时，它会在INSERT INTO语句中显示“语法错误。”

Dim sqlString As String
        sqlString = "INSERT INTO CreditCardRecord(CustomerEmail, CardholderName, 
                     CreditCardNo, CCExpMonth, CCExpYear, CVCNo, CardIssuingBank, 
                     Amount) VALUES ('" & Master.cEmailDOnMasterPage & "','" & 
                     cardholderName & "','" & creditCardNo & "','" & ccExpMonth & "',
                     '" & ccExpYesr & "','" & cvc & "','" & cardIssuingBank & "',
                     '" & totalamount & "')"
        Dim sqlcommand As New OleDbCommand(sqlString, db)
        sqlcommand.ExecuteNonQuery()

Dim customerRervation As String
        customerRervation = "INSERT INTO CustomerReservation(CustomerEmail, 
                             CustomerFN, CustomerLN, CustomerIdentityCard, 
                             CustomerPhoneNo, Package, Table, Amount, BookingDate)  
                             VALUSE ('" & Master.cEmailDOnMasterPage & "',
                             '" & customerFN & "','" & customerLN & "',
                             '" & customerIC & "','" & customerPhoneNo & "',
                             '" & lblShowPackage.Text & "','" & lblShowTable.Text & 
                             "','" & totalamount & "','" & lblShowDate.Text & "')"
       Dim sqlcommand2 As New OleDbCommand(customerRervation, db)
        sqlcommand2.ExecuteNonQuery()

Answer 1

第二个SQL查询语句中的问题。你错误地将VALUES拼写为VALUSE。所以不要使用VALUSE，而是使用VALUES。

Dim customerRervation As String
        customerRervation = "INSERT INTO CustomerReservation(CustomerEmail, 
                             CustomerFN, CustomerLN, CustomerIdentityCard, 
                             CustomerPhoneNo, Package, Table, Amount, BookingDate)  
                             VALUES ('" & Master.cEmailDOnMasterPage & "',
                             '" & customerFN & "','" & customerLN & "',
                             '" & customerIC & "','" & customerPhoneNo & "',
                             '" & lblShowPackage.Text & "','" & lblShowTable.Text & 
                             "','" & totalamount & "','" & lblShowDate.Text & "')"
       Dim sqlcommand2 As New OleDbCommand(customerRervation, db)
        sqlcommand2.ExecuteNonQuery()

Answer 2

只需添加[]即可

将customerRervation视为字符串 customerRervation =“INSERT INTO CustomerReservation（[CustomerEmail]， [CustomerFN]，[CustomerLN]，[CustomerIdentityCard]， [CustomerPhoneNo]，[Package]，[Table]，[Amount]，[BookingDate]）
VALUES（'＆quot; Master.cEmailDOnMasterPage＆amp;''， '“＆amp; customerFN＆amp;”'，'“＆amp; customerLN＆amp;”'， '“＆amp; customerIC＆amp;”'，'“＆amp; customerPhoneNo＆amp;”'， '＆amp; lblShowPackage.Text＆amp;“'，'”＆amp; lblShowTable.Text＆amp; “'，'”＆amp; totalamount＆amp; “'，'”＆amp; lblShowDate.Text＆amp; “'）” Dim sqlcommand2 As New OleDbCommand（customerRervation，db） sqlcommand2.ExecuteNonQuery（）

我怎样才能使用2 INSERT INTO语句来存储不同的数据

2 个答案: