从字符个数判断功能对错时

上一篇 / 下一篇  2011-01-26 17:25:57 / 个人分类:QTP学习

由于软件识别性问题,所以在设计对端脚本时,检测对端收到的短消息条数是否是3条时,想了一个笨办法,就是检测winobject内的字符个数。现在需要删除了,保存在这里,以备以后会用到类似的方法。

'账号1发送的短消息内容已固定为“测试聊天记录功能”,所以字符长度范围只是日期和时间上的位数变化(字符包括时间和账号,每条短信最少是37个字符,最多是42个字符,共需要发送3条。)
'3条消息字符数的范围为[111,126],2条消息字符数的范围为[74,84]。
MessageLen=len(Dialog("Lemon").WinObject("WinObject").GetROProperty("text"))
While MessageLen<=84
      MessageLen=len(Dialog("Lemon").WinObject("WinObject").GetROProperty("text"))'重新获取即时消息内容字符数,否则该值永远是第一次获取的字符数。
      Message=Dialog("Lemon").WinObject("WinObject").GetROProperty("text")'获取即时消息内容。
      Reporter.ReportEvent micDone,"即时消息接收条数不够","预期结果,接收到3条短消息字符数为[111,126];实际结果,接收到字符数为"&MessageLen&",消息内容:"&Message
          wait 3
Wend

If MessageLen<=126 and MessageLen>=111 Then
 Reporter.ReportEvent micPass,"即时消息发送完成","预期结果,接收到3条短消息字符数为[111,126];实际结果,接收到字符数为"&MessageLen&",消息内容:"&Message
else
 Reporter.ReportEvent micWarning,"即时消息发送有误","预期结果,接收到3条短消息字符数为[111,126];实际结果,接收到字符数为"&MessageLen&",消息内容:"&Message
End If


TAG:

 

评分:0

我来说两句

Open Toolbar