2012年给力新作《精通QTP——自动化测试技术领航》试读以及答疑专用贴

leisss

回复 126# vancl

好像是qtp不支持WScript的， 书里面的例子我改成了
Set WshShell= CreateObject("WScript.Shell")
WshShell.run "notepad"
wait 1.5
WshShell.AppActivate "无标题  -  记事本"
WshShell.SendKeys "H"
wait 0.5
WshShell.SendKeys "a"
wait 0.5
。。。。。。

leisss

Browser("51Testing软件测试论坛 软件测试 |").Page("51Testing软件测试论坛 软件测试 |").WebRadioGroup("每页主题数").Select "30"
Browser("51Testing软件测试论坛 软件测试 |").Page("51Testing软件测试论坛 软件测试 |").WebRadioGroup("每页主题数").Object.value ="30"

试了几次，select设置成功,object.value这方法没有设置成功

yujie6832

不好意思，各位，最近出差在外，无法回答问题，笔记本上没有QTP环境

lujian2036

纯支持下。。

千与千寻KOKO

看书看了一半了，挺好的，就是自己还是不会应用到工作的项目中去

千与千寻KOKO

我买了四书QTP的书，就你这本最好，其他的真是差远了，呵呵

yujie6832

你好！已经正在学习了。只是最近遇到一个问题，QTP工具test专家试图这个窗口上面菜单栏和工具栏不知道怎么弄 ...
vancl 发表于 2012-3-2 10:22

    实在不好意思，今天才回复，前段时间出差，实在没时间，这个属于QTP时常会发生的一个小小的BUG吧。解决办法是：Tools->Customize->Toolbars->Restore All 或者 Tools->Options->General->Restore Layout

yujie6832

回复 124# zz45509


    这个倒是个奇怪的问题，我暂时不知道原因，时间比较紧，就不帮你试了，你就根据不会报错的写，最后，回答的太晚，抱歉，前段时间太忙了

yujie6832

QTP10的汉化包
QTP
《精通QTP-自动化测试技术领航》
我今天看到贴吧里的诱人宣传这本书，就买了，有点期 ...
R12416 发表于 2012-3-7 16:10

兄弟，QTP10.0好像没汉化包，就算有也别用，BUG一大堆，一定要用原版的

yujie6832

回复 126# vancl


    126楼是对的，我们写这个例子的时候是拎一下VBS，这个写法不能在QTP里用的，需要用VBS EDIT，126楼的方法是对的，这个在后面的章节我们是有教过的，创建实例必须是createObject("WSCRIPT.SHELL")

snakeshiy

发现个小问题，277页最后，启动IE的3种常见方法中的WSH方法，是不是漏写了一句
oShell.Run "iexplore"
翻到后面一页也没看到

yujie6832

回复 128# leisss


    帮你查了这个问题，这个论坛里有问题，你可以选择10，然后去抓下，你会发现他的值居然是30

yujie6832

回复 137# snakeshiy


    非常感谢你提出的BUG，我们已经收集

yujie6832

看书看了一半了，挺好的，就是自己还是不会应用到工作的项目中去
千与千寻KOKO 发表于 2012-3-10 17:19

请问你看到第几章节了？一般情况下，看完第一大章和第二大章的“精通8控件”那个章节后，就可以独立上手做项目了，我们在章节的描述中都是一直在引导大家思维，如何去做项目，加油，我们对我们自己写的东西也非常有信心

zz45509

RegisterUserFunc "WebEdit","Set","WriteLog_WebEdit_Set"
Browser("佳信捷综合视频管理平台").Page("佳信捷综合视频管理平台").WebEdit("username").Set "123456"
Function Write_WebEdit_Set(Object,SetValue)
   Object.Set SetValue
   Const ForAppending = 8
   Const ForReading = 1
   Const ForWriting = 2
   Set fso = CreateObject("scripting.filesystemobject")
   LogFileName = cstr(Year(Now)&Month(Now)&Day(Now))+".txt"
   oParentFolder = Environment.Value("ResultDir")
   LogFilePath = oParentFolder+"\"+LogFileName
   If not fso.FileExists(LogFilePath) Then
           Set txtFile =fso.CreateTextFile(LogFilePath,false)
   Else
           Set txtFile = fso.OpenTextFile(LogFilePath,ForAppending,True)
   End If
   WriteConent = cstr(Time)+"Object:["+_
   Object.GetTOProperty("micClass")+"-"+_
   Object.GetTOProperty("TestObjName")+_
   "] - Description:"+" “Set Value is <" + SetValue + ">" + "“"
   txtFile.WriteLine WriteConent
   Set txtFile = Nothing
   Set fso = Nothing
End Function

报错哦 对象不支持此属性或方法: 'Browser(...).Page(...).WebEdit(...).Set'
但是把那句话放到注册函数前 这个函数就没用了

applue

这本书写的真的很好，很多问题在这上面都能找到答案。
公司正在让我们研究是用QTP还是Selenium进行自动化，我负责QTP的研究，买了这本书后帮助非常大。
同时，同事买了两本selenium的书，一对比，那两本书简直就是垃圾！
谢谢版本了，把自己的知识以及经验传递给大家！

yujie6832

这本书写的真的很好，很多问题在这上面都能找到答案。
公司正在让我们研究是用QTP还是Selenium进行自动化， ...
applue 发表于 2012-3-13 18:51

    我就喜欢你这样的评论^_^

kaikaihi

看了三十页了。。好想一口气看完啊 。。呼呼~

kaikaihi

看了三十页了。。好想一口气看完啊 。。呼呼~

千与千寻KOKO

由于角色和下拉框控件识别不出来，想使用DOM，右边两幅图是角色和下拉框的HTML源代码，请问怎么写代码，希望能得到老师您的指点，嘿嘿。。。