Foxtable(狐表)用户栏目专家坐堂 → [求助]数据源切换


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

主题:[求助]数据源切换

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/6 10:31:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/6 11:48:00 [显示全部帖子]

没有影响,和什么用户没有关系。使用filesys判断\\192.168.109.21\tq\TQ000.mdb存在就使用,否则使用另外一个。

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/7 20:30:00 [显示全部帖子]

试试这种

Dim s As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.109.21\tq\TQ000.mdb;Persist Security Info=False"
If 
Connections.TryConnect(s) = False Then
    MessageBox.Show("数据源无法连通!"
)
End If

 回到顶部