Foxtable(狐表) → 用户栏目 → 专家坐堂 → 每隔24小时自动备份一下项目


  共有6473人关注过本帖树形打印复制链接

主题：每隔24小时自动备份一下项目
帅哥，在线噢！
冷泉
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：393 积分：3181 威望：0 精华：0 注册：2019/4/13 16:10:00 		每隔24小时自动备份一下项目  发帖心情 Post By：2022/8/1 9:02:00 [只看该作者]

想实现每隔24小时自动备份一下项目，对着帮助改了一下代码，麻烦老师帮忙看看这样是对的吗？

Static dt As Date=Date.Today.adddays(-1) '静态变量,用于保存上次备份的时间
Dim tp As TimeSpan
tp = Date.Now - dt
If tp.TotalHours >= 24 Then '如果距离上次备份已经超过一个小时
    dt = Date.Now
    Syscmd.Project.Backup("c:\data", True) '自动备份到c:\data目录
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111427 积分：567211 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/1 9:23:00 [只看该作者]

测试有什么问题？

这种用法要电脑一直开机不能睡眠、不能关机，程序要24小时不间断一直运行。
 回到顶部
帅哥，在线噢！
冷泉
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：393 积分：3181 威望：0 精华：0 注册：2019/4/13 16:10:00 		  发帖心情 Post By：2022/8/1 10:37:00 [只看该作者]

我是想实现每天登录项目后，每天自动备份一次数据。

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111427 积分：567211 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/1 10:52:00 [只看该作者]

那就在AfterOpenProject事件直接【Syscmd.Project.Backup("c:\data", True)】就行了，搞那么麻烦干啥

 回到顶部
帅哥，在线噢！
冷泉
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：393 积分：3181 威望：0 精华：0 注册：2019/4/13 16:10:00 		  发帖心情 Post By：2022/8/1 11:00:00 [只看该作者]

AfterOpenProject事件是每次登录软件都会备份吧，如果当天登录了几次就会备份几次，我只需要当天登录，备份一次就行了

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111427 积分：567211 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/1 11:09:00 [只看该作者]

方法1、建一个内部表，记录一下备份时间，然后比较当天是否有备份过
2、使用配置（http://www.foxtable.com/webhelp/topics/1544.htm）记录备份时间，然后进行比较
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 4 次数据查询