我正在按照我在网上可以看到的所有说明进行操作,包括MSDN:https : //msdn.microsoft.com/zh-cn/library/ms233819.aspx
不幸的是,无论我更改多少代码,它始终会向我返回一个错误:“ System.Data.dll中发生了类型'System.Data.OleDb.OleDbException'的第一次机会异常”,并且更新未完成。这是我的代码:
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim connect3 As New OleDbConnection("Provider=Microsoft.ACE.OleDb.12.0;" & "Data Source =C:\Users\Fernando\Documents\Visual Studio 2012\Projects\Agenda_DP\Agenda_DP\AgendaDP.accdb")
connect3.Open()
Dim cmd3 As OleDbCommand = connect3.CreateCommand()
cmd3.CommandText = "UPDATE Temas SET [Numero] = @p1, [Tema] = @p2, [Observacoes] = @p3 WHERE [Numero] = @1"
cmd3.Parameters.AddWithValue("@p1", Me.ComboBox1.Text)
cmd3.Parameters.AddWithValue("@p2", Me.ComboBox2.Text)
cmd3.Parameters.AddWithValue("@p3", Me.TextBox3.Text)
cmd3.ExecuteNonQuery()
connect3.Close()
End Sub
我不明白为什么会这样。
有没有发生过这件事?您是如何解决的?谁能帮我解决这个问题?
使用时System.Data.OleDb
,参数纯粹是位置性的,它们的名称无关紧要。因此,您不能两次使用相同的参数名称,而.Add
只能使用一次。您将不得不.Add
两次。
但是,在您的情况下,您的WHERE子句中包含[Numero],因此无需设置其值。你可以做
cmd3.CommandText = "UPDATE Temas SET [Tema] = ?, [Observacoes] = ? WHERE [Numero] = ?"
cmd3.Parameters.AddWithValue("?", Me.ComboBox2.Text) ' Tema
cmd3.Parameters.AddWithValue("?", Me.TextBox3.Text) ' Observacoes
cmd3.Parameters.AddWithValue("?", Me.ComboBox1.Text) ' Numero
cmd3.ExecuteNonQuery()
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句