Foxtable(狐表)用户栏目专家坐堂 → 在外部数据库无法连接时弹出一个窗口选择外部数据库,只针对本次有效.


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

主题:在外部数据库无法连接时弹出一个窗口选择外部数据库,只针对本次有效.

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


加好友 发短信
等级:五尾狐 帖子:1085 积分:8220 威望:0 精华:4 注册:2012/3/31 18:08:00
在外部数据库无法连接时弹出一个窗口选择外部数据库,只针对本次有效.  发帖心情 Post By:2015/6/2 17:55:00 [只看该作者]

Dim s As String = e.ConnectionString
If Connections.TryConnect(s) = False Then
    MessageBox.Show("数据源无法连通!")
    Dim dlg As New OpenFileDialog
    dlg.Filter= "Access文件|*.mdb"
    If dlg.ShowDialog = DialogResult.Ok Then
        Dim s1 As String =  "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dlg.FileName & ";Persist Security Info=False"
        e.ConnectionString= s1
        Return
    End If

End If

通过以上代码在 BeforeConnectOuterDataSource 中添加,  想实现外部数据源无法访问时,手工选择数据库,但选择后只针对本次登陆有效,应该如何保存当前的配置,下次登陆继续有效?


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/2 18:04:00 [只看该作者]

 把值保存到txt文件里,或者用SaveConfigValue存储

 回到顶部