Question

我试图将此Update命令传递给数据库，它完成没有错误，但它没有更新数据库，我不明白为什么？

    Dim Cmd As OleDbCommand
    Dim SQL As String
    Dim objCmd As New OleDbCommand

    Dim Con = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Settings.MasterPath)
    Dim Item = "08/08/2015"


            SQL = ("UPDATE [Hol Dates] SET [" & EmployeeList.Text & "]= @Htype WHERE [HDate]=@Hdate")

    Cmd = New OleDbCommand(SQL, Con)
    objCmd = New OleDbCommand(SQL, Con)
    objCmd.Parameters.AddWithValue("@Hdate", item)
    objCmd.Parameters.AddWithValue("@Htype", "None")
    Con.Open()
    Dim ans = MsgBox("Do you want to unbook this holiday?", MsgBoxStyle.YesNo)

    If ans = MsgBoxResult.Yes Then
        objCmd.ExecuteNonQuery()
    Else
        Exit Sub
    End If

    Con.Close()
    Con.Dispose()

Answer 1

您需要反转将参数添加到OleDbCommand对象的顺序。 OleDb允许我们为参数指定名称，但忽略名称，只关注 order ，其中参数出现在CommandText中。

因此，由于您的SQL语句引用Htype然后引用Hdate，您需要以相同的顺序添加参数。

.NET OleDb参数化查询无法按预期工作

1 个答案: