Foxtable(狐表)用户栏目专家坐堂 → 求自动切换数据源代码


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

主题:求自动切换数据源代码

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/1/4 12:42:00 [显示全部帖子]

ping的是ip,不是连接字符串,连接字符串用tryconnect:

http://www.foxtable.com/help/topics/1944.htm

 

而且无法连接是等于false,不是等于True,这样的错误怎么能有? 还有整体替换,不是这样替换的,整体替换是指定一个新的临街字符串,ip之类的局部修改才用replace的。

 

If e.Name = "学生成绩数据库" Then
    If Connections.TryConnect(""Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Nsuxlpwzgg8u8el\数据库\管理系统数据库.mdb;Persist Security Info=False"",1000) = false Then '如果第一个数据库无法接通
         e.Connection String ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\数据库\管理系统数据库.mdb;Persist Security Info=False"
    End If
End If
[此贴子已经被作者于2014-1-4 12:44:01编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/1/4 13:04:00 [显示全部帖子]

有手误而已,多了一个双引号,你自己删除就行了。


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/1/4 13:05:00 [显示全部帖子]

If e.Name = "学生成绩数据库" Then
    If Connections.TryConnect("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Nsuxlpwzgg8u8el\数据库\管理系统数据库.mdb;Persist Security Info=False") = False Then '如果第一个数据库无法接通
         e.Connection String ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\数据库\管理系统数据库.mdb;Persist Security Info=False"
    End If
End If

 回到顶部