执行OleDb INSERT INTO语句报语法错误（OleDbException）如何解决

数据老陈

2026-8-28

报错根因

你的INSERT语句触发语法错误由3个明确问题导致：

字段列表缺分隔逗号：插入字段定义中，WAmount与后续字段Drink之间未添加逗号，SQL解析器无法识别字段边界
值部分单引号完全错位：首个值lbldt.Text前只写了单引号开头，值末尾未加单引号闭合，后续所有传入值都被错误包裹在同一个单引号范围内，完全不符合SQL语法规则
直接拼接前端输入文本生成SQL的写法本身存在严重缺陷，哪怕修复前两个语法错误，后续遇到输入内容带单引号、日期/数值格式和数据库要求不匹配的场景，依然会触发报错，还存在SQL注入风险

修复代码

直接改用参数化查询实现，从根源规避语法错误、类型匹配和安全问题，可直接替换原有逻辑：

' Using块会自动释放关闭数据库连接，无需手动写conn.Close()
Using conn As New OleDbConnection("替换为你自己的数据库连接字符串")
    conn.Open()
    Dim cmd = conn.CreateCommand()
    cmd.CommandType = CommandType.Text
    ' 补全WAmount和Drink之间的缺失逗号，用?作为OleDb参数占位符（OleDb按参数顺序匹配，不按参数名匹配）
    cmd.CommandText = "INSERT INTO Salestracker (SDate, Waakye, Salad, Gari, Spaghetti, Fish, Chicken, Sausage, Egg, Beef, Water, WAmount, Drink, DAmount, DrinksSold, TotalCostOfMeal, TotalCostOfDelivery, SubTotal, Tax, TotalAmount) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"

    ' 严格按照字段顺序传入参数，对应类型做显式转换，避免隐式类型转换错误
    cmd.Parameters.AddWithValue("?", DateTime.Parse(lbldt.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtwaakye.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtsalad.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtgari.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtspag.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtfish.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtchicken.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtsausage.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtegg.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtbeef.Text))
    cmd.Parameters.AddWithValue("?", CmbWater.Text)
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtWAmount.Text))
    cmd.Parameters.AddWithValue("?", CmbDrink.Text)
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtDAmount.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtDrinksSold.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtTotalCostOfMeal.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtTotalCostOfDelivery.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtSubTotal.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtTax.Text))
    cmd.Parameters.AddWithValue("?", Decimal.Parse(txtTotalAmount.Text))

    cmd.ExecuteNonQuery()
End Using

注意事项

如果你的输入控件允许为空值，不要直接用Parse方法做转换，先做非空校验，或改用TryParse方法避免转换失败触发新报错
OleDb的参数必须和SQL语句中定义的字段顺序严格一致，顺序错位会导致值匹配错误
所有数据库操作场景都不推荐用字符串拼接生成SQL，参数化是规避这类语法错误、安全问题的标准方案

内容的提问来源于stack exchange，提问作者8A1M1n