loops - 输入用户名和密码几秒钟后页面刷新

Question

我需要一个 vbscript，它应该在 IE 中打开一个页面，输入用户名和密码，然后在几秒钟后继续刷新页面。我不知道vbscript，但这是我搜索后发现的，它不断刷新页面。似乎不起作用，不断给我错误，需要对象。用户名和密码确实有一个值，我在这里省略了它。错误只是在输入用户名之前出现。

Call Main

Function Main
  Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
  IE.Visible = True
  IE.Navigate "URL"
  Wait IE
  With IE.Document
    .getElementsByName("LoginName")(0).value = ""
    .getElementsByName("Password")(0).value = ""
    .getElementsByTagName("a")(0).click
  End With
End Function

Sub Wait(IE)
  Do
    WScript.Sleep 500
  Loop While IE.ReadyState < 4 And IE.Busy
End Sub

下面是错误