关于程序备份的问题

jlsxux

关于程序备份的问题

关于程序备份我是这样解决的，但还存在问题提出来和大家讨论。

我有一个工资程序，安装在e:\gz\gz.mdb,在gz文件夹下还建了一个bf文件夹用来备份gz.mdb程序的，另外还写了一个批处理文件a.bat也在gz文件夹下,a.bat是这样写的：echo off

copy e:\gz\gz.mdb e:\gz\bf

在gz.mdb程序的窗体上（随便那个窗体）有一个命令按钮叫“备份”，单击此按钮时执行一个宏runapp,这个宏的命令行是这样写的：

e:\gz\a.bat,通过这个宏就可以把gz.mdb随时拷贝到bf文件夹中，实现了程序和数据的备份功能。

用此方法虽然可以实现备份，但如果用户把程序更改了路径，那么runapp宏就找不到a.bat文件的路径了，也就不能执行了。

我的问题是程序安装在任何路径都可以随时进行备份，请大家讨论一下，想出一个简单且实用的方法来实现程序的备份。

静儿

代码：CurrentProject.Path能够读取当前mdb文件所在的目录。用filecopy命令能够进行文件复制，不需要外部的bat文件。

jltjgyc

照上例，我在gz.mdb的备份按钮中写了如下代码：

Dim lj1, lj2 As String

lj1 = CurrentProject.Path+ "\GZ.mdb"

lj2 = CurrentProject.Path + "\bf"

FileCopy lj1, lj2运行时提示：拒绝的权限，并不能拷贝到指定的文件夹下

风筝

如果想要对一个已打开的文件使用 FileCopy 语句，则会产生错误。一般的，将数据库拆分后，从前端程序运行命令复制后端文件就没有问题。