51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

查看: 3001|回复: 10
打印 上一主题 下一主题

[原创] IE7和IE6弹出窗口名称分别是microsoft internet explorer和windows internet explore

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2011-12-26 22:33:09 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
各位高手,我用qtp在IE6上录制web程序,程序中有一个弹出的窗口,是类似于那种“你确定要删除吗?”的提示窗口,弹出框的名字是microsoft internet explorer,我录制好后在IE7上回放,结果找不到microsoft internet explorer对象。我检查了才知道,原来在IE7上,弹出窗口的名称叫windows internet explorer

这个问题导致我录制的脚本回放失败
请问各位大侠,怎么样才能让我的脚本在IE6和IE7上都能回放成功呢?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2011-12-27 09:06:30 | 只看该作者
添加对象,windows internet explorer对象,修改代码中的所有microsoft internet explorer
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2011-12-27 22:47:15 | 只看该作者
回复 2# mengbo0104
     这样不是办法啊,这样在IE7上回放成功,但是IE6上回放又失败了啊
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2011-12-27 23:03:51 | 只看该作者
知道怎么解决了,应该先判断窗口是否存在,用if then else语句修改脚本应该就可以了
刚看到别人的一段脚本突然想到的
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2011-12-28 13:34:33 | 只看该作者
那你考虑为什么 ie6和ie7 显示的不同了吗?
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2011-12-28 17:39:45 | 只看该作者
判断下下就可以了
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2011-12-28 19:09:40 | 只看该作者
text:=.*XXXXXXXXXXXXX.*
回复 支持 反对

使用道具 举报

该用户从未签到

8#
 楼主| 发表于 2011-12-29 21:56:23 | 只看该作者
回复 5# wangyanzhao
      没有啊?为什么啊?
回复 支持 反对

使用道具 举报

该用户从未签到

9#
 楼主| 发表于 2011-12-29 21:58:57 | 只看该作者
回复 7# lyscser
       你说的是用regular expressions么?我试过了,但是没有用
回复 支持 反对

使用道具 举报

该用户从未签到

10#
发表于 2011-12-29 22:59:53 | 只看该作者
那你实在太杯具了,不过不根本不相信没有用,web那点事很简单
  1. Public Function ClickDialogWithoutJudge
  2.         Set DialogObject = Description.Create()
  3.         DialogObject("micclass").Value = "Dialog"
  4.         Set WindowsDialog = Desktop.ChildObjects(DialogObject)

  5.         For inx = 0 to WindowsDialog.Count - 1
  6.                 diaName = WindowsDialog(inx).GetROProperty("text")
  7.                 If        InStr(diaName,"下载") <= 0 And InStr(diaName,"安装") <= 0 And InStr(diaName,"存为") <= 0 And InStr(diaName,"新邮件通知") <= 0 Then
  8.                         Set WinButtonObject = Description.Create()
  9.                         WinButtonObject("micclass").Value = "WinButton"
  10.                         Set WindowsButton = WindowsDialog(inx).ChildObjects(WinButtonObject)               
  11.                         WindowsButton(0).Click
  12.                         Set WindowsButton = Nothing
  13.                         Set WinButtonObject = Nothing                       
  14.                 End If
  15.         Next       

  16.         Set WindowsDialog = Nothing
  17.         Set DialogObject = Nothing
  18. End Function
复制代码
回复 支持 反对

使用道具 举报

该用户从未签到

11#
发表于 2012-2-3 16:10:06 | 只看该作者
还有一个方法,做两套OR,一个对应IE6,一个对应IE7。

测试哪个浏览器,加载哪个控件。最简单的玩法了。
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-5-8 14:38 , Processed in 0.076289 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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