以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数据源连接  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135607)
--  作者：nxdx112
--  发布时间：2019/5/30 8:56:00
--  数据源连接
我的项目中有两个数据源，在局域网中用，因为ip是自动获取，IP会经常变动，而且连接较慢，所以用局域网地址2-210-112，但有的第二网段的电脑连不，必须用ip，现在想先连接2-210-112的地址，连接不上是用192.168.101.112，如何写代码，教程中是互联网的
下面是我项目中的两个数据源
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\\\192.168.101.112\\政教管理\\数据库\\zjc.mdb;Persist Security Info=False
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\\\192.168.101.112\\政教管理\\数据库\\操作日志.MDB;Persist Security Info=False
--  作者：有点甜
--  发布时间：2019/5/30 9:14:00
--  

BeforeConnectOuterDataSource

 

msgbox(e.name)

If e.name = "数据源1" Then    
    Dim s As String = "连接字符串1"
    If Connections.TryConnect(s) = False Then
        MessageBox.Show("数据源无法连通!")        
        s = "连接字符串2"
    End If    
    e.ConnectionString = s   
End If
--  作者：nxdx112
--  发布时间：2019/5/30 10:57:00
--  
谢谢