使用ADODB命令真正删除MS Access数据库的条目

Question

我想删除访问表的行。 因此，我将VBA与ADODB命令对象一起使用。

问题是查询没有真正删除行，而是将ID以外的所有值都设置为0 /“”

我在做错什么还是要真正删除该条目我需要做什么？

先感谢您！

码：

Dim db1 As ADODB.Connection
Dim db_data As ADODB.Recordset
Dim cmd As ADODB.Command

...'Code to build up Connection'

Set cmd = New ADODB.Command

cmd.ActiveConnection = db1
cmd.CommandText = "DELETE FROM TableXY WHERE FieldXY = ValueXY"
Set db_data = cmd.Execute

Answer 1

尝试显式删除所有内容：

cmd.CommandText = "DELETE * FROM TableXY WHERE FieldXY = ValueXY"

您也可以跳过将其分配给记录集的方法： cmd.Execute而不是Set db_data = cmd.Execute 。

请注意，我无法复制您的问题。

Answer 2

ValueXY必须具有一个值：

ValueXY = SomeValue
cmd.CommandText = "DELETE FROM TableXY WHERE FieldXY = " & ValueXY & ""

或者，如果是文字：

cmd.CommandText = "DELETE FROM TableXY WHERE FieldXY = '" & ValueXY & "'"

Answer 3

您可以简单地执行此操作，而无需使用命令：

Dim db1 As New ADODB.Connection
db1.ConnectionString = "your connection string here"
db1.Open
db1.Execute "DELETE FROM TableXY WHERE FieldXY = ValueXY"
db1.Close