在访问中插入语法错误答案

【问题标题】：Insert into syntax error in access在访问中插入语法错误
【发布时间】：2016-06-12 17:25:47
【问题描述】：

我正在尝试通过 sql insert into 语句将文本框信息添加到表中。不幸的是，我收到了一条语法错误消息。请帮我检查格式。我的代码是：

Private Sub cmdSaveRecord_Click()
  Dim StrSql As String
   StrSql = "Insert Into test2 (PurchaseDate, SupplierCompany, PurchaseItem, Unit, PurchaseQuantity, UnitCost, ExtendedPrice)" & _
          " VALUES(#" & Format(Me!txtOrderDate, "yyyy/mm/dd") & "#, '" & Me!cboSupplierCompany & "', '" & Me!cboPurchaseItem1 & "', '" & Me!txtUnit1 & "'," & CStr(Me!txtQty1) & ", ," & CStr(Me!TxtPrice1) & ", " & CStr(Me!TxtTotal1) & " )"
CurrentDb.Execute (StrSql)
MsgBox " You have successfuly add one record to PurchaseOrderDetail table."

End Sub

【问题讨论】：

可以在执行前打印语句并在这里分享结果吗？

标签： sql ms-access textbox

【解决方案1】：

值中有一个空列

  "Insert Into test2 (
    PurchaseDate
    , SupplierCompany
    , PurchaseItem
    , Unit
    , PurchaseQuantity
    , UnitCost
    , ExtendedPrice
    )" & _
      " VALUES(
      #" & Format(Me!txtOrderDate, "yyyy/mm/dd") & "#
      , '" & Me!cboSupplierCompany & "'
      , '" & Me!cboPurchaseItem1 & "'
      , '" & Me!txtUnit1 & "'
      ," & CStr(Me!txtQty1) & "
      ,                       <----- here
      ," & CStr(Me!TxtPrice1) & "
      , " & CStr(Me!TxtTotal1) & " )"

删除它

  "Insert Into test2 (
    PurchaseDate
    , SupplierCompany
    , PurchaseItem
    , Unit
    , PurchaseQuantity
    , UnitCost
    , ExtendedPrice
    )" & _
      " VALUES(
      #" & Format(Me!txtOrderDate, "yyyy/mm/dd") & "#
      , '" & Me!cboSupplierCompany & "'
      , '" & Me!cboPurchaseItem1 & "'
      , '" & Me!txtUnit1 & "'
      ," & CStr(Me!txtQty1) & "
      ," & CStr(Me!TxtPrice1) & "
      , " & CStr(Me!TxtTotal1) & " )"

【讨论】：

谢谢，ScaisEdge。正如你所暗示的那样，我在语句中错误地输入了一个额外的“，”。