标题VFP中备份大量数据
栏目软件世界
作者刘建中
发布1999年第42期13版
在实践中,我摸索出一种比较简单的方法来实现VFP中大量数据的备份,该方法利用DOS下的共享程序arj.exe的多盘备份命令来实现。我所编的两个文件的代码,一个是Getdata.prg文件,用于备份数据;一个是Recdata.prg,用于恢复数据。程序中假定数据备份成labor.arj文件。
1.*Getdata.prg=messagebox("请准备好软盘",48)
x=file("arj.exe")
if x=.t.
x1="run arj.exe a -vavw a:\labor data"
&x1
=messagebox("数据备份完成!",48)
else
=messagebox("系统文件丢失,数据备份失败!",48)
endif
retu
2.*Recdata.prg
=messagebox("请准备好软盘",48)
x=file("arj.exe")
if x=.t.
if file("a:\labor.arj")
x1="run arj.exe x -v -r a:\labor"
&x1
=messagebox("数据还原完成!",48)
else
=messagebox("无源数据!",48)
endif
else
=messagebox("系统文件丢失,数据还原失败!",48)
endif
retu
以上程序在VFP5.0环境下调试通过。