关于TryConnect - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下是引用xuanxiao在2016/5/18 17:09:00的发言：
我需要测试很多数据源是否能连通，fox提供了TryConnect方法。。。若是数据源能连通，则很快能够显示连接成功，就没啥问题！可是若不能连接成功，就要等好久，而且会卡住。。我若有几十个数据源需要我测试的话，实在有点头疼。。请问有什么好方法？

[此贴子已经被作者于2016/5/18 17:09:37编辑过]

汗，一个项目为什么有几十个数据源啊？所有的数据源都不再一台计算机上的话，也就是说你数据放在几十台计算机上？

快一点的测试，可以这样

Dim s As String = "Provider=SQLOLEDB.1;Password=xxxxxx;Persist Security Info=True;User ID=xxxx;Initial Catalog=销售前台综合填报;Data Source=xxxx.xxx.xxx.xxx"

try

Dim conn As ADODB.Connection

conn = New ADODB.Connection

conn.ConnectionString = s

conn.Open

conn.close

Catch ex As Exception

MessageBox.Show("SQL数据库" & Err.Description & "请联系管理员!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)

End try

xuanxiao	小大 1楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：三尾狐帖子：640 积分：5407 威望：0 精华：0 注册：2014/8/27 11:12:00	关于TryConnect Post By：2016/5/18 17:09:00 [只看该作者] 用户已经被屏蔽

主题：关于TryConnect