遇到验证码时，QTP如何回放

cs5202

验证码是随时都在变化的，怎么用QTP去回放要输入验证码的网站？

hsjzfling

在本论坛中搜索下老帖咯，以前有朋友详细给出过几种方法了

cs5202

老贴的方法：
    1、测试的时候，让程序员把这块限制去掉，免去验证这关。
    2、让程序员提供一个万能验证码，测试可以绕过这一关。
    3、请程序员提供识别的方法，从获取的图片读出验证数据，再传给QTP。
    4、进行位图检查，将验证码分段进行图像验证。

能不能具体的说下第四种方法呢？

hsjzfling

第四种方法比较麻烦，而且只能针对比较简单些的验证码，比如纯数字的，而且数字的形态不会动态变化的那种。
思路是这样的，对于4位数字的验证码，需要先分别单独保存下0-9十个数字这十个图片，然后将验证码分割为4部分，然后逐一与保存下来的图片进行对比。
具体代码以前也有人给出过的，我稍微修改了下，参考代码如下：
With Browser("Exchange Management System").Page("Exchange Management System")
        Dim a,b,c,d,num
        'qX是每一个位图检查点，q1--q10第一位，q11--q20第二位，q21--q30第三位，q31--q40第四位
        q1=.Image("imgcode").Check(CheckPoint("imgcode"))
        q2=.Image("imgcode").Check(CheckPoint("imgcode_2"))
        q3=.Image("imgcode").Check(CheckPoint("imgcode_4"))
        q4=.Image("imgcode").Check(CheckPoint("imgcode_5"))
        q5=.Image("imgcode").Check(CheckPoint("imgcode_6"))
        q6=.Image("imgcode").Check(CheckPoint("imgcode_8"))
        q7=.Image("imgcode").Check(CheckPoint("imgcode_9"))
        q8=.Image("imgcode").Check(CheckPoint("imgcode_10"))
        q9=.Image("imgcode").Check(CheckPoint("imgcode_11"))
        q10=.Image("imgcode").Check(CheckPoint("imgcode_12"))
        q11=.Image("imgcode").Check(CheckPoint("imgcode_13"))
        q12=.Image("imgcode").Check(CheckPoint("imgcode_14"))
        q13=.Image("imgcode").Check(CheckPoint("imgcode_15"))
        q14=.Image("imgcode").Check(CheckPoint("imgcode_16"))
        q15=.Image("imgcode").Check(CheckPoint("imgcode_17"))
        q16=.Image("imgcode").Check(CheckPoint("imgcode_18"))
        q17=.Image("imgcode").Check(CheckPoint("imgcode_19"))
        q18=.Image("imgcode").Check(CheckPoint("imgcode_20"))
        q19=.Image("imgcode").Check(CheckPoint("imgcode_21"))
        q20=.Image("imgcode").Check(CheckPoint("imgcode_24"))
        q21=.Image("imgcode").Check(CheckPoint("imgcode_25"))
        q22=.Image("imgcode").Check(CheckPoint("imgcode_26"))
        q23=.Image("imgcode").Check(CheckPoint("imgcode_27"))
        q24=.Image("imgcode").Check(CheckPoint("imgcode_28"))
        q25=.Image("imgcode").Check(CheckPoint("imgcode_29"))
        q26=.Image("imgcode").Check(CheckPoint("imgcode_30"))
        q27=.Image("imgcode").Check(CheckPoint("imgcode_32"))
        q28=.Image("imgcode").Check(CheckPoint("imgcode_33"))
        q29=.Image("imgcode").Check(CheckPoint("imgcode_34"))
        q30=.Image("imgcode").Check(CheckPoint("imgcode_35"))
        q31=.Image("imgcode").Check(CheckPoint("imgcode_36"))
        q32=.Image("imgcode").Check(CheckPoint("imgcode_37"))
        q33=.Image("imgcode").Check(CheckPoint("imgcode_38"))
        q34=.Image("imgcode").Check(CheckPoint("imgcode_39"))
        q35=.Image("imgcode").Check(CheckPoint("imgcode_40"))
        q36=.Image("imgcode").Check(CheckPoint("imgcode_41"))
        q37=.Image("imgcode").Check(CheckPoint("imgcode_42"))
        q38=.Image("imgcode").Check(CheckPoint("imgcode_43"))
        q39=.Image("imgcode").Check(CheckPoint("imgcode_44"))
        q40=.Image("imgcode").Check(CheckPoint("imgcode_45"))
        '得出第一位验证码，具体哪个图片对应什么数字根据自己截取的情况来，以下类同
        Select Case True
                Case q1                a=1
                Case q2                a=2
                Case q3                a=3
                Case q4                a=4
                Case q5                a=5
                Case q6                a=6
                Case q7                a=7
                Case q8                a=8
                Case q9                a=9
                Case q10        a=10
                Case Else         MsgBox("No imgage matched num1")
        End Select
                       
       
        '得出第二位验证码
        Select Case True
                Case q11                b=1
                Case q12                b=2
                Case q13                b=3
                Case q14                b=4
                Case q15                b=5
                Case q16                b=6
                Case q17                b=7
                Case q18                b=8
                Case q19                b=9
                Case q20                b=10
                Case Else         MsgBox("No imgage matched num2")
        End Select
       
        '得出第三位验证码
        Select Case True
                Case q21                c=1
                Case q22                c=2
                Case q23                c=3
                Case q24                c=4
                Case q25                c=5
                Case q26                c=6
                Case q27                c=7
                Case q28                c=8
                Case q29                c=9
                Case q30                c=10
                Case Else         MsgBox("No imgage matched num3")
        End Select
       
       
        '得出第四位验证码
        Select Case True
                Case q31                d=1
                Case q32                d=2
                Case q33                d=3
                Case q34                d=4
                Case q35                d=5
                Case q36                d=6
                Case q37                d=7
                Case q38                d=8
                Case q39                d=9
                Case q40                d=10
                Case Else         MsgBox("No imgage matched num4")
        End Select
       
        num=(cstr(a)+cstr(b)+cstr(c)+cstr(d))
        msgbox " 验证码是:"&num
                .WebEdit("imgcode").Set ""&num
                .WebButton("登 录").Click
                .Sync
End With

cs5202

非常感谢，努力学习ING

dandan1111

学习中

caodongjian

道高一尺,魔高一丈....

找到规律才行

hellen_ma

这个方法对于背景带颜色的就不适用了.
期待中

hsjzfling

是的，该方法适用范围确实不大，目前的验证码都越来越复杂了，有时人眼都要看半天才能分辨...

cs5202

谁有更好的方法来录制带验证码的页面吗？

hsjzfling

如果你是要完成自动化测试，那么你在3楼列的前两种方法是最佳的，测试人员本也该多与开发人员主动进行沟通，省时省力

huior

建议使用第二种方法
当然如果第三种方法能实现，那是最好
第四种方法目前基本上很难实施

cs5202

谢谢大家的帮助