设为首页收藏本站
开启辅助访问 软件测试门户软件测试培训软件测试论坛测试解决方案文章资料精选软件测试博客软件测试招聘

51Testing软件测试论坛

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

QQ登录

只需一步，快速开始

微信登录，快人一步

手机号码，快捷登录

51Testing软件测试论坛 »软件测试论坛 › [管理工具] › [自动化测试工具及框架] › [QuickTest Professional] › 刚学qtp,描述性编程遇到了问题
返回列表 发新帖
查看: 2696|回复: 13
打印 上一主题 下一主题

[求助] 刚学qtp,描述性编程遇到了问题

[复制链接]
orange2008

该用户从未签到
跳转到指定楼层
1#
发表于 2008-1-22 10:11:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我只是做登陆时的验证。

Set MyBro=description.Create()
Set MyPage=description.Create()
Set MyEdit=description.Create()
MyBro("title").value="TRMeister Web"
MyPage("titile").value="TRMeister Web"
MyEdit("name").value="userName"
MyEdit("type").value="text"
Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Click  //这一行出错了
Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Set "aaa"
.
.
.

错误信息：Cannot identify the object "WebEdit" (of class WebEdit). Verify that this object's properties match an object currently displayed in your application.

大家帮帮忙/。。。

怎么会不识别webEdit?
描述性, QTP
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
微信
收藏收藏

相关帖子

【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复

使用道具 举报

jinsen

该用户从未签到
2#
发表于 2008-1-22 10:16:14 | 只看该作者
MyPage("titile").value="TRMeister Web"
单词拼错了。
回复 支持 反对

使用道具 举报

xjmen

该用户从未签到
3#
发表于 2008-1-22 10:29:29 | 只看该作者
用Object Spy 查看一下这个webEdit对象，你看看识别的属性是不是有问题
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
4#
 楼主| 发表于 2008-1-22 10:38:37 | 只看该作者
属性没有问题啊，
就是多了一个webtable，但是录制的时候是没有的阿，大家帮帮忙把

title我刚拼写错了
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
5#
 楼主| 发表于 2008-1-22 10:47:29 | 只看该作者
目录是这样的：
browse:Te web
    page: te web
        webTable:user name
             webEdit:user name
回复 支持 反对

使用道具 举报

jinsen

该用户从未签到
6#
发表于 2008-1-22 10:53:02 | 只看该作者
拼写错误改正后也是出现原来的错误吗？
Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Click  
这一行的目的是什么？
如果把这行给注释了，后面的set(赋值)能够运行吗？
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
7#
 楼主| 发表于 2008-1-22 11:08:14 | 只看该作者
你能帮我写一段关于登陆的代码吗？
比如那个网上盯机票的系统，用描述性编程
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
8#
 楼主| 发表于 2008-1-22 11:10:59 | 只看该作者
1，修改还是会出现错误
2，Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Click ，就是为了激活要输入用户名的那个text文本框
3，这行给注释了，后面的set(赋值）也是出现webEdit不识别的错误
回复 支持 反对

使用道具 举报

jinsen

该用户从未签到
9#
发表于 2008-1-22 12:03:50 | 只看该作者
  1. SystemUtil.Run "IEXPLORE.EXE","http://bbs.51testing.com/default.php","","","3"
  2. Browser("CreationTime:=0").Page("index:=").Link("name:=登录").Click
  3. '用户名和密码你使用自己的吧
  4. Browser("CreationTime:=0").Page("index:=").WebEdit("name:=username").Set "xxxxxxx"
  5. Browser("CreationTime:=0").Page("index:=").WebEdit("name:=password").SetSecure "xxxxxxxxxxxxxx"
  6. Browser("CreationTime:=0").Page("index:=").WebButton("name:=提交").Click
  7. Browser("CreationTime:=0").Page("index:=").Link("url:=http://bbs.51testing.com/forum-69-1.html").Click
  8. Browser("CreationTime:=0").Page("index:=").Link("name:=刚学qtp,描述性编程遇到了问题").Click
  9. Browser("CreationTime:=1").Page("index:=").Sync
  10. Browser("CreationTime:=1").Close
  11. Browser("CreationTime:=0").Page("index:=").Link("name:=退出").Click
  12. Browser("CreationTime:=0").Page("index:=").Sync
  13. Browser("CreationTime:=0").Close
复制代码
description的方法等我改造一下再贴出来。
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
10#
 楼主| 发表于 2008-1-22 13:16:43 | 只看该作者
好的，谢谢你了，真是麻烦你了。。。
回复 支持 反对

使用道具 举报

今天有雾

该用户从未签到
11#
发表于 2008-1-22 13:56:08 | 只看该作者
原帖由 orange2008 于 2008-1-22 10:11 发表
我只是做登陆时的验证。

Set MyBro=description.Create()
Set MyPage=description.Create()
Set MyEdit=description.Create()
MyBro("title").value="TRMeister Web"
MyPage("titile").value="TRMeister Web"
MyEdit("name").value="userName"
MyEdit("type").value="text"
Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Click  //这一行出错了
Browser(MyBro).Page(MyPage).WebEdit(MyEdit).Set "aaa"


我有点奇怪，Description能像楼主那样的说话用嘛？
Browser(MyBro)。。。。。。。。。？
回复 支持 反对

使用道具 举报

jinsen

该用户从未签到
12#
发表于 2008-1-22 14:19:38 | 只看该作者
  1. SystemUtil.Run "IEXPLORE.EXE","http://bbs.51testing.com/default.php","","","3"
  2. Dim myBrowser1,myPage1,myLink1,myLink2,myLink3,myLink4,myWebEdit1,myWebEdit2,myWebButton,myBrowser2,myPage2,myPage3,myBrowser3

  4. Set myBrowser1 = Description.Create()
  5. myBrowser1("title").value = "51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  7. Set myPage1 = Description.Create()
  8. myPage1("title").value = "51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  10. Set myLink1 = Description.Create()
  11. myLink1("name").value = "登录"

  13. Set myWebEdit1 = Description.Create()
  14. myWebEdit1("name").value = "username"

  16. Set myWebEdit2 = Description.Create()
  17. myWebEdit2("name").value = "password"

  19. Set myLink2 = Description.Create()
  20. myLink2("name").value = "\[QuickTest Pro\]"

  22. Set myLink3 = Description.Create()
  23. myLink3("name").value = "刚学qtp,描述性编程遇到了问题"

  25. Set myWebButton = Description.Create()
  26. myWebButton("name").value = "提交"

  28. Set myPage2 = Description.Create()
  29. myPage2("title").value = "\[QuickTest Pro\] - 51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  31. Set myBrowser2 = Description.Create()
  32. myBrowser2("title").value = "\[QuickTest Pro\] - 51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  34. Set myBrowser3 = Description.Create()
  35. myBrowser3("title").value = "刚学qtp,描述性编程遇到了问题 - \[QuickTest Pro\] - 51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  37. Set myPage3 = Description.Create()
  38. myPage3("title").value = "刚学qtp,描述性编程遇到了问题 - \[QuickTest Pro\] - 51Testing软件测试论坛 测试 \| 软件测试 \| 软件缺陷跟踪 \| 软件配置工具 \| 测试用例设计 \| Web测试 \| 自动化测试工具 - Powered by Discuz!"

  40. Set myLink4 = Description.Create()
  41. myLink4("name").value = "退出"

  43. Browser(myBrowser1).Page(myPage1).Link(myLink1).Click
  44. Browser(myBrowser1).Page(myPage1).WebEdit(myWebEdit1).Set "xxxxx"
  45. Browser(myBrowser1).Page(myPage1).WebEdit(myWebEdit2).SetSecure "xxxxxx"
  46. Browser(myBrowser1).Page(myPage1).WebButton(myWebButton).Click
  47. Browser(myBrowser1).Page(myPage1).Link(myLink2).Click
  48. Browser(myBrowser2).Page(myPage2).Link(myLink3).Click
  49. Browser(myBrowser3).Page(myPage3).Sync
  50. Browser(myBrowser3).Close
  51. Browser(myBrowser2).Page(myPage2).Link(myLink4).Click
  52. Browser(myBrowser2).Page(myPage2).Sync
  53. Browser(myBrowser2).Close
复制代码
这个是完全按照楼主贴出来的代码的形式写的。
回复 支持 反对

使用道具 举报

orange2008

该用户从未签到
13#
 楼主| 发表于 2008-1-22 16:38:42 | 只看该作者
谢谢你，解决了
回复 支持 反对

使用道具 举报

frankwangzy1103

该用户从未签到
14#
发表于 2008-1-23 11:42:24 | 只看该作者
原帖由 orange2008 于 2008-1-22 10:11 发表
我只是做登陆时的验证。

Set MyBro=description.Create()
Set MyPage=description.Create()
Set MyEdit=description.Create()
MyBro("title").value="TRMeister Web"
MyPage("titile").value="TRMeister Web" ...

每个对象的operate是不一样的，像webedit是没有click这个动作的，所以会出错，你可以用spy点一个webedit，看看property旁边的method上都有什么方法。
回复 支持 反对

使用道具 举报

返回列表 发新帖

本版积分规则

关闭

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

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

GMT+8, 2024-11-15 20:38 , Processed in 0.073959 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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