'---判断C盘根目录下是否有网类型络配置文件,0为内网使用;1为外网使用
Dim netFile As String = "D:\Net.txt"
If Filesys.FileExists(netFile) = False Then
Dim Val As Integer
InputValue(Val, "网络类型","请输入网络类型,只能输入0或1,0为内网使用;1为外网使用") '输入数值
If Val = 0 OrElse Val = 1 Then
FileSys.WriteAllText("D:\Net.txt", Val , True)
End If
End If
在BeforeConnectOuterDataSource上用了上面的代码,客户的电脑D盘下没有Net.txt文件 ,但也不会弹出对话框,为什么?
谢谢!