Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共60 条记录, 每页显示 10 条, 页签: [1] [2][3][4][5][6]
[浏览完整版]

标题:[分享]定时器 几句代码实现自动备份项目文件

1楼
cbt 发表于:2021/12/9 11:22:00
原理,使用定时器,执行代码,比如设置 10分钟 ,定时器使用秒为代码,所以10分钟 =600000
然后备份的目录使用 某网盘,监控自动上传到网盘!

说明:   d:\狐表自动备份配置.txt  这个文档主要是方便以后多项目使用统一配置存储路径
 
以下内容只有回复后才可以浏览


[此贴子已经被作者于2022/6/9 15:31:31编辑过]
2楼
有点蓝 发表于:2021/12/9 11:47:00
多谢分享
3楼
teng0731 发表于:2021/12/9 14:40:00
能否加一个是否为开发管理员的判定,如果是,则执行,不是的话,不执行代码
4楼
cbt 发表于:2021/12/9 15:00:00
可以的,在最前面加个判断即可

Dim file As String = ProjectFile
If file.EndsWith(".Table") = False AndAlso file.EndsWith(".foxdb") = False Then Return '已经发布后的程序不是 这2个后缀名,可以退出
If User.Type <> UserTypeEnum.Administrator Then Return '自定义 不是开发者,退出
'If User.Type <> UserTypeEnum.Administrator Then Return '不是管理员,退出
....

5楼
wky10652008 发表于:2022/6/9 16:18:00
学习
6楼
lk15502 发表于:2022/6/9 19:25:00
1233
7楼
飘过的巨蟹座 发表于:2022/6/15 0:40:00
kk
8楼
新福星 发表于:2022/6/15 6:35:00
学习
9楼
wzzhf 发表于:2022/6/15 7:51:00
谢谢分享
10楼
comfortfoot 发表于:2022/6/15 8:17:00
学习、
共60 条记录, 每页显示 10 条, 页签: [1] [2][3][4][5][6]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02734 s, 3 queries.