Foxtable(狐表)用户栏目专家坐堂 → 项目定义了在线升级地址 怎么实现先判断在线升级地址是否可以正常使用 在进行系统升级,升级完后自动重新启动系统!


  共有3944人关注过本帖平板打印复制链接

主题:项目定义了在线升级地址 怎么实现先判断在线升级地址是否可以正常使用 在进行系统升级,升级完后自动重新启动系统!

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


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
项目定义了在线升级地址 怎么实现先判断在线升级地址是否可以正常使用 在进行系统升级,升级完后自动重新启动系统!  发帖心情 Post By:2022/5/11 9:56:00 [只看该作者]

项目定义了在线升级地址   怎么实现先判断在线升级地址是否可以正常使用  在进行系统升级,升级完后自动重新启动系统!

当服务器关闭的时候会提示如下:

 

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.1.30.2
错误所在事件:在线升级失败!
详细错误信息:
无法连接到远程服务器
由于连接方在一段时间后没有正确答复或连接的主机没有反应,连接尝试失败。 192.168.110.235:8088

 

有没有办法  用代码判断呢?

当在线升级地址无法链接的时候就不升级  反之就升级

 

当前在项目启动完后的代码如下:没有达到预期

Dim ipFile As String = ProjectPath & "\Attachments\ip.txt"
If Filesys.FileExists(ipFile) Then
    Dim ip As String = FileSys.ReadAllText(ipFile)
    If TryConnectHost(ip) = True Then
        If Syscmd.Project.Update(False,False) = False Then '如果没有升级
            MainTable=Tables("表a")
            TableCaptionVisible = False
            Forms("会议系统").open
        Else  '如果升级成功
            Syscmd.Project.Open(ProjectFile)
        End If
    End If
End If

 

 


 回到顶部