vb.net從訪問數據庫中刪除

Question

我試圖僅單擊按鈕即可從訪問數據庫中刪除數據。但是無法使其正常工作。

Dim Cmd2 As OleDbCommand
Dim SQL2 As String
Dim objCmd2 As New OleDbCommand
Dim Con2 = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Privat\dreamware\dreamware_db.mdb")
SQL2 = "DELETE FROM dreamware_db WHERE id='21'"
Cmd2 = New OleDbCommand(SQL2, Con2)
Con2.Open()
objCmd2 = New OleDbCommand(SQL2, Con2)
objCmd2.ExecuteNonQuery()
Con2.Close()

有人可以發現錯誤嗎？

Answer 1

我寫你的方法沒有錯誤：

Dim SQL As String
Dim objCmd As OleDbCommand
Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Privat\dreamware\dreamware_db.mdb")

SQL = "DELETE FROM dreamware_db WHERE id='21'"

Con.Open()
objCmd = New OleDbCommand(SQL, Con)
objCmd.ExecuteNonQuery()
Con.Close()