高手指点一下怎么登陆这个网页

hmgsi

我现在用的是最原始的登陆方法，都是鼠标移动。高手帮忙。。http://zh.sdo.com/tiexue/  通行证xjlx0001   密码www110
run("C:Program FilesInternet Exploreriexplore.exe http://zh.sdo.com/tiexue/")
sleep(12000)
MouseWheel("DOWN", 10)
sleep(1000)
MouseClick("left",891,337,1,1)
sleep(1500)
send("xjlx0001")
send("{TAB}")
send("www110")
sleep(1500)
MouseClick("left",813,438,1,1)
sleep(3000)  
MouseClick("left",810,382,1,1)
sleep(1000)  
MouseClick("left",810,415,1,1)
sleep(2000)  
MouseClick("left",910,385,1,1)

[ 本帖最后由 hmgsi 于 2009-2-5 23:20 编辑 ]

bob

授人以渔
建议看下Gooker写的UDF IE.au3的介绍以及应用教程
http://www.autoit.org.cn/column/ ... tech-diyijiang.html

hmgsi

你不指点，我连相关的教程都找不到。。谢谢呀，如果能帮我改一下就更号了。。

hmgsi

没高人帮我改一下吗？

cnsnc

不知道是不是要在这里登陆。登陆了也没什么用吧

#include <IE.au3>
$url1 = "http://zh.sdo.com/web1.0/home/fastlogin.asp?CanScanArea=1010,1024&autoResize=false"
$oIE = _IECreate($url1, 0, 1, 1, 1)
$UserName = _IEGetObjById($oIE, "username")
If IsObj($UserName) Then $UserName.value = "xjlx0001"
$PassWord = _IEGetObjById($oIE, "password")
If IsObj($PassWord) Then $PassWord.value = "www110"
_IELinkClickByText($oIE, "登录")

[ 本帖最后由 cnsnc 于 2009-2-5 22:08 编辑 ]

hmgsi

#include <IE.au3>
$oIE = _IECreate ("http://zh.sdo.com/web1.0/home/fastlogin.asp?CanScanArea=1010,1024&amp;autoResize=false&amp;PTAccount=")
$oForm = _IEFormGetObjByName ($oIE, "login")
$oQuery = _IEFormElementGetObjByName ($oForm, "username")
_IEFormElementSetValue ($oQuery, "xjlx0001")
$oQuery = _IEFormElementGetObjByName ($oForm, "password")
_IEFormElementSetValue ($oQuery, "www110")
$oQuery = _IEFormElementGetObjByName ($oForm, "登录")
_IEAction($oQuery ,"click")

hmgsi

我搞了半天，才看到cnsnc已经帮我做了一部分。。谢谢。。

hmgsi

这是一个网页游戏。。我有好多小号，能搞个登录器，那就方便很多了，同时也学习了AU3..