- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问一下，我今天打开之前发布的客户端之后又出现了这个问题，这个ip都已经改了呀，还有哪里呢？ 求解 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=111655)
-- 发布时间：2017/12/27 9:53:00
-- 请问一下，我今天打开之前发布的客户端之后又出现了这个问题，这个ip都已经改了呀，还有哪里呢？ 求解
请问一下，我今天打开之前发布的客户端之后又出现了这个问题，这个ip都已经改了呀，还有哪里呢？ 求解
此主题相关图片如下：qq截图20171227095024.png
-- 发布时间：2017/12/27 9:56:00
--
贴出你 BeforeConnectOuterDataSource 事件的代码。
-- 发布时间：2017/12/27 9:59:00
--
Dim ipFile As String = e.ProjectPath & "ip.txt"
If e.Name = "user" Then
If Filesys.FileExists(ipFile) Then
Dim ip As String = FileSys.ReadAllText(ipFile)
e.ConnectionString = e.ConnectionString.Replace("192.168.1.33",ip)
End If
End If
-- 发布时间：2017/12/27 10:01:00
--
这个升级路径我是直接放在检查更新里面的
此主题相关图片如下：qq截图20171227100048.png
-- 发布时间：2017/12/27 10:03:00
--
这个是ip.txt文件
此主题相关图片如下：qq截图20171227100239.png
-- 发布时间：2017/12/27 10:03:00
--
1、改成这样测试，看弹出什么。记得要发布后，拷贝到对应的电脑测试。
Dim ipFile As String = e.ProjectPath & "ip.txt"
msgbox(ipFile)
If e.Name = "user" Then
If Filesys.FileExists(ipFile) Then
Dim ip As String = FileSys.ReadAllText(ipFile)
msgbox(ip)
e.ConnectionString = e.ConnectionString.Replace("192.168.1.33",ip)
msgbox(e.ConnectionString)
End If
End If
2、正确的ip，能否直接在浏览器、资源管理器访问？如地址 \\\\192.168.1.51
-- 发布时间：2017/12/27 10:04:00
--
这个是升级路径
此主题相关图片如下：qq截图20171227100353.png
-- 发布时间：2017/12/27 10:05:00
--
以下是引用有点甜在2017/12/27 10:03:00的发言：
1、改成这样测试，看弹出什么。记得要发布后，拷贝到对应的电脑测试。
Dim ipFile As String = e.ProjectPath & "ip.txt"
msgbox(ipFile)
If e.Name = "user" Then
If Filesys.FileExists(ipFile) Then
Dim ip As String = FileSys.ReadAllText(ipFile)
msgbox(ip)
e.ConnectionString = e.ConnectionString.Replace("192.168.1.33",ip)
msgbox(e.ConnectionString)
End If
End If
2、正确的ip，能否直接在浏览器、资源管理器访问？如地址 \\\\192.168.1.51
看6楼测试。
-- 发布时间：2017/12/27 10:08:00
--
好
-- 发布时间：2017/12/27 10:12:00
--
是这个吗？
此主题相关图片如下：qq截图20171227101139.png