Foxtable(狐表)用户栏目专家坐堂 → 关于Syscmd.Project.Exit() 命令


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

主题:关于Syscmd.Project.Exit() 命令

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/3/21 8:14:00 [显示全部帖子]

楼上同学,不可以在BeforeConnectOuterDataSource事件中关闭项目。
可以在BeforeOpenProject用TryConect直接判断连接字符串是否可以连通。不同则Cancel:
 

TryConnect

测试指定的链接字符串能否连通,如果能连通,则返回True,否则返回False。

语法:

TryConnect(ConnectionString)

ConnectionString:要测试的链接字符串。

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


 回到顶部