请教大神这样的验证码怎么获取下载[使用E8临时目录解决]

410521a · 发表于 2013-3-9 15:45:27

本帖最后由 410521a 于 2015-3-21 12:56 编辑

$Login.click
_IELoadWait($oIE)[/code]这个不加判断可以正常下载验证码图片，但验证码就是不正确！

proteus · 发表于 2013-3-9 17:09:44

http://www.zzwljc.com:8080/yzm.aspx

xms77 · 发表于 2013-3-9 17:54:13

回复 1# 410521a
这个验证码比较规则，用阿福的验证码UDF应该可以OCR读取

410521a · 发表于 2013-3-9 18:24:24

规则是规则` 但是他刚改版` 必须点一下验证码框才会出验证码` 而且只要焦点到那` 验证码就会变下

410521a · 发表于 2013-3-10 14:18:41

谁能帮帮我啊

410521a · 发表于 2013-3-10 15:54:52

_FileWriteLog($uploadlog, "开始登陆...")
_GUICtrlStatusBar_SetText($StatusBar1, "开始登陆...", 0)
Run("Forms.exe")
Dim $i = 0
$mulu = IniRead($logini, "配置", "路径", "")
$name = IniRead($logini, "配置", "账号", "")
$ppp = IniRead($logini, "配置", "密码", "")
$oImgs = _IEImgGetCollection($oIE)
For $oImg In $oImgs
$i += 1
If $oImg.src = "http://www.zzwljc.com:8080/yzm.aspx" Then
$oPic = $oIE.Document.body.createControlRange()
$oPic.Add($oImg)
$oPic.execCommand("Copy")
$img = ClipGet()
_ClipBoard_Open(0)
Local $hMemory = _ClipBoard_GetDataEx($CF_BITMAP)
_ClipBoard_Close()
FileDelete(@ScriptDir & "\yzm.jpg")
_ScreenCapture_SaveImage(@ScriptDir & "\yzm.jpg", $hMemory)
EndIf

为什么下不来呢？

binghc · 发表于 2013-3-12 10:12:56

登陆进这系统后的截图发两张上来瞧瞧？

410521a · 发表于 2013-3-13 13:35:36

大神们看看这个焦点怎么样获取

aassddffgg961 · 发表于 2013-3-13 15:15:24

在密码哪里用键盘模拟Send{TAB}不行吗？

410521a · 发表于 2013-3-13 15:53:55

行啊我不想用这种方法

410521a · 发表于 2013-3-14 12:29:09

大神来出来帮帮忙啊

410521a · 发表于 2013-3-14 21:10:58

怎么没人来看看kcg

		自动登录	找回密码
密码			加入

[网络通信] 请教大神这样的验证码怎么获取下载[使用E8临时目录解决]

相关帖子