51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

楼主: yujie6832
打印 上一主题 下一主题

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

[复制链接]

该用户从未签到

401#
发表于 2012-11-13 17:21:32 | 只看该作者
YU老师,问个问题,我运行202页那个脚本时,
step1--------------------------------------------
systemutil.Run "www.51testing.com"
Browser("micClass:=Browser").Navigate "bbs.51testing.com"
Browser("micClass:=Browser").Page("micClass:=Page").Sync:Wait 1
checkURL=TRIM(Browser("micClass:=Browser").Object. LocationURL)
msgbox checkURL
If checkURL="http://bbs.51testing.com/" Then
        Reporter.ReportEvent micPass,"step 1","pass"
else
    Reporter.ReportEvent micFail ,"step 1","faile"
End If
在这一段:checkURL=TRIM(Browser("micClass:=Browser").Object. LocationURL)
报General run error错误。什么地方错了啊?
回复 支持 反对

使用道具 举报

该用户从未签到

402#
发表于 2012-11-13 21:32:34 | 只看该作者
余老师,帮忙看下下面这段代码:
'Step 1--------------------------------------------
systemutil.Run "www.51testing.com"  '启动IE并进入指定网站
Browser("micClass:=Browser").Navigate "http://bbs.51testing.com/" '在当前窗口中直接跳转到其它网页
Browser("micClass:=Browser").Page("micClass:=Page").Sync:Wait 1 '保证当前页面的工作完全结束,然后再去做后续的事情
'checkpoint start -------------------------------------->
'通过自身属性借口获取当前浏览器的URL用于STEP 1的验证
checkURL=TRIM(Browser("micClass:=Browser").Object. LocationURL)
'msgbox checkURL
if  checkURL="http://bbs.51testing.com/" Then
        Reporter.ReportEvent micPass,"step 1","pass"
else
    Reporter.ReportEvent micFail ,"step 1","faile"
End If
'end of checkpoing    <-----------------------------------------


'Step 2---------------------------------------------------------------------------
Browser("micClass:=Browser").OpenNewTab
testHWND=Browser("name:=导航已取消").GetROProperty("hwnd")
'msgbox testHWND
Browser("name:=导航已取消").Navigate "bbs.51testing.com"


'step 3 -------------------------------------------------------------------------------
Browser("51Testing软件测试论坛_首页").Page("51Testing软件测试论坛_首页").Link("登录").Click
With Browser("51Testing软件测试论坛_首页").Page("51Testing软件测试论坛_登陆界面")
            .WebEdit("username").Set "lmj19851117"
            .WebEdit("password").Set "lmj19851117"
            .WebButton("登录").Click
End With
'checkpoint start------------------------------->
oExist=Browser("51Testing软件测试论坛_首页").Page("51Testing软件测试论坛_首页").Link("退出").Exist
If oExist Then
        Reporter.ReportEvent micPass ,"step 3","pass"
else
   Reporter.ReportEvent micFail,"step 3","faile"
End If
'end of checkpoint  <---------------------------------


'step 4 ---------------------------------------------------
'msgbox testHWND

Browser("hwnd:="&testHWND).Close
Browser("micClass:=Browser").Refresh:wait 1
'checkpoint start------------------------------->
oExist=Browser("51Testing软件测试论坛_首页").Page("51Testing软件测试论坛_首页").Link("退出").Exist
If oExist Then
        Reporter.ReportEvent micPass ,"step 4","pass"
else
   Reporter.ReportEvent micFail,"step 4","faile"
End If
现在的问题是在执行Step3的登录步骤时,为什么会跑到第一个选项卡去登录,而不是第二个选项卡?
回复 支持 反对

使用道具 举报

该用户从未签到

403#
 楼主| 发表于 2012-11-14 15:10:36 | 只看该作者
回复 404# zz45509


    好的,我跟小赵商量商量,如何去把最后一章写的更好,下一版本更新上去
回复 支持 反对

使用道具 举报

该用户从未签到

404#
 楼主| 发表于 2012-11-14 15:20:28 | 只看该作者
回复 405# malasyan


    饿,这个是小赵写的,我跟他说过的,可能他比较忙,没上来看吧,我再跟他说下,不好意思
回复 支持 反对

使用道具 举报

该用户从未签到

405#
发表于 2012-11-14 15:37:20 | 只看该作者
回复 398# malasyan


    我这边试了啊,利用for循环没有任何问题呢,count也是2

脚本如下:

sqlConnection = "DSN=Excel Files;DBQ=D:\1.xlsx"
sqlCommand = "select * from [Sheet1$]"
Set oExcel = CreateObject("adodb.connection")
oExcel.Open sqlConnection
Set oRst= oExcel.Execute(sqlCommand)
For i=1 To  oRst.Fields.Count

        MsgBox oRst.Fields.Item("username").Value
        oRst.MoveNext

Next
回复 支持 反对

使用道具 举报

该用户从未签到

406#
 楼主| 发表于 2012-11-14 16:11:53 | 只看该作者
回复 407# lmj19851117


    因为你获取的是第一个TAB的HWND,虽然你已经OPEN NEW TAB了,这个OPEN NEW TAB的问题很多人都问过,这边我的确不知道为什么,可能是环境问题,但是我在写代码的时候,在我的机器上是没有问题的,还有关于你之前的问题,我看了下,似乎没有什么问题,有时候报GENERAL ERROR的错误,QTP指向第几行是种假象,不一定就是这句出错
回复 支持 反对

使用道具 举报

该用户从未签到

407#
发表于 2012-11-15 11:17:10 | 只看该作者
本帖最后由 malasyan 于 2012-11-15 11:19 编辑

回复 410# zzxxbb112

老师我明白了,我写的是
    sqlCommand = "select username from [Sheet1$]"
我是只想选这一列,然后得出这一列的行数,因为我的表中,每一列的行数都不同.
没想到这样写是无效的...
回复 支持 反对

使用道具 举报

该用户从未签到

408#
发表于 2012-11-15 23:25:55 | 只看该作者
希望此类技术书籍以后能够附赠光盘,谢谢!
回复 支持 反对

使用道具 举报

该用户从未签到

409#
 楼主| 发表于 2012-11-16 16:58:27 | 只看该作者
回复 413# shenjun


    你好,我们是存心不赠送光盘的,前言里有写了原因,赠送光盘就没人一行行打代码啦,呵呵
回复 支持 反对

使用道具 举报

该用户从未签到

410#
发表于 2012-11-19 11:38:30 | 只看该作者
下一版本的书籍什么时候更新?
回复 支持 反对

使用道具 举报

  • TA的每日心情
    开心
    2015-4-12 09:43
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    411#
    发表于 2012-11-19 12:03:18 | 只看该作者
    楼主你好,前不久刚买了你的书,目前正在学习中。看到1.4的练习题二,有一点疑问。句8始终报错,提示找不到Link("关闭"),我在网页上也找了很久,也没有找到。是网站改版了吗?
    盼回复FLYBIRD26@HOTMAIL.COM

    谢谢!
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    412#
     楼主| 发表于 2012-11-20 14:44:08 | 只看该作者
    回复 416# flybird26


        更新你的对象库,重新抓下对象
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    413#
    发表于 2012-11-20 16:22:33 | 只看该作者
    回复  yujie6832

    杰哥你好,
    在“自定义验证点-HTML模式”中,为什么检查enable, visible,checked 属 ...
    yongfeiuall 发表于 2012-7-10 09:13


    这个问题已经解决, VerifyProperty方法,怎么检查list里边的内容呢?因为实际结果有个换行的显示,预期结果该如何填写呢?我怎么设置都没成功,请提示一下呗?多谢。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    414#
     楼主| 发表于 2012-11-21 17:06:27 | 只看该作者
    今天意外地收到一则好消息,我们的这本《QTP自动化测试技术领航》居然有幸在CSDN的《2012年最具有技术影响力原创图书评选》里被提名了,一共有30本书进入本次提名的最后一轮。在这里希望广大喜欢这本书的朋友能抽出1分钟的时间帮我们投下票,如果还没注册的朋友可能会花上5分钟的时间,也算是对我们的一种鼓励和支持,多谢!我们没想过得第一,希望能让测试书籍进入前10吧:)
    投票地址:http://special.csdn.net/choose2012/yc.html
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2018-7-9 09:21
  • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵

    415#
    发表于 2012-11-26 11:09:16 | 只看该作者
    我也在读这本书,的确有bug,不过没有用心记下,下次一定要提出来。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    416#
     楼主| 发表于 2012-11-27 11:27:41 | 只看该作者
    回复 420# wanghailan0208


        有时候会有些错别字,有些还是我们写的对的,出版社编辑帮我们编辑错的,至于代码里的BUG应该说是很少,几乎没有的,因为我们都是调试通过的。
       如果现在通过不了,那是因为对象发生变化了,不过这些都不是关键,我们要的并不是读者的照抄
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    417#
    发表于 2012-11-27 12:47:53 | 只看该作者
    支持!支持!支持!
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    418#
    发表于 2012-11-28 12:12:29 | 只看该作者
    1. {:4_100:}
    复制代码
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    419#
    发表于 2012-11-29 10:03:18 | 只看该作者
    整本书前三分之一看了3遍,后面只能囫囵吞枣先塞着,慢慢积累,期待第二版啊,第二版里希望能加上光盘,有些童鞋由于一些原因不能实际去试验书中的知识。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    420#
    发表于 2012-11-29 16:52:50 | 只看该作者
    书上图片暴帅 为甚么这里不一样罗
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-11-23 02:54 , Processed in 0.079442 second(s), 21 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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