小编Nat*_*ate的帖子

我正在多台计算机上运行基于网络的幻灯片。我有一个 VBScript，它在启动时运行，打开 IE 并以全屏模式导航到特定页面。只要启动时有互联网连接，一切都会很好。如果没有，则页面永远不会加载。VBScript 中是否有一种方法可以每隔几分钟检查一次连接，直到找到连接，然后继续执行脚本？这是供您参考的代码：

Option Explicit     
Dim WshShell
set WshShell = WScript.CreateObject("WScript.Shell")         

On Error Resume Next
   With WScript.CreateObject ("InternetExplorer.Application")     
      .Navigate "http://www.example.com/slideshow"
      .fullscreen = 1   
      .Visible    = 1
      WScript.Sleep 10000
   End With    
On Error Goto 0