做个免回车，，请教了！！ 验证码自动填写

a3221134

想做个验证码框 内 输入 6个字符，，，之后马上激活 回车键   或者 激活 注册按钮（$Button2）

While 1
$nMsg = GUIGetMsg()
Switch $nMsg       
       
Case $Button3                                                                                        ;刷新验证码                                   
     GUISetState(@SW_DISABLE)
                  _IELinkClickByText($oIE,"换一张")
     Sleep(500);如果不能同步网页中的图片这个延迟要大点，可能跟网速有关系吧
     _get_key()
         GUISetState(@SW_ENABLE)
         
Case $GUI_EVENT_CLOSE                                                                         ;关闭
     _IEAction($oIE ,"quit")         ;关闭浏览器
                Exit                          
       
Case $Button1                                                                                           ;刷新帐号信息填写GUI
        GUISetState(@SW_DISABLE)
          _sc()
      _sc1()
        GUISetState(@SW_ENABLE)
       
Case $Button2                                                                                         ;填表注册
     _sc2()
GUISetState(@SW_DISABLE)
GUISetState(@SW_ENABLE)       
EndSwitch
WEnd



另外谁做过这种验证码的自动填写吗 ？？比较BT

a3221134

及解决免回车问题。。。 验证码还是请教高人啊

a3221134

解决免回车问题

大脑误区。。字都打错

netegg

实时获取字符串长度，使用$EN_CHANGE 消息试试看

dajun

send('{tab}')

dajun

AdlibRegister("MyAdlib")
Func MyAdlib()
        If _IsPressed('0D') Then
                Send("{Tab}")
        EndIf
EndFunc   ;==>MyAdlib

sanmoking

楼主搜素一下呗，貌似我都写过这个例子。