[Upload Script] Ignore error on login

This commit is contained in:
zilmar 2016-07-03 18:31:17 +10:00
parent c84245bde6
commit 53e728d5c2
1 changed files with 2 additions and 2 deletions

View File

@ -156,7 +156,7 @@ Sub ValidateLoggedIn(IE)
End Sub
Sub Login(IE)
'On Error resume next
On Error resume next
Set IE2 = WScript.CreateObject("InternetExplorer.Application", "IE_")
IE2.Visible = True
@ -179,7 +179,7 @@ Sub Login(IE)
Dim FoundIt
FoundIt = False
WScript.StdOut.WriteLine "Looking for redirect"
WScript.StdOut.WriteLine "Looking for redirect"
For count = 0 to 100
Set NodeList = IE2.document.getElementsByTagName("a")
WScript.StdOut.WriteLine count & ": Found " & NodeList.length & " a tags"