无法运行VB脚本

Question

我只是想运行一个VB脚本来做自动登录功能。 我无法运行脚本，因为我收到以下异常
“调用的对象已与其客户端断开连接”

代码/脚本：

Const strURL = "YOUR URL HERE"
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
objIE.Navigate2 strURL
Do While objIE.Busy
WScript.Sleep 100
Loop
Set objShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 39000
objIE.document.getElementById("username").Value = "USERNAME"
objIE.document.getElementById("password_input").Value = "PASSS"
objIE.document.getElementById("Login").click