看似简单，这个网站如何自动登录

yokoliu

网站入口：http://www.zhubajie.com/task/user/login
用户名密码都可以用_IEGetObjById操作，
但是就是提交不了。

kn007

好久没写了，随便写一个，

#include <IE.au3>
 
$oIE = _IECreate("http://www.zhubajie.com/task/user/login",0,1,1,1 )
 
_IELoadWait ($oIE)
 
$oInputs = _IETagNameGetCollection ($oIE, "INPUT")
 
For $oInput In $oInputs
if $oInput.name = "username" then
       $oInput.value="用户名"
EndIf
Next
 
For $oInput In $oInputs
if $oInput.name = "userpass" then
       $oInput.value="密码"
EndIf
Next
 
 
For $oInput In $oInputs
if $oInput.name = "login" then
       $oInput.click
EndIf
Next
Exit

另外楼主是个好吃懒做的人，自己搜索学习吧

yokoliu

先谢谢你了老大，
您真的冤枉我了，
我是找了好久没有答案才发帖求助的。
我用一下代码为什么不行呢？

#include <IE.au3>

$oIE = _IECreate("http://www.zhubajie.com/task/user/login",0,1,1,1 )

_IELoadWait ($oIE)

$oInputs = _IETagNameGetCollection ($oIE, "INPUT")

For $oInput In $oInputs
if $oInput.name = "username" then
       $oInput.value="aiboboxx"
EndIf
Next

For $oInput In $oInputs
if $oInput.name = "userpass" then
       $oInput.value="780830lp"
EndIf
Next


$oInput = _IEGetObjByName($oIE,"login")

_IEAction($oInput,"click")

yokoliu

改为这样又可以了 。 明白了，网页上有两个name为“login”的元素，一个是form，一个是input
有的时候就是简单的问题绕不过来,kn007 老大谢谢了！！！

#include <IE.au3>

$oIE = _IECreate("http://www.zhubajie.com/task/user/login",0,1,1,1 )

_IELoadWait ($oIE)

$oInputs = _IETagNameGetCollection ($oIE, "INPUT")

For $oInput In $oInputs
if $oInput.name = "username" then
       $oInput.value="aiboboxx"
EndIf
Next

For $oInput In $oInputs
if $oInput.name = "userpass" then
       $oInput.value="780830lp"
EndIf
Next


For $oInput In $oInputs
if $oInput.name = "login" then
       _IEAction($oInput,"click")
EndIf
Next
Exit

kn007

解决就好，记得改下标题，

ashfinal

#include <IE.au3>
$oIE=_IECreate ("http://www.zhubajie.com/task/user/login",0,1,1,1)
$oForm = _IEGetObjByName ($oIE,"login")
$oQuery1 = _IEFormElementGetObjByName ($oForm,"username")
_IEFormElementSetValue ($oQuery1,"用户名")
$oQuery2 = _IEFormElementGetObjByName ($oForm,"userpass")
_IEFormElementSetValue ($oQuery2,"密码")
$oQuery3 = _IEFormElementGetObjByName ($oForm,"login")
;_IEFormSubmit($oForm)
_IEAction($oQuery3,"click")

我是用上面代码登陆的，只是想请问下各位老大，为什么直接提交表单不行呢？

316428696

网站防止POST数据！