零基础遇到很很基础的问题求解答

candy84528

比如用QTP测试登陆

然后 用户密码设计为
用户名     密码
空          空
对的用户名  空
对的用户名  对的密码

执行第一组的时候   不是会弹出个框说  错误 需要输入用户名 密码么

那怎么执行下一组数据呀？

黑羽祭

回复 1# candy84528


    做个判断呗，检查是不是有弹出框存在，有则点掉，没有则不做操作。

Alvin-x

这个涉及到的其实就是关于自动化测试场景回复的问题....

candy84528

回复  candy84528


    做个判断呗，检查是不是有弹出框存在，有则点掉，没有则不做操作。
黑羽祭 发表于 2013-9-30 15:32

如何判断么  书里木有  就是以飞机票程序为例

黑羽祭

回复 4# candy84528


    If xxx("xxxx").xxx("xxx").Exist(1) Then
       xxx("xxxx").xxx("xxx").xxx("xxx").Click
   End If
第一个对象可以用弹出框
第二个就是确定之类的按钮

candy84528

回复  candy84528


    If xxx("xxxx").xxx("xxx").Exist(1) Then
       xxx("xxxx").xxx("xxx").xx ...
黑羽祭 发表于 2013-9-30 15:52

谢谢  
自己写了断  为什么一直报错

Dialog("Login").WinEdit("Agent Name:").Set DataTable("username", dtLocalSheet)
Dialog("Login").WinEdit("Password:").SetSecure DataTable("password",dtLocalSheet)
Dialog("Login").WinButton("OK").Click
If Dialog("Login").Dialog("Flight Reservations").Exist(1)  THEN

        Dialog ("Login").Dialog("Flight Reservations").WinButton("OK").Click
        Dialog ("Login").Dialog("Login").WinButton("Cancel").Click
End If

Eorr mesage
The "Flight Reservations" Dialog object was not found in the Object Repository.
Check the Object Repository to confirm that the object exists or to find the correct name for the object.

Line (4): "If Dialog("Flight Reservations").Exist(5)  THEN".

------------------------------------------------------------------------------------------------------

然后网上COPY了个脚本  也报错  为什么呢
Dialog("Login").WinEdit("Agent
Name:").Set DataTable("usename", dtLocalSheet)
Dialog("Login").WinEdit("Password:").Set DataTable("password", dtLocalSheet)
Dialog("Login").WinButton("OK").Click  
If Dialog("Login").Dialog("Flight Reservations").Exist(5)

Then

Dim err_message  
  
err_message=Dialog("Login").Dialog("Flight
Reservations").Static("Agent
name  
must be at").GetROProperty("text")

Reporter.ReportEventmicFail, "
登录失败
","
错误信息是：

"&err_message

Dialog ("Login").Dialog("Flight Reservations").WinButton("
确定
").Click Dialog("Login").WinButton("Cancel").Click

Else  

Reporter.ReportEvent micPass,"登陆成功","登陆成功"
  
Window("Flight Reservation").Close  
End If

黑羽祭

回复 6# candy84528


    Dialog("Flight Reservations")这个对象你对象库有么？
报的错是找不到控件啊

没水的骆驼

学习了··