怎么用ADO删除Access数据库中的指定记录

Question

如题所述

Answer 1

有两种办法：

1、通过SQL语句删除：
SQL 有专门的删除查询，格式为：
Delete from [表名称] where [条件]
例如删除女同学的成绩：Delete from 成绩单 where [性别]= "女"
以上是SQL的用法，如果在vb中使用，就在前面加上“DoCmd.RunSQL”就可以了。
DoCmd.RunSQL "Delete from 成绩单 where [性别]= '女' "

2、通过ADO实现
首先用ADO建立与数据库的链接：

Dim rs As New ADODB.Recordset
rs.open " 数据表名称", CurrentProject.Connection, , adLockOptimistic
然后遍历所有数据，删除符合条件的项目：
rs.movefirst ---------跳到第一个数据
While rs.EOF = False -------设定循环条件
if rs![条件字段] = **** then rs.Delete ---------删除符合条件的记录
rs.movenext ----------跳跃到下一条记录
wend ---------结束循环
两种方法相比，第一种方法速度更快，效率更高。