VB.NET中UPDATE语句提示缺少参数问题求助

我用VB.NET开发，需将SIQPERSIST表中BatchName等于文本框输入值BatchName2的所有行的Date_Added字段更新为当前日期，编写的代码如下：

Using con As New OleDbConnection(constring)
    Using cmd As New OleDbCommand("UPDATE " & "`" & "SIQPERSIST" & "`" & " SET [Date_Added] = @Date_Added WHERE [BatchName] = @BatchName", con)
        cmd.Parameters.AddWithValue("@BatchName", BatchName2)
        cmd.Parameters.AddWithValue("@Date_Added", Date.Now.ToShortDateString)

        con.Open()
        cmd.ExecuteNonQuery()
        con.Close()
    End Using
End Using

运行时提示缺少参数，但逻辑相似的代码（WHERE子句使用KEY='keynumber'）可正常运行，请求排查问题原因。

问题原因与解决办法 #

核心原因：OleDb参数绑定顺序不匹配 #

OleDb不支持按参数名称匹配绑定，而是严格按照SQL语句中参数出现的顺序来对应代码里添加的参数。你的SQL语句中，@Date_Added先出现，@BatchName后出现，但代码里先添加了@BatchName，再添加@Date_Added，顺序颠倒导致OleDb无法正确匹配参数，触发“缺少参数”错误。

其他优化点 #

1. 表名语法错误：SQL语句中给表名加的反引号是MySQL专属语法，OleDb（适配Access等数据库）不需要，改成[SIQPERSIST]`的方括号格式更规范，避免语法解析异常。
2. 日期类型转换问题：用Date.Now.ToShortDateString将日期转为字符串，不同系统区域格式可能导致数据库无法识别，直接传递Date.Now（DateTime原生类型），让OleDb自动处理类型转换更可靠。
3. 冗余的连接关闭：Using块会自动管理连接的生命周期，手动调用con.Close()是多余的，可以删除。

修正后的代码 #

Using con As New OleDbConnection(constring)
    Using cmd As New OleDbCommand("UPDATE [SIQPERSIST] SET [Date_Added] = @Date_Added WHERE [BatchName] = @BatchName", con)
        ' 严格按照SQL语句中参数出现顺序添加
        cmd.Parameters.AddWithValue("@Date_Added", Date.Now)
        cmd.Parameters.AddWithValue("@BatchName", BatchName2)

        con.Open()
        cmd.ExecuteNonQuery()
    End Using
End Using

内容的提问来源于stack exchange，提问作者Andy Andromeda