如何获得弹出错误提示框的文字？

No1

比如一个登陆 页面我没输入用户名 然后系统弹出一个“请输入用户名！”错误提示框我如何获得 “请输入用户名！” 这错误提示？

walker1020

请楼主参考帖子：http://bbs.51testing.com/viewthread.php?tid=43647
中的解决方法来解决你的问题。看完那个帖子后，发挥你的主管能动性，你就一定能解决自己的问题。

[ 本帖最后由 walker1020 于 2007-2-5 09:51 编辑 ]

yhzmw

下面的代码是录制qtp自带的飞机票订票系统时，不输入用户名点击确定时，捕获的弹出窗口信息
主要使用了getroproperty这个函数。针对这个函数你可以参考qtp精华区中的http://bbs.51testing.com/thread-13554-1-1.html 链接，讲解的比较详细
Dialog("登录").WinButton("确定").Click
Dim a
a = dialog("登录").Dialog("航班预订").Static("请输入代理名称").GetROProperty("regexpwndtitle")
msgbox "当前弹出的窗口中提示信息是! !  " + a
Dialog("登录").Dialog("航班预订").WinButton("确定").Click

No1

多谢斑竹 的热心回复 。
还有点问题
Browser("51.com 我的朋友，我的家！").Page("51.com 我的朋友，我的家！").WebEdit("passport_51_user").Set "11111"
Browser("51.com 我的朋友，我的家！").Page("51.com 我的朋友，我的家！").Image("登录").Click 37,12
message=Browser("51.com 我的朋友，我的家！").Dialog("Microsoft Internet Explorer").GetVisibleText()
message1="Microsoft Internet Explorer"+"用户名只能用数字或英文，并且必须为英文字母开头"+"OK"
if(message=message1) then
msgbox "true"
else
msgbox "false"
end if
Browser("51.com 我的朋友，我的家！").Dialog("Microsoft Internet Explorer").WinButton("OK").Click

[ 本帖最后由 No1 于 2007-2-5 10:56 编辑 ]

No1

555555555
if(message=message1) then
这句弄错了
出问题了 不过 我会继续 参考大家的意见 把它搞定

[ 本帖最后由 No1 于 2007-2-5 10:55 编辑 ]

xiaonan

if message=message1 then

这里面的message1应该是个字符串吧,加上双引号.

No1

问题解决了 谢谢大家
多谢 斑竹的热心帮助！
把那个错误提示框加到对象库里
就OK了
Browser("51.com 我的朋友，我的家！").Page("51.com 我的朋友，我的家！").WebEdit("passport_51_user").Set "11111"
Browser("51.com 我的朋友，我的家！").Page("51.com 我的朋友，我的家！").Image("登录").Click 37,12
if(Browser("51.com 我的朋友，我的家！").Dialog("Microsoft Internet Explorer").Exist(1)) then
msgbox "true"
else
msgbox "false"
end if

No1

下面的代码是录制qtp自带的飞机票订票系统时，不输入用户名点击确定时，捕获的弹出窗口信息
主要使用了getroproperty这个函数。针对这个函数你可以参考qtp精华区中的http://bbs.51testing.com/thread-13554-1-1.html 链接，讲解的比较详细
Dialog("登录").WinButton("确定").Click
Dim a
a = dialog("登录").Dialog("航班预订").Static("请输入代理名称").GetROProperty("regexpwndtitle")
msgbox "当前弹出的窗口中提示信息是! !  " + a
Dialog("登录").Dialog("航班预订").WinButton("确定").Click

"regexpwndtitle"  是获得错误信息？
是什么意思啊 给我说说阿谢谢了

yhzmw

"regexpwndtitle"  是获得错误信息？


regexpwndtitle 就是弹出的对话框的一个属性。这个属性对应的是弹出的对话框的提示信息，你用getroproperty获得这个属性就得到了对话框的文本信息

rivermen

把鼠标点击弹出的对话框上，硬拷（ctrl+c）
然后找写字板，ctrl+v，看看上面的文字是不时已经下来了？

No1

谢谢 yhzmw rivermen 详细的解释
谢谢 大家热情的帮助