以文本方式查看主题

-  易表在线答疑  (http://www.egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://www.egrid2000.com/dvbbs/list.asp?boardid=2)
----  [求助]请看一下录入窗口“备份设置”的公式。  (http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=3587)
--  作者：Andyguobao
--  发布时间：2006/8/31 11:55:00
--  [求助]请看一下录入窗口“备份设置”的公式。
egd文件下载

请达人看一下录入窗口“备份设置”的公式。为什么备份文件名显示不出来用户自定义的呢？

--  作者：yangming
--  发布时间：2006/8/31 12:14:00
--  
BackupFile([%备份盘符%]+":\\" +[%备份文件名%] + ".egd")andMsgBox("已经备份到:"+[%备份盘符%]+":\\" +[%备份文件名%] + ".egd",0)
--  作者：wanjunqing
--  发布时间：2006/8/31 13:46:00
--  
表达式设计估计有问题，看看2楼的公式
--  作者：家明
--  发布时间：2006/8/31 14:02:00
--  
表达式变量：
%备份文件名%＝GetFileName("系统数据文件|*.egd","系统-数据手工备份",1)

命令：
If(MsgBox("手动备份用户数据,开始执行？",2,2) = True ,
If(Status=1,msgbox("系统正在存盘!",1,4),save()) And BackupFile([%备份文件名%] ) And MsgBox("用户数据备份完成!",1,3) ,
MsgBox("备份已被取消!请注意定期备份用户数据!",1,3))egd文件下载

-=-=-=- 以下内容由 家明 在 2006年08月31日 02:04pm 时添加 -=-=-=-
用这函数 GetFileName（）获取文件名不是更简单明白？

--  作者：Andyguobao
--  发布时间：2006/8/31 17:42:00
--  
学习了，谢谢达人们！