51Testing软件测试论坛

标题: QTP如何抓取一个网页的源码? [打印本页]

作者: claude    时间: 2006-9-5 16:44
标题: QTP如何抓取一个网页的源码?
就是查看一个网页的源代码,然后从中查找一些内容,有知道怎么做的么?
作者: walker1020    时间: 2006-9-5 16:58
楼主到底是想做什么?是想增加一个检查点还是?
你不用QTP,直接 查看网页的源代码 ,不是更方便吗?
我不知道你的目的是什么。但我想 你没有必要非得要查看网页的源代码吧。看看有没有别的方法来达到你的目的。
作者: claude    时间: 2006-9-5 18:03
标题: 已经解决
就是把一些网页的内容放到一起,进行信息统计,关键字数量统计。
作者: walker1020    时间: 2006-9-5 19:21
楼主能否把此问题解决的方法共享一下? 谢谢!
作者: claude    时间: 2006-9-7 09:48
标题: 其实很简单的,就是一开始想复杂了。
通过操作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
也许各位还有其它的办法,可以交流一下。
作者: walker1020    时间: 2006-9-7 10:17
谢谢楼主的无私奉献精神! 多谢楼主!




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2