batch-file - 如何使用 vbscript 自动登录网站？

Question

我尝试使用脚本自动登录网站，这样我们的员工就不必记住管理员密码。

Dim IE 
Dim Helem
Set IE =CreateObject("InternetExplorer.Application")  
IE.Visible = 1  
IE.navigate "http://rentalapp.zillow.com/"  
Do While (IE.Busy)   
WScript.Sleep 10  
LoopSet 
Helem = IE.document.getElementByID("formUsername")  
Helem.Value ="username"  
Set Helem =IE.document.getElementByID("formPassword")  
Helem.Value = "password" 
Set Helem = IE.document.Forms(0)  
Helem.Submit

我与我见过的其他帖子相差甚远，但我不断收到错误消息：

Line: 10 
char: 2 Error: 
Object required 
code: 800A01A8 
source: Microsoft VBScript runtime error

我研究了代码，它说某处有错字，但对于我的生活，我无法弄清楚在哪里。

我对 vbscript 不太熟悉，但是对于这样的功能，我想更加熟悉它。请帮忙。

Answer 1

Helem = IE.document.getElementByID("formUsername")  
Helem.Value ="username" <= this is line 10

在第 10 行失败：看起来您未能找到 ID 为“formUsername”的元素。

查看页面来源并检查您的 ID 是否正确。

Answer 2

Helem = IE.document.getElementByID("formUsername")  
==>
Set Helem = IE.document.getElementByID("formUsername")  

稍后在您的代码中。