以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  内网升级路径问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=146001)

--  作者:sloyy
--  发布时间:2020/2/13 22:47:00
--  内网升级路径问题
我的系统在外网开发,在内网使用,通过设置 BeforeConnectOuterDataSource
If e.Name = "DL" Then
     If TryConnectHost("www.baidu.com") = False  Then \'如果无法解析
        e.ConnectionString = e.ConnectionString.Replace("218.158.258.198,8888", "172.16.2.27")
    End If
End If
完美解决了内外网数据源切换问题,但是升级路径设置的是内网的ip地址 :


图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图20200213223823.png
图片点击可在新窗口打开查看

有个问题:每次在外网调试时,都会停顿很长时间,然后弹出错误提示:


图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图20200213223636.png
图片点击可在新窗口打开查看

这个问题有办法解决吗?



--  作者:有点蓝
--  发布时间:2020/2/14 9:32:00
--  
方法1、发布到内网使用的时候再改升级路径
2、使用代码设置

比如afteropenproject事件

If TryConnectHost("www.baidu.com") = False  Then \'如果无法解析
    UpdatePath = "http://172.16.2.27"
End If
If Syscmd.Project.Update(False,False) = False Then \'如果没有升级
    \'原AfterOpenProject事件代码
End If

-------

和远程升级相关的系统变量

  • PublishDate
    日期型变量,返回在项目属性中设置的项目发布日期。
     
  • UpdatePath
    字符型,用于设置或返回在线升级路径,有了这个变量,我们可以动态设置升级路径。

--  作者:sloyy
--  发布时间:2020/2/14 23:09:00
--  
谢谢,一段时间没学习,落后了。没注意还有这两个参数