我用的是vb6.0+ado+access 数据库都联接都设置好了!我想一次性删除一个.mdb中的所有记录.代码如下:Private Sub Command1_Click()Adodc1.Recordset.MoveFirstFor i = 1 To Adodc1.Recordset.RecordCount If Adodc1.Recordset.EOF() Then Exit For Else Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext End If Next iEnd Sub

热心网友

用SQL语句命令更快 定义一个COMMAND对象, 假定数据表名称 data_list执行SQL命令 "delete from data_list where 1"成功后就可以删除指定表的所有数据,

热心网友

楼上说的对.但是为什么不用ADO为直接删除表内数据呢?你只需要一条语句即可.上面的代码效率不高.如果记录过多的话就会变的很慢很慢....

热心网友

For i = 1 To Adodc1.Recordset.RecordCount上句有错,Ado数据记录第一条标记为0,应为:For i = 0 To Adodc1.Recordset.RecordCount-1