51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2294|回复: 5
打印 上一主题 下一主题

[原创] QTP如何抓取一个网页的源码?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2006-9-5 16:44:48 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
就是查看一个网页的源代码,然后从中查找一些内容,有知道怎么做的么?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    开心
    2016-2-27 08:48
  • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵

    2#
    发表于 2006-9-5 16:58:23 | 只看该作者
    楼主到底是想做什么?是想增加一个检查点还是?
    你不用QTP,直接 查看网页的源代码 ,不是更方便吗?
    我不知道你的目的是什么。但我想 你没有必要非得要查看网页的源代码吧。看看有没有别的方法来达到你的目的。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
     楼主| 发表于 2006-9-5 18:03:09 | 只看该作者

    已经解决

    就是把一些网页的内容放到一起,进行信息统计,关键字数量统计。
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2016-2-27 08:48
  • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵

    4#
    发表于 2006-9-5 19:21:11 | 只看该作者
    楼主能否把此问题解决的方法共享一下? 谢谢!
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    5#
     楼主| 发表于 2006-9-7 09:48:02 | 只看该作者

    其实很简单的,就是一开始想复杂了。

    通过操作clipboard就可以了。一开始定义一个对象,然后录制用通过菜单操作把源文件copy到clipboard中。然后用一个clipboard.GetText方法。就实现了。源文件太长,我缩写了一下。缩写后的代码如下:
    Set clipboard = CreateObject("Mercury.Clipboard")
    Browser("some page").WinToolbar("ToolbarWindow32").Press "&View"
    Browser("some page").WinMenu("ContextMenu").Select "Source"
    Browser("some page").Page("some page").Sync
    Window("Notepad").WinEditor("Edit").Type micCtrlDwn + "a" + micCtrlUp
    Window("Notepad").WinEditor("Edit").Type micCtrlDwn + "c" + micCtrlUp
    MsgBox clipboard.GetText
               '  ~~~~~~~~~~~~~~~这里原来是把内容写到一个文件里,当然也可以进行其它操作。
    Window("Notepad").Close
    Browser("some page").Page("some page").Sync
    Browser("some page").Close
    也许各位还有其它的办法,可以交流一下。
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2016-2-27 08:48
  • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵

    6#
    发表于 2006-9-7 10:17:54 | 只看该作者
    谢谢楼主的无私奉献精神! 多谢楼主!
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-10-7 12:27 , Processed in 0.073923 second(s), 25 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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