如何限制连接的时间.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 11 行

在 “如何检测下载是否完成”中 我 们 介 绍 了 如 何 等 待 一 个 下 载 任 务 完 成 。 不 过 你 的 问 题 可 以 在 这 个 问 题 的 基 础 上 进 行 一 个 时 间 判 断 。 
    t = Now 
    Inet1.Execute ... 
    Do While Inet1.StillExecuting 
     DoEvents 
     If DateDiff("s", t, Now) > 30 Then 
     ' 超 时 
     End If 
    Loop 
<END>