Question

这是我的代码。

Dim cmd As MySqlCommand
    Try
        Dim da As New MySqlDataAdapter
        Dim ds As New DataSet
        cmd = New MySqlCommand("INSERT INTO maleintventoty(item_brad,item_size,item_quantity,item_description) VALUES(@item_brad,@item_size,@item_description,@item_quantity)", con)
        cmd.Parameters.AddWithValue("@item_brand", brandtxt.Text)
        cmd.Parameters.AddWithValue("@item_size", sizetxt.Text)
        cmd.Parameters.AddWithValue("@item_description", descriptiontxt.Text)
        cmd.Parameters.AddWithValue("@item_quantity", quantitytxt.Text)
        cmd.ExecuteNonQuery()
        MsgBox("Done")
        brandtxt.Clear()
        descriptiontxt.Clear()
        quantitytxt.Clear()
    Catch ex As Exception
       Dim da As New MySqlDataAdapter
        Dim ds As New DataSet
        cmd = New MySqlCommand("INSERT INTO maleintventoty(item_brad,item_size,item_quantity,item_description) VALUES(@item_brad,@item_size,@item_description,@item_quantity)", con)
        cmd.Parameters.AddWithValue("@item_brand", brandtxt.Text)
        cmd.Parameters.AddWithValue("@item_size", sizetxt.Text)
        cmd.Parameters.AddWithValue("@item_description", descriptiontxt.Text)
        cmd.Parameters.AddWithValue("@item_quantity", quantitytxt.Text)
        cmd.ExecuteNonQuery()
        MsgBox("Done")
        brandtxt.Clear()
        descriptiontxt.Clear()
        quantitytxt.Clear()
    End Try
End Sub

Answer 1

您是否只是复制粘贴代码？如果是，那么错误可能是因为一个错字。

在您的查询中，您有“@item_brad”，当您设置其值时，您有“@item_brand”。

Answer 2

请检查您的参数值名称。这是不正确匹配的。在您的查询中，您有＆＃34; @ item_brad＆＃34;，当您设置其值时，您有＆＃34; @ item_brand＆＃34;。

发生MySqlException：在命令执行期间遇到致命错误

2 个答案: