Foxtable(狐表)用户栏目专家坐堂 → [求助]动态链接外部数据源(已解决)


  共有3687人关注过本帖树形打印复制链接

主题:[求助]动态链接外部数据源(已解决)

帅哥哟,离线,有人找我吗?
yyzlxc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
[求助]动态链接外部数据源(已解决)  发帖心情 Post By:2015/2/2 9:17:00 [只看该作者]

在项目属性的BeforeConnectOuterDataSource事件中, 直接加入如下代码,可以链接到指定的外部数据源。



图片点击可在新窗口打开查看此主题相关图片如下:捕获2.png
图片点击可在新窗口打开查看


但是,在项目文件目录下创建一个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


补一张截图


图片点击可在新窗口打开查看此主题相关图片如下:捕获3.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2015-2-2 10:44:34编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:19:00 [只看该作者]

Dim LJ As String = FileSys.ReadAllText(LJFile).Trim()

试试看

 回到顶部
帅哥哟,离线,有人找我吗?
yyzlxc
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2015/2/2 9:27:00 [只看该作者]

谢谢Bin老师的回复,好像还是不行,请指教,谢谢!!

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:28:00 [只看该作者]

晕,你代码搞错了.  把LJ引号去掉. 你这样等于是 字符串 LJ 而不是变量

 回到顶部
帅哥哟,离线,有人找我吗?
yyzlxc
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2015/2/2 9:33:00 [只看该作者]

去掉引号后照旧,不能链接到指定外部数据源。

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:35:00 [只看该作者]

是 e.c=LJ 这里去掉

还是不行,说明你记事本里面的内容不争气

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:35:00 [只看该作者]

是 e.c=LJ 这里去掉

还是不行,说明你记事本里面的内容不正确

 回到顶部
帅哥哟,离线,有人找我吗?
yyzlxc
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2015/2/2 9:42:00 [只看该作者]

回Bin老师:是按您指定的位置去掉引号的,记事本里面的内容如下,请指教,谢谢!!

Provider=SQLOLEDB.1;Password=
yy3024;Persist Security Info=True;User ID=sa;Initial Catalog=JGXT20150125;Data Source=NBYY001-PC

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:44:00 [只看该作者]

你直接复制这段字符串作为连接可以正常运作吗?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/2/2 9:44:00 [只看该作者]

你弹出一下LJ看看,是不是你文件路径不对,根本没进入IF条件

 回到顶部
总数 17 1 2 下一页