VB6.0中如何实现清空数据库内容？？

假如用一个按钮，ADO控件，怎样实现清空数据库内容？？？

ADO去执行SQL语句 delete from table;

详细应用可以这样

首先引用一下ADO控件，或者在部件上添加ADO控件，这样就会自动引用

然后下一步

定义ADO控件

将ADO控件连接到数据源

再定义一个SQL语句，即是delete from table

下一步就当然是执行这一句SQL语句了吧

好了，删除完成

详细应用代码

dim conn as new ADODB.Connection

connstring="provider=microsoft.jet.oledb.4.0;data source =" & app.path & ("/数据源路径")

conn.Open connstring

conn.execute "Delete from Table"

msgbox "内容已经清除完毕"

conn.close

如果还有什么不明白的，欢迎继续追问

dim cn as new ADODB.Connection

cn.connectionstring="一个数据库的连接字符串，可以读自ADODC控件的这个属性"

cn.Open

cn.execute "Delete from Table"

cn.close

用 OLEDB 方式连接数据库，执行 SQL 语句，这样控制方便快捷。最好不要用VB6自带的那个数据库控件，操作倒是省事，但是功能实在太怪异，不合用。