close data

上传代码

去里雾里  都在猜着回答你

看看8楼的话，搞清楚自己当前的需求是哪样，才能有针对性地解决问题。如果当前使用的数据表是处于不能被关闭的场合呢？如果备份的数据是往一个大数据库中追加呢？如果数据表有备注文件呢？如果数据表使用了很多外部文档（比如.JPG、.TXT之类）呢？如果备份的表要往一个备份数据库（.DBC）中灌而不是作为自由表备份，那么又如何呢？把数据库表往外导出为自由表会丢失什么东西怎么办呢？

[ 本帖最后由 TonyDeng 于 2013-1-5 00:21 编辑 ]

在按钮里输入以下功能的代码
转到你打开的表所在的别名  select <表的别名>
再          COPY  to  <备份文件的路径和文件名字>

说明你要备份的数据表文件，在你要备份前就已经加开了。在备份前你需先确定你要备份的数据表是否已经打开，如果已经打开需先关闭，才能执行大家告诉你的各种方式或者在按钮的Click代码中加入数据表是否已经打开used()函数，如果已经打开就不需要打开了，否则才能加入use 数据表名。

表已经打开的话，可以设置成当前工作区，然后用"copy to 备份文件名"的方法备份；表尚未打开，可以用"copy file 表名.dbf to 备份文件名"来备份。

if used('受压数据表')
    select 受压数据表
    SELECT * FROM 受压数据表 INTO TABLE D:\BACK\受压数据表
else
    select 0
    use 受压数据表
    SELECT * FROM 受压数据表 INTO TABLE D:\BACK\受压数据表
    use
endif

试试看