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

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

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

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