Dim s1 As String = e.ProjectPath & "\bin\connection.ini"
Dim s2 As String = "erp"
If FileSys.FileExists(s1) = False Then
e.HideSplashForm = True
'MessageBox.show("数据库连接文件丢失,无法打开此项目!" & vbcrlf & "请联系软件提供商解决!")
Else
If e.name = s2 Then
e.ConnectionString = FileSys.ReadAllText(s1)
End If
End If
为何报错?文件明明存在且正常的

此主题相关图片如下:screenshot.jpg