以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打开项目出现以下错误提示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104856)

--  作者:hnguang
--  发布时间:2017/8/7 8:29:00
--  打开项目出现以下错误提示

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170807082619.png
图片点击可在新窗口打开查看
今天打开项目出现以上提示,长按CTRL键有无法进入项目

--  作者:有点甜
--  发布时间:2017/8/7 8:55:00
--  
 和你其它软件冲突,比如 云端之类的。你最近是否安装了什么软件?把其卸载。
--  作者:hnguang
--  发布时间:2017/8/7 9:47:00
--  
Dim ipFile As String = e.ProjectPath & "ip.txt"
Dim ip As String = FileSys.ReadAllText(ipFile)
If e.Name = "ljc_new" Then
    e.C& ip &""
Else
    e.HideSplashForm = True
    MessageBox.show("内部数据库名称设置出错,请联系系统开发人员处理!","元捷信息温馨提示")
    Syscmd.Project.Exit(True)
End If

试了很久,发现是项目加载外部表链接这段语句出现问题,请老师看看代码有问题吗

--  作者:hnguang
--  发布时间:2017/8/7 9:48:00
--  
\'Dim ipFile As String = e.ProjectPath & "ip.txt"
\'Dim ip As String = FileSys.ReadAllText(ipFile)
\'If e.Name = "ljc_new" Then
    \'e.C& ip &""
\'Else
    \'e.HideSplashForm = True
    \'MessageBox.show("内部数据库名称设置出错,请联系系统开发人员处理!","元捷信息温馨提示")
    \'Syscmd.Project.Exit(True)
\'End If

--  作者:hnguang
--  发布时间:2017/8/7 9:49:00
--  
SQLOLEDB;Password=3379249;Persist Security Info=True;User ID=sa;Initial Catalog=ljc_new;Data Source="& ip &"

--  作者:有点甜
--  发布时间:2017/8/7 10:37:00
--  

1、先看2楼的问题。

 

2、如果你把代码注释掉,就不出错了?如果是,把这句删除看看 Syscmd.Project.Exit(True)