如何一次删除一个表中的所以内容，而不删除表，即如何一次清空一个表

Question

dim cn as new adodb.connection
dim cust as new adodb.recordset
cn.open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" + App.Path  _
+ " \info1.mdb';Persist Security Info=False"
cust.open"select * from todaydata(数据库中的表名)", _ cn,adOpenKeyset,adLockOptimistic
Do While Not cust1.EOF And Not cust1.BOF 
'每次检查扭矩值记录先做一次清空
          cust1.Delete
          cust1.Update
          cust1.MoveNext
Loop
如果数据库中有很多的数据的时候，删除数据就非常的慢。我想大家一定有好的方法如：一次清空一个表中的内容。

Answer 1

cn.execute "delete from 表名"

Answer 2

access 好像要用
cn.execute("delete * from 表名")

Answer 3

cn.execute "delete from 表名"
cn为ADODB.Connection对象

Answer 4

谢谢大家的 关注
不 知道cn.execute("delete * from 表名")删除 的 速度快不 快呀

Answer 5

也可以cn.execute运行"drop table 表名"语句删除原表,再运行SQL语句生成一个空的表

Answer 6

to viena(晓琴) 
你好：
你能不能给我一个例子
先谢谢了

Answer 7

rs.open"delete from tablename",ado_cnn,adopenkeyset,adlockoptimistic

Answer 8

建表SQL语句：方括号中为可选内容（视需要而定）not null不允许空值
create table table_name( column1 datatype [not null] [not null primary key], column2 datatype [not null],...）

Answer 9

to viena(晓琴)
  我用的是ACCESS数据库。