Foxtable(狐表)用户栏目专家坐堂 → tryconnect可否加入时间


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

主题:tryconnect可否加入时间

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


加好友 发短信
等级:八尾狐 帖子:1930 积分:17564 威望:0 精华:0 注册:2014/7/29 19:09:00
tryconnect可否加入时间  发帖心情 Post By:2015/8/13 17:42:00 [只看该作者]

If Connections.TryConnect(s) = False Then
    MessageBox.Show("数据源无法连通!")
Else
    MessageBox.Show("数据源可以连通!")
End If

 

上述代码可否加入时间,比如 3 秒连接不上,就提示。

 

谢谢!


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


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

大概10秒,这是必要的时间。你还可以先ping

 

http://www.foxtable.com/help/topics/2709.htm

 

 

try
    Dim conn As ADODB.Connection
    conn = New ADODB.Connection
    conn.ConnectionString = "Provider=SQLOLEDB.1;Password=hailun.;Persist Security Info=True;User ID=sa;Initial Catalog=test;Data Source=voyo"
    conn.Open
   
    msgbox("成功")
    conn.close
Catch ex As Exception
    msgbox("失败")
End try

[此贴子已经被作者于2015/8/13 17:54:01编辑过]

 回到顶部