主题：如何在xx.txt中设置数据源路径

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("192.168.222.88",ip)

        'MessabeBox.show(e.ConnectionString)

    End If

End If