Foxtable(狐表)用户栏目专家坐堂 → 发布前无法更改数据源默认设置的问题


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

主题:发布前无法更改数据源默认设置的问题

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


加好友 发短信
等级:四尾狐 帖子:976 积分:8527 威望:0 精华:0 注册:2012/2/9 16:35:00
发布前无法更改数据源默认设置的问题  发帖心情 Post By:2014/8/4 14:21:00 [只看该作者]

自己的电脑上同时安装了sql2005和sql2008R2,如下图所示

 


图片点击可在新窗口打开查看此主题相关图片如下:360截图20140804134605482.jpg
图片点击可在新窗口打开查看

平时在自己的电脑上开发或测试时不同版本的SQL数据库,数据源IP那里就设置成192.168.0.108\sql2005或者192.168.0.108\sql2008即可。

但发布项目前必须将数据源那里的IP改为192.168.1.4(客户服务器的内部IP)这样用户安装项目或更新后就可以直接访问了。

 

问题是,当将将数据源那里的IP改为192.168.1.4时却无法设置成功了,电脑IP已改为192.168.1.4,但因为自己电脑上的sql路径必须在ip后面要加\sql2005或\sql2008路径才能访问,这种情况要怎么办?(除了用IP.txt文件来替换外)

 

谢谢!


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


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

在生成的连接字符串里再添加路径呗.

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


加好友 发短信
等级:四尾狐 帖子:976 积分:8527 威望:0 精华:0 注册:2012/2/9 16:35:00
  发帖心情 Post By:2014/8/4 14:50:00 [只看该作者]

在BeforeConnectOuterDataSource像下面这样拼凑吗?
If e.name = "EI" Then
    e.C & e.ProjectPath & "数据文件1.mdb;Persist Security Info=False"
End If

但我已经用了下面的代码,我是想内部网络用默认的,然后外网用户再用ip.txt内的ip地址替换.
.....
Dim ipFile As String = e.ProjectPath & "ip.txt"
If Filesys.FileExists(ipFile) Then
    Dim ip As String = FileSys.ReadAllText(ipFile)
    e.ConnectionString = e.ConnectionString.Replace("192.168.1.4",ip)
Else
    MessageBox.Show("请检查系统安装目录下IP.txt文件内的IP地址是否正确!","提示")
    Syscmd.Project.Exit(False) '退出系统
End If
......


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/4 16:10:00 [只看该作者]

 BeforeConnectOuterDataSource 事件,代码,头部

 

e.ConnectionString = e.ConnectionString.Replace("192.168.0.108\sql2005", "192.168.1.4")


 回到顶部