每月自动备份数据.prg

通用题库组卷系统 1.本来是一个学生的本科毕业课题

*para C_bk_标题,C_bk_目标路径,C_bk_项目名称,C_bk_源路径
*close data
***************************把检查口令语句放到外面来，使压缩模块独立性更好
*pub检测口令=.f.
*do form 回答口令
*if .not. pub检测口令
*  return .f.
*endif
***************************把检查口令语句放到外面来结束
C_bk_标题="银行系统数据备份"
c_bk_目标路径="C"
C_bk_项目名称="银行系统数据备份"  &&这时备份存盘时的目录名称
C_bk_源路径="data\main"
do form 万能压缩备份 with C_bk_标题,C_bk_目标路径,C_bk_项目名称,C_bk_源路径,"每月自动备份"