51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2626|回复: 5
打印 上一主题 下一主题

[原创] 在线等待各位大家帮助

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2011-9-20 20:41:59 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
在代码回放过程中,弹出的对话框无法自动关闭,每次都需手动关闭
在线等待各位大侠求解


代码如下:
Browser("xxxxxx").Page("xxxxxx").WebEdit("user.name").Set DataTable("username", dtGlobalSheet)
Browser("xxxxxx").Page("xxxxxx").WebEdit("user.password").SetSecure DataTable("password", dtGlobalSheet)
Browser("xxxxxx").Page("xxxxxx").WebEdit("veryCode").Set "oxh1"
Browser("xxxxxx").Page("xxxxxx").WebButton("WebButton").Click
If Browser("xxxxxx").Dialog("Microsoft Internet Explorer").Exist Then
If Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("text:=[用户名不能为空!]").Exist Then
Browser("xxxxxx").Dialog("Microsoft Internet Explorer").WinButton("确定").click
Reporter.ReportEvent micPass,"失败测试","用户名不能为空"

elseif Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("test:=[密码不能为空!]").Exist then
Browser("xxxxxx").Dialog("Microsoft Internet Explorer").WinButton("确定").click
Reporter.ReportEvent micPass,"失败测试","密码不能为空"

elseif Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("test:=[用户名或密码错误!]").Exist then
Browser("xxxxxx").Dialog("Microsoft Internet Explorer").WinButton("确定").click
Reporter.ReportEvent micPass,"失败测试","用户名、密码输入不正确"
else Reporter.ReportEvent micFail,"输入异常","输入异常错误!"
End If
else
Reporter.ReportEvent micPass,"登录成功","登录成功!"
end if

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    擦汗
    2017-2-4 09:49
  • 签到天数: 145 天

    连续签到: 1 天

    [LV.7]测试师长

    2#
    发表于 2011-9-21 09:29:40 | 只看该作者
    If Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("text:=[用户名不能为空!]").Exist Then
    Browser("xxxxxx").Dialog("Microsoft Internet Explorer").WinButton("确定").click
    end if
    这句话在代码开头处再写一遍,行不?
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
     楼主| 发表于 2011-9-21 10:30:27 | 只看该作者
    本帖最后由 jiangzi512 于 2011-9-21 10:36 编辑

    75352[/attachimg]
    调整以后在执行到第一行参数后会弹出上边错误信息

    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

    x
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
    发表于 2011-9-21 11:36:44 | 只看该作者
    拿出来试试。。
    1. Browser("xxxxxx").Page("xxxxxx").WebEdit("user.name").Set DataTable("username", dtGlobalSheet)
    2. Browser("xxxxxx").Page("xxxxxx").WebEdit("user.password").SetSecure DataTable("password", dtGlobalSheet)
    3. Browser("xxxxxx").Page("xxxxxx").WebEdit("veryCode").Set "oxh1"
    4. Browser("xxxxxx").Page("xxxxxx").WebButton("WebButton").Click
    5. If Browser("xxxxxx").Dialog("Microsoft Internet Explorer").Exist Then
    6.         If Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("text:=[用户名不能为空!]").Exist Then
    7.                 Reporter.ReportEvent micPass,"失败测试","用户名不能为空"
    8.         elseif Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("test:=[密码不能为空!]").Exist then
    9.                 Reporter.ReportEvent micPass,"失败测试","密码不能为空"
    10.         elseif Browser("xxxxxx").Dialog("Microsoft Internet Explorer").static("test:=[用户名或密码错误!]").Exist then
    11.                 Reporter.ReportEvent micPass,"失败测试","用户名、密码输入不正确"
    12.         else
    13.                 Reporter.ReportEvent micFail,"输入异常","输入异常错误!"
    14.                 flag = 1
    15.         End If
    16.         If flag <> 1 Then
    17.                 Browser("xxxxxx").Dialog("Microsoft Internet Explorer").WinButton("确定").click
    18.         Else
    19.         'Keep going
    20.         End If
    21. else
    22.         Reporter.ReportEvent micPass,"登录成功","登录成功!"
    23. end if
    复制代码
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    5#
     楼主| 发表于 2011-9-21 23:27:52 | 只看该作者
    回复 4# Ganve_001


        ok,好了,是对象没被识别吧,spy了一下
       多谢你的帮助啊
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    奋斗
    2017-4-10 11:26
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    6#
    发表于 2011-9-23 12:44:21 | 只看该作者
    好了就可以了 呵呵  还是论坛里热心人多啊
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-8 11:06 , Processed in 0.076478 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表