找回密码
 加入
搜索
查看: 3200|回复: 5

请求Gooker或其他对IEUDF熟的朋友帮个忙?

[复制链接]
发表于 2008-5-10 20:14:10 | 显示全部楼层 |阅读模式
这个网站 http://w0.pkland.net/game/ 也就一个表单,NAME值也都标注出来了
但在验证码输入框,确无法输入字符进去(暂且不讨论字符是否符合验证码)
写了个初始代码
#include <IE.au3>
$oIE = _IECreate ("http://w0.pkland.net/game",0,1,1,0)
_IEAction($oIE,"visible")
_IELoadWait($oIE)
Sleep(3000)
$oForm = _IEFormGetCollection($oIE, "text")
$oQuery = _IEFormElementGetObjByName($oForm, "name")
                _IEFormElementSetValue($oQuery, "test")
$oQuery = _IEFormElementGetObjByName($oForm, "password")
                _IEFormElementSetValue($oQuery, "123")
$oQuery = _IEFormElementGetObjByName($oForm, "inputrand")
                _IEFormElementSetValue($oQuery, "gbfd")
_IELoadWait($oIE)
        _IEFormSubmit($oForm, 0)
Sleep(1000)
_IEAction($oIE, "visible")
_IELoadWait($oIE)
[ 本帖最后由 bob 于 2008-5-12 11:22 编辑 ]
发表于 2008-5-10 20:31:06 | 显示全部楼层
你也玩这个游戏,呵呵,我也是这里的玩家,有和你同样的问题。你去Gooker的博客有介绍如何读图片的源码。
发表于 2008-5-11 12:19:20 | 显示全部楼层
#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")
                        _IEDocInsertText($oQuery, "gbfd")
_IELoadWait($oIE)
_IEFormSubmit($oForm, 0)
Sleep(1000)

_IELoadWait($oIE)
 楼主| 发表于 2008-5-11 17:51:55 | 显示全部楼层
谢谢Gooker
_IEDocInsertText确实可以插入文字
但还有个值没去掉 value="输入上面的数字或字母"

按Gooker写的,成了 “输入上面的数字或字母gbfd”
发表于 2008-5-12 10:38:30 | 显示全部楼层
#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)
 楼主| 发表于 2008-5-12 11:22:27 | 显示全部楼层
ok,very good!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-4-24 23:49 , Processed in 0.069695 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表