QTP11中EmbedScript 和 RunScript 的区别

lsekfe

问起QTP11中多了的两个方法EmbedScript. 和 RunScript的区别。

这里先介绍语法形式为 ：Browser("Browser").EmbedScript. / Browser("Browser").EmbedScriptFromFile
Browser("Browser").Page("Page").RunScript. / Browser("Browser").Page("Page").RunScriptFromFile

那么它们有什么区别呢？

先说共同点。共同点是它们都是调用JavaScript。

具体可以参考另一篇博文《QTP对Web页面上的文本框赋值的技术大全》.

假如要在百度首页的输入框赋值，可以调用JS代码。

代码1：

1 SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe"
2 Browser("Browser").Page("Page").Sync
3 Browser("Browser").Navigate "http://www.baidu.com/"
4 Browser("Browser").Page("Page").RunScript"document.getElementById('kw').value = '51testing'"

代码2：

1 SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe"
2 Browser("Browser").Page("Page").Sync
3 Browser("Browser").Navigate "http://www.baidu.com/"
4 Browser("Browser").Page("Page").Sync
5 Browser("Browser").EmbedScript"document.getElementById('kw').value = '51testing'"

运行后，效果是不是一样的？

但是请注意，代码2的EmbedScript代码行上面多了一句：Browser("Browser").Page("Page").Sync

为什么要这样呢？接下来，请去掉这段代码，运行QTP，看到什么了？

哦，你会发现有时候QTP运行的结果跟代码1还是一样的，但是有时候运行的结果报错，提示信息是：

网页错误详细信息


用户代理: Mozilla/4.0 (compatible; MSIE 8.0;
Windows
NT 5.2; Trident/4.0; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)
时间戳: Thu, 8 Nov 2012 03:31:38 UTC




消息:'document.getElementById(...)' 为空或不是对象
行: 1
字符: 1
代码: 0
URI: http://www.baidu.com/
还有些时候，你会发现浏览器瞬间闪过一个黄色的惊叹号（就是报错信息），然后立即刷出了百度首页——只不过这次搜索输入框中并未正确的输入“51testing”的字符串。

换句话说，你使用EmbedScript不加Browser("Browser").Page("Page").Sync的结果就是代码运行非常不稳定。

这又是怎么回事呢？

先弄清楚Sync是干什么用的。Sync事实上是网页中的同步点，指的是QTP会等待整个web页面完全加载完成后（在IE浏览器左下方能看到“完成”的字样），再执行下一步代码。通常情况下QTP在做Browser("Browser").Navigate动作之前会自动帮你做一次等待，这个是因为有些人的浏览器默认会打开一个网页，比如是 hao123、hao.360.cn、123.sogou.com这种导航页，QTP会等你把这个页面刷完之后再做Navigate，因此我建议大家平时使用“about blank:”会加快你QTP的回放速度。

好，绕了个弯。现在来说为什么“代码1”不需要，而“代码2”需要。

因为：

RunScript是在Page对象里运行一个指定的脚本，当执行到Browser("Browser").Page("Page").RunScript行这段话时，QTP会试图先识别Browser对象再识别Page对象（如果大家听过我的QTP课的对象识别原理的录制原理和回放原理，这里就会轻松过关），当它试图RunScript的时候，必须先等待Page对象出现！而QTP如果没有等到Page对象会进入“全局同步等待”（File-Settings-Run-"Object synchronization timeout"的设置），只要没有timeout，它就会进行等待。也就是等百度的首页出现了，才去RunScript。

而“代码2”中，是Browser("Browser").EmbedScript这段话。请注意这里没有Page对象！而Browser对象老早就已经加载进来了（第2行就已经加载完毕了），所以这个时候QTP并没有进行“全局同步等待”，而是“瞬间”去执行下一行代码：

Browser("Browser").EmbedScript。问题是现在百度的首页Page对象都还没有加载进来（DOM对象也没有加载进来），你就直接运行document.getElementById怎么可能成功呢？皮之不存，毛将焉附？

再来看更加本质的区别。

EmbedScript的作用是 Runs the specified JavaScript. each time a page or frame. loads or refreshes in the browser. 也就是在你每次加载这个Page页面或者frame框架的时候都会运行它，并且注意：

• The script. remains embedded until you close the browser, or until the run session ends.

什么意思？就是只要没有关闭浏览器或者运行的会话还在，这段脚本一直生效！

再强调一遍：RunScript只是运行脚本（一次性的），一旦页面被重新载入（比如再触发一次Navigate），脚本的生存期就结束了；而EmbedScript则是相当于加载一个脚本（常驻的），即使页面发生跳转、重新载入也仍然有效。再来看下面两段代码的对比。

代码3：

SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate "http://www.baidu.com/"
Browser("Browser").Page("Page").Sync
Browser("Browser").Page("Page").RunScript. "var i;i=0;i++;i++;"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate "http://www.baidu.com/"
Browser("Browser").Page("Page").RunScript. "alert(i);"

运行后，会报错：

A JavaScript. error occurred in "alert(i);":
'i' 未定义.

代码4：

SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate "http://www.baidu.com/"
Browser("Browser").Page("Page").Sync
Browser("Browser").EmbedScript. "var i;i=0;i++;i++;"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate "http://www.baidu.com/"
Browser("Browser").Page("Page").RunScript. "alert(i);"

代码运行后，百度页面会弹出一个对话框，显示i的值为2.

怎么样，看出区别了吗？

好，那接下来讲应用。通常，我们会习惯上把EmbedScript和RunScript结合起来使用。先用EmbedScript加载一个js文件，比如jQuery的js脚本，然后用RunScript去运行某个方法。比如这种用法：

Browser(":=").EmbedScriptFromFile"c:\jquery-1.3.2.js"
str = "EmbedScript. QTP"
Browser(":=").Page(":=").WebEdit("name:=wd","type:=text").Set str
Browser(":=").Page(":=").WebButton("name:=OK","type:=submit").Click
iCount = Browser(":=").Page(":=").RunScript("$('#resultStats').children('b').eq(2).text()")
lPage = CLng(iCount) - 10
Browser(":=").Navigate "http://www.songfun.com/search?hl=en&q=" & str & "&start=" & lPage & "&filter=0"

xjwldlover

不测试基于组件的web应用无法体会到这两个函数的绝大妙用啊，怎一个爽字了得~

xjwldlover

好文~！收藏了

黑羽祭

顶上~~
这个没留意过，有时间要好好学习一下

赵佳乐SMILE

虽然看不懂 但感觉写的很好

楼主你换头像了