[建议]升级程序的一点建议 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [建议]升级程序的一点建议

共有8724人关注过本帖树形打印复制链接主题：[建议]升级程序的一点建议

hiliuyong

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：436 积分：5082 威望：0 精华：0 注册：2012/3/27 15:33:00

[建议]升级程序的一点建议 发帖心情

Post By：2012/12/20 17:42:00 [只看该作者]

发现自动升级有一个不太如人意的地方，

我的升级包是放在自己服务器上的，

数据库是放客户服务器上的，

如果我的服务器关机，则会出现报错的界面，

最好能够实现，不过升级包服务器没有检测到，不报错，不升级。

飞

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：732 积分：5491 威望：0 精华：14 注册：2011/8/28 12:49:00

Post By：2012/12/20 17:57:00 [只看该作者]

你在升级之前ping一下自己的服务器或者用其它的方法检查服务器连接

lin_hailun

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6708 积分：34304 威望：0 精华：11 注册：2012/8/18 23:10:00

Post By：2012/12/20 21:21:00 [只看该作者]

自动更新的代码就几句，你可以自己弄，更灵活。参考。

network.DownloadFile(updatepath & "/update.zip",projectpath &"update.zip" ,"","",True,60000,True)
Dim zip As New zipFile
zip.Open( projectpath & "update.zip")
zip.Extractall(projectpath )
zip.Close()
messagebox.show("更新完成")