Foxtable(狐表)用户栏目专家坐堂 → 手动升级与自动升级


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

主题:手动升级与自动升级

帅哥哟,离线,有人找我吗?
douglas738888
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
手动升级与自动升级  发帖心情 Post By:2019/2/12 17:51:00 [显示全部帖子]

请教老师,

1. 按钮点击升级,'Syscmd.Project.Update(),怎样写代码,检测到新版本升级完成后,能自动重启项目,不用手动再次打开项目

 

2. 自动升级,下面代码怎样调整,启动项目后就提示升级,而不是等到输入登录名和登录密码后才提示升级(自定义的登录窗口)

    If Syscmd.Project.Update(False,False) = True Then '如果已升级
    Application.ReStart '重新启动项目
Else
    If Syscmd.Project.Update(False,True) = False Then '如果没有升级
        Forms("主窗口").Open()
        If User.Type <> UserTypeEnum.Developer
            TableCaptionVisible = False
        End If
    End If
End If


 回到顶部
帅哥哟,离线,有人找我吗?
douglas738888
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2019/2/12 18:44:00 [显示全部帖子]

老师,第一个问题,我已经这样写代码了,如果检测后是最新版本,也自动关闭项目又重启了,

 

应该实现的是检测到,已经是最新版本就不关闭项目,如果检测到最新版本就升级,升级完成后重启。


 回到顶部
帅哥哟,离线,有人找我吗?
douglas738888
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2019/2/12 21:59:00 [显示全部帖子]

老师,您指导的代码依然未解决原来的问题,点击按钮,提示窗显示已经是最新版本,点击确定后,依然自动关闭系统又重新启动了,

 

这时点击确认,应该不关闭系统再重新启动,自然关闭提示就行了,因为此时并无执行任何升级动作。


 回到顶部