Connections.TryConnect当网络不稳定时这个会很慢 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → Connections.TryConnect当网络不稳定时这个会很慢

共有2605人关注过本帖树形打印复制链接主题：Connections.TryConnect当网络不稳定时这个会很慢

wanlong1215

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：31 积分：375 威望：0 精华：0 注册：2015/7/23 17:13:00

Connections.TryConnect当网络不稳定时这个会很慢 发帖心情

Post By：2016/7/8 9:08:00 [只看该作者]

我写了个定时计划，用这个函数Connections.TryConnect来检测网络是否畅通，发现当网络状况不好的时候这个函数非非常慢，甚至造成软件假死的状态，这个是什么原因，有办法解决么

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/7/8 10:01:00 [只看该作者]

1、先测试能否联网

http://www.foxtable.com/webhelp/scr/2709.htm

2、可以用ADO，如果不联网，检测一次是至少10秒以上的。

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