Vbscript VB脚本自动处理web登录问题

请帮助我，因为我在Internet Explorer上尝试使用html代码下面的vbscript时遇到错误。我尝试过搜索这个论坛，但没有成功

我正在为以下网站创建登录脚本：

enter code here`<form action="website address" method="post" name="redirect_me">
 <input type="HIDDEN" name="language" value="EN">
  <input type="HIDDEN" name="LOGININPUT" value="">
  <input type="HIDDEN" name="PASSWORDINPUT" value="">
  <input type="HIDDEN" name="TITLE" value="">
  <input type="HIDDEN" name="PRELOGINDOCS" value="TRUE">
</form>
                      <tr><td colspan="2"><img src="/images/trans.gif" height="5" border="0"></td></tr>
                  <tr><td colspan="2"><img src="/images/greenline.gif" height="1" border="0"></td></tr>
                  <tr><td colspan="2"><img src="/images/trans.gif" width="5" height="30"></td></tr>
                  <!-- Login (End) -->

在此处输入代码`

我尝试使用下面的脚本，但它不起作用。我试着为雅虎邮件使用相同的脚本，结果成功了。我不确定是什么问题，但我猜这与对象ID有关。非常感谢您的帮助

On Error Resume Next

Const PAGE_LOADED = 4

Set objIE = CreateObject("InternetExplorer.Application")

Call objIE.Navigate("website address")

objIE.Visible = True

Do Until objIE.ReadyState = PAGE_LOADED : Call WScript.Sleep(100) : Loop

objIE.Document.all.LOGININPUT.Value = "Username"

objIE.Document.all.PASSWORDINPUT.Value = "Password"

If Err.Number <> 0 Then

msgbox "Error: " & err.Description

End If

Call objIE.Document.all.login_form.submit

Set objIE = Nothing''

出错时继续下一步
常量页面_已加载=4
Set objIE=CreateObject（“InternetExplorer.Application”）
呼叫objIE.Navigate（“网址”）
objIE.Visible=True
直到objIE.ReadyState=PAGE_加载为止：调用WScript.Sleep（100）：循环
objIE.Document.all.LOGININPUT.Value=“用户名”
objIE.Document.all.PASSWORDINPUT.Value=“Password”
如果错误号为0，则
msgbox“错误：&错误说明
如果结束
调用objIE.Document.all.login\u form.submit
Set objIE=无“”

您收到的错误是什么？您好，Geobits，我收到“错误：对象不支持此属性或方法”。我真的不知道发生了什么事。谢谢您的帮助。您的登录表单不是

login\u form

。很抱歉，我应该发布完整的代码：根据上面的代码，表单的名称是login\u form。所以请让我知道我做错了什么。谢谢