以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]动态链接外部数据源(已解决) (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63952) |
-- 作者:yyzlxc -- 发布时间:2015/2/2 9:17:00 -- [求助]动态链接外部数据源(已解决) 在项目属性的BeforeConnectOuterDataSource事件中, 直接加入如下代码,可以链接到指定的外部数据源。 但是,在项目文件目录下创建一个LJ.txt的文本文件,在该文件中输入"Provider=SQLOLEDB.1;Password=yy3024;Persist Security Info=True;User ID=sa;Initial Catalog=JGXT20150125;Data Source=NBYY001-PC"(不含双引号),在项目属性的BeforeConnectOuterDataSource事件中,换成如下代码,却不能链接到指定的外部数据源,问题在哪里,请各位老师指教。谢谢。 Dim LJFile As String = e.ProjectPath & "LJ.txt" If e.Name = "jg" Then \'数据源名称 If FileSys.DirectoryExists(LJFile) Then \'判断文件存在 Dim LJ As String = FileSys.ReadAllText(LJFile) \'读取内容 e.C End If End If 补一张截图 [此贴子已经被作者于2015-2-2 10:44:34编辑过]
|
-- 作者:Bin -- 发布时间:2015/2/2 9:19:00 -- Dim LJ As String = FileSys.ReadAllText(LJFile).Trim() 试试看
|
-- 作者:yyzlxc -- 发布时间:2015/2/2 9:27:00 -- 谢谢Bin老师的回复,好像还是不行,请指教,谢谢!! |
-- 作者:Bin -- 发布时间:2015/2/2 9:28:00 -- 晕,你代码搞错了. 把LJ引号去掉. 你这样等于是 字符串 LJ 而不是变量 |
-- 作者:yyzlxc -- 发布时间:2015/2/2 9:33:00 -- 去掉引号后照旧,不能链接到指定外部数据源。 |
-- 作者:Bin -- 发布时间:2015/2/2 9:35:00 -- 是 e.c=LJ 这里去掉 还是不行,说明你记事本里面的内容不争气
|
-- 作者:Bin -- 发布时间:2015/2/2 9:35:00 -- 是 e.c=LJ 这里去掉 |
-- 作者:yyzlxc -- 发布时间:2015/2/2 9:42:00 -- 回Bin老师:是按您指定的位置去掉引号的,记事本里面的内容如下,请指教,谢谢!! |
-- 作者:Bin -- 发布时间:2015/2/2 9:44:00 -- 你直接复制这段字符串作为连接可以正常运作吗? |
-- 作者:Bin -- 发布时间:2015/2/2 9:44:00 -- 你弹出一下LJ看看,是不是你文件路径不对,根本没进入IF条件 |