如何一次删除一个表中的所以内容,而不删除表,即如何一次清空一个表
flc 2003-09-15 02:42:37 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
如果数据库中有很多的数据的时候,删除数据就非常的慢。我想大家一定有好的方法如:一次清空一个表中的内容。