自动填写验证码问题
本帖最后由 a000000 于 2009-6-26 07:33 编辑每次登陆:http://www.10000ka.com/site2/default.asp
都的手动写验证码,请高手帮忙写个自动写入验证码人后登陆就可以了
#include <IE.au3>
$oIE = _IECreate("http://www.10000ka.com/site2/default.asp")
_IELoadWait($oIE )
;如果选择员工就是 personlogin2 ,还需做判断填营业员名
$Check = _IEGetObjById($oIE,"personlogin1")
$Check.click
$User = _IEGetObjById($oIE,"myname")
$User.value = "bob"
$PW = _IEGetObjById($oIE,"mypass2")
$PW.value = "123456"
$var = _IEGetObjById($oIE,"ThisLogin_tbValidate")
$var.value = "3721"
经过修改9楼帅哥的源码虽然成功写入验证码,但是验证码是变化的,请高手继续帮忙,本人菜鸟一个,学了一年半au3也不行,主要就是帮助很多东西都看不懂,不是不自己做,请嘴皮党嘴下留情,再次谢过。 唉..伸手党... 唉..伸手党...
lynfr8 发表于 2009-6-23 17:00 http://www.autoitx.com/images/common/back.gif
:face (27):
并非想伸手啊,自己写了个,可是不好用,有时候网页打开慢了就不能写入:
高手别笑话哈,我是这样写的:
#NoTrayIcon
#Region ;**** 参数创建于 AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=Ico.dll_103.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <IE.au3>
$url2 = "http://www.10000ka.com/site2/default.asp"
$oIE = _IECreate ($url2, 0, 1, 0, 1)
Sleep(1000)
WinWait("万卡网络在线销售系统 - Microsoft Internet Explorer")
Send("{TAB 16}")
Sleep(1800)
Send("123")
Sleep(500)
Send("{TAB}")
Sleep(1800)
Send("123") 还是希望有高人帮下忙 还是希望有高人帮下忙 高人帮下忙 :face (22):
#include <IE.au3>
$oIE = _IECreate("http://www.10000ka.com/site2/default.asp")
_IELoadWait($oIE )
;如果选择员工就是 personlogin2 ,还需做判断填营业员名
$Check = _IEGetObjById($oIE,"personlogin1")
$Check.click
$User = _IEGetObjById($oIE,"myname")
$User.value = "bob"
$PW = _IEGetObjById($oIE,"mypass2")
$PW.value = "123456"
其实上面的验证码很简单的,密保矩阵就更简单了,只有手头有对应卡! 非常感谢楼上的帅哥,不知道验证码能实现自动填写不? 我实在是菜的厉害,找了半天帮助也没弄明白这个地方:
#include <IE.au3>
$oIE = _IECreate("http://www.10000ka.com/site2/default.asp")
_IELoadWait($oIE )
;如果选择员工就是 personlogin2 ,还需做判断填营业员名
$Check = _IEGetObjById($oIE,"personlogin1")
$Check.click
$User = _IEGetObjById($oIE,"myname")
$User.value = "bob"
$PW = _IEGetObjById($oIE,"mypass2")
$PW.value = "123456"
$User = _IEGetObjById($oIE,"ThisLogin_tbValidate")
$User.value = "bob"
我这个前面应该是个啥变量呢?
?????= _IEGetObjById($oIE,"ThisLogin_tbValidate")
?????= .value = "bob" :face (37): 我要昏过去了
:face (3):
AspBelief 发表于 2009-6-24 12:40 http://www.autoitx.com/images/common/back.gif
:face (19): 真的没找到,学历太低了....弄了1年多au3了,还是光会模拟键盘 这家伙,原来是灌水.................... #include <IE.au3>
$oIE = _IECreate("http://www.10000ka.com/site2/default.asp")
_IELoadWait($oIE )
;如果选择员工就是 personlogin2 ,还需做判断填营业员名
$Check = _IEGetObjById($oIE,"personlogin1")
$Check.click
$User = _IEGetObjById($oIE,"myname")
$User.value = "bob"
$PW = _IEGetObjById($oIE,"mypass2")
$PW.value = "123456"
$var = _IEGetObjById($oIE,"ThisLogin_tbValidate")
$var.value = "3721"
别的基本都解决了,就是如何自动获取验证码