老师:
在:你也可以用另一种方法解决,在项目文件目录下创建一个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
其中的ip.txt中如何撰写?在ip.txt中直接写入119.119.120.120 就可以了吗?