内网升级路径问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 内网升级路径问题

共有3476人关注过本帖树形打印复制链接主题：内网升级路径问题

sloyy

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

等级：九尾狐帖子：2193 积分：13908 威望：0 精华：2 注册：2012/2/25 10:59:00

内网升级路径问题 发帖心情

Post By：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

完美解决了内外网数据源切换问题,但是升级路径设置的是内网的ip地址 :

此主题相关图片如下：搜狗截图20200213223823.png

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

此主题相关图片如下：搜狗截图20200213223636.png

这个问题有办法解决吗?

有点蓝

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

等级：超级版主帖子：110790 积分：563882 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：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

-------

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

sloyy

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

等级：九尾狐帖子：2193 积分：13908 威望：0 精华：2 注册：2012/2/25 10:59:00

Post By：2020/2/14 23:09:00 [只看该作者]

谢谢，一段时间没学习，落后了。没注意还有这两个参数

主题：内网升级路径问题