#include <IE.au3>
$oIE = _IECreate ("http://w0.pkland.net/game",1)
$oForm = _IEFormGetObjByName ($oIE, "loginform")
$oQuery = _IEFormElementGetObjByName($oForm, "name")
_IEFormElementSetValue($oQuery, "test")
$oQuery = _IEFormElementGetObjByName($oForm, "password")
_IEFormElementSetValue($oQuery, "123")
$oQuery = _IEFormElementGetObjByName($oForm, "inputrand")
_IEAction ($oQuery,"click") ;;; 这句是增加的;;;;;;;;
_IEDocInsertText($oQuery, "gbfd")
_IELoadWait($oIE)
_IEFormSubmit($oForm, 0)
Sleep(1000)
_IELoadWait($oIE)
|