windows - 如何检查网页是否已加载或我在 VBScript 中对 XP 和 Windows 7 和 10 Internet Explorer 有错误

Question

如何验证隐形网页是否加载。
由于 Internet 连接或从网站加载页面时出现问题，我在 XP 或 Windows 7 或 10 的 Internet Explorer 中出现显示错误，如“网页无法显示”。

需要一种方法来告诉我网页加载是否成功或有问题，以便我可以决定下一步是什么。

Answer 1

有很多方法可以检查网页是否已加载或您是否因 Internet 连接问题或网站服务器出现错误

第一种检查方法是针对所有版本的 Internet Explorer for Xp 或 windows 7 或 10

On Error Resume Next 
'clean the cookies of Internet explorer first
CreateObject("WScript.Shell").Run "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2",0,False 
WScript.Sleep 1000

'open the webpage
 Set objIE = wscript.CreateObject("InternetExplorer.Application")
 objIE.visible = 0
 objIE.ToolBar = 0
 objIE.statusbar=0
 objIE.Navigate "http://www.muslimpro.com/Prayer-times-Mecca-Saudi-Arabia-104515"  'change "https" to "http"
    While objIE.Busy Or objIE.ReadyState <> 4 : WScript.Sleep 100 : Wend


'check webpage
If objIE.LocationName=objIE.LocationURL Then
MsgBox "webpage did not loaded try again"
ElseIf objIE.LocationName <> objIE.LocationURL Then
MsgBox "webpage loaded successfully  "
End If

objIE.Quit  
WScript.Quit

重要提示:您必须将 URL HTTPS 更改为 HTTP。