[已解决]用阿福的OCR 登陆网站验证码怎么老是错误？

410521a · 发表于 2010-6-11 06:59:19

本帖最后由 410521a 于 2010-6-11 22:48 编辑

#include <IE.au3>
#include <Ocr.au3>
#Include <Clipboard.au3>
#Include <ScreenCapture.au3>

Dim $i=0
$oIE = _IECreate ("http://www.zzwljc.com:8080/login.aspx")
$sHTML = _IEBodyReadHTML ($oIE)

$User = _IEGetObjByName($oIE,"username")
$User.value = "autoittest"

$PW = _IEGetObjByName($oIE,"usepwd")
$PW.value = "autoittest"

$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.bmp")
   _ScreenCapture_SaveImage (@ScriptDir & "\yzm.bmp", $hMemory)
EndIf
Next

$a_Image = myReadImageToArray(@ScriptDir & "\yzm.bmp", False, 1, 0x777777)
$s_code_string = myArrarOCR(@ScriptDir&"\CodeFont.txt", $a_Image, 1, 4, 8, "", 5, 1, 4, 5)

$Code = _IEGetObjByName($oIE,"yzm_tbox")
$Code.value = $s_code_string
MsgBox(0,"",$s_code_string)

410521a · 发表于 2010-6-11 11:26:05

哎`` 不用审核了`` 但没人出来帮帮忙吗？

jhwl · 发表于 2010-6-11 15:46:16

学会调试，先下载到本地，找到图片的正确的格式，调试读出
以达到最佳的效果，告戒：遇事先自己琢磨，给自己思考的机会……

410521a · 发表于 2010-6-11 20:19:54

....能提示下吗？

410521a · 发表于 2010-6-11 22:11:57

本帖最后由 410521a 于 2010-6-11 22:17 编辑

myArrarOCR(@ScriptDir&"\CodeFont.txt", $a_Image, 1, 4, 8, "", 5, 1, 4, 5)

Func myArrarOCR($s_code_file, $func_array, $Ocr, $CodeNum, $CodeWidth, $CurrValue="", $func_left=0, $func_mid=0, $func_top=0, $func_bottom=0)
1, 4, 8, "", 5, 1, 4, 5)
识别字数宽度 ? 左中上下 ?

这都什么意思呀

410521a · 发表于 2010-6-11 22:47:40

阿福OCR验证码识别引擎GUI1[1].0 用这个搞定了

410521a · 发表于 2010-6-11 22:49:31

#include <Ocr.au3>

这个不用编译吗？

lynfr8 · 发表于 2010-6-12 00:20:07

myArrarOCR(@ScriptDir&"\CodeFont.txt", $a_Image, 1, 4, 8, "", 5, 1, 4, 5)

Func myArrarOCR($s_code ...
410521a 发表于 2010-6-11 22:11

410521a · 发表于 2010-6-12 02:26:11

谢谢`` 不知道那说的是像素还是什么`` 我对像素呀`` 平方啊` 都不懂`

lynfr8 · 发表于 2010-6-12 18:02:08

谢谢`` 不知道那说的是像素还是什么`` 我对像素呀`` 平方啊` 都不懂`
410521a 发表于 2010-6-12 02:26

不懂就网上google

sdwd_lhq · 发表于 2010-6-27 10:19:35

学习了，我需要

Ziya · 发表于 2010-6-28 10:45:01

#include <Ocr.au3>

这个是哪儿来的...能否提供以下?

lynfr8 · 发表于 2010-6-28 12:59:57

#include

这个是哪儿来的...能否提供以下?
Ziya 发表于 2010-6-28 10:45

论坛搜索“阿福”

tankwu · 发表于 2010-9-9 17:46:50

我的权限不够啊，lynfr8能给发一个吗？

kwyking · 发表于 2010-12-10 11:01:35

下个试试。

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

[图形处理] [已解决]用阿福的OCR 登陆网站验证码怎么老是错误？

评分

本帖子中包含更多资源

评分