51Testing软件测试论坛

标题: 如何读取弹出框内容？请大家帮忙~ [打印本页]

作者: denghuirong 时间: 2010-1-21 08:39
标题: 如何读取弹出框内容？请大家帮忙~
为了检验登录失败，我使用对弹出对话框检查的方法实现，代码如下。

Dim var_GetTOProperty
Browser("OA-用户登录").Page("OA-用户登录").WebEdit("j_username").Set "125"
Browser("OA-用户登录").Page("OA-用户登录").WebEdit("j_password").SetSecure ""
Browser("OA-用户登录").Page("OA-用户登录").WebButton("WebButton").Click
If  Browser("OA-用户登录").Dialog("Microsoft Internet Explorer").exist(1) Then
var_GetTOProperty = Browser("OA-用户登录").Dialog("Microsoft Internet Explorer").GetVisibleText(top)
If  var_GetTOProperty <> "请输入密码！"Then
  msgbox(var_GetTOProperty )
End If
Browser("OA-用户登录").Dialog("Microsoft Internet Explorer").close
End If

执行后，返回值却是弹出框所有的属性值，而我只需要它返回弹出框的文本内容“请输入密码！”。如下图：
也采用了Static("请输入密码！").GetROProperty("regexpwndtitle")，但却报错。

作者: dreamever 时间: 2010-1-21 09:41
因为你的那个弹出框中，文本标签的内容就是包含“Miscorsoft……“这些文本的，也就是说它和”请输入密码“在一个对象里。
从自动化测试的角度来讲，返回所有的文本信息也没有什么关系，无非就是两个文本内容的比较嘛。想一想，如果文本框中所有的内容都符合你的预期，那么其中某一段文本会出现不符合你预期结果的情况吗？

作者: denghuirong 时间: 2010-1-21 10:42
标题: 回复 2# 的帖子
谢谢了。我还以为是我用的方法不对。

作者: 770639805 时间: 2010-1-21 13:32
就截取你你想要的部分就好了啊

作者: 风雪夜归人 时间: 2010-1-21 17:20
其实，一个output轻松实现，lz可以一试~

作者: denghuirong 时间: 2010-2-4 17:54
标题: 回复 5# 的帖子
谢谢风雪夜归人
我试试

作者: denghuirong 时间: 2010-2-4 17:55
标题: 运行结束后，如何把弹出框的属性值存到DataTable中
现在我把弹出框的属性值存到DataTable中，在运行的时候可以在DataTable里看到，但是当运行结束后，这些值就不会显示了。
请问哪位知道怎么在运行结束后，仍在DataTable里保留这些弹出框的属性值么？

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)