Question

如何清空vfp数据库内容

如何清空vfp数据库内容，表很多，我想保持表的结构把里面的内容全部清空，知道的指点一下。

Answer 1

要一个一个的表清空，例如：
use 表A
ZAP

搜索到一个小程序，你可以试试看：
use database.doc
copy to array _arr field objectname for alltrim(objecttype)="Table"
use
for i=1 to alen(_arr)
g=alltrim(_arr[i])
use (g) exclusive
zap
use
endfor