主题：ip地址改动后 数据源连接问题

在项目文件目录下创建一个ip.txt的文本文件，在该文件中输入最新的IP地址，并在BeforeConnectOuterDataSource事件中设置如下代码：

Dim ipFile As String = e.ProjectPath & "ip.txt"
If e.Name = "销售数据" Then
    If Filesys.FileExists(ipFile) Then
        Dim ip As String = FileSys.ReadAllText(ipFile)
        e.ConnectionString = e.ConnectionString.Replace("119.119.120.120",ip)
    End If
End If

这个例子  不起作用 望大师指点

我试过了 真的不行

这些例子都是经过测试的，很多用户在使用，不会不起作用的。

Dim ipFile As String = e.ProjectPath & "ip.txt"
If e.Name = "销售数据" Then
    If Filesys.FileExists(ipFile) Then
        Dim ip As String = FileSys.ReadAllText(ipFile)
        e.ConnectionString = e.ConnectionString.Replace("119.119.120.120",ip)

        MessabeBox.show(e.ConnectionString)
    End If
End If

这样可以看看你的代码执行了没有，如果执行了，合成的字符串是什么。