如何删除一张表中的原有记录

Question

我用的是ADODC + DataGrid来显示的，要怎样才能一次删除表里的所有记录。

Answer 1

引用ADO("工程"/"引用"/Microsoft ActiveX Data Object 2.X Library)
Private Sub Command1_Click()
    Dim cn As New ADODB.Connection
    cn.ConnectionString = Adodc1.ConnectionString
    cn.Open
    cn.Execute ("delete from 表")
    cn.Close
    Set cn = Nothing
End Sub如果你一定要用Adodc来做，只能用循环来删除了

Answer 2

还有好点的办法吗，我已经用ADODC来做了，现在不能改了，有什么好的方法可以删除我用用过循环,但不成功，大家能给点代码吗？

Answer 3

有：
ADODC1.Recordset.ActiveConnection.Execute "DELETE FROM tablename"