higkoo 2007-6-18 13:15
QTP调用VBS的问题
[font=楷体_GB2312][size=4][color=purple]我想用QTP调用VBS脚本,代码如下:[/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple][/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple]ExecuteFile "c:\MyFuctions.vbs"[/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple][/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple]MyFuctions.vbs内容:[/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple]Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "net send COMPUTERNAME " & "Hello!"[/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple][/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple]单独执行VBS是可以通过的,但使用QTP调用,就提示:“缺少对象WScript”[/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple][/color][/size][/font]
[font=楷体_GB2312][size=4][color=purple]哪位大侠知道是哪里的问题?[/color][/size][/font]
winfood 2007-6-18 14:07
在试验QTP里面的例子时遇到过类似问题,把Set WshShell = WScript.CreateObject("WScript.Shell")改成
Set WshShell = CreateObject("WScript.Shell")就没有问题了。错误是因为在QTP里面没有定义WScript这个类型。
我们公司的安全策略把net send禁止了,所以后面那个语句不能验证是否正确。
higkoo 2007-6-18 14:36
搞定
[quote]原帖由 [i]winfood[/i] 于 2007-6-18 14:07 发表 [url=http://bbs.51testing.com/redirect.php?goto=findpost&pid=571624&ptid=79962][img]http://bbs.51testing.com/images/common/back.gif[/img][/url]
在试验QTP里面的例子时遇到过类似问题,把Set WshShell = WScript.CreateObject("WScript.Shell")改成
Set WshShell = CreateObject("WScript.Shell")就没有问题了。错误是因为在QTP里面没有定义WScript这个类 ... [/quote]
解决问题, 就如WINFOOD所述……
v_v 2007-8-6 16:25
学到了
”安全策略把net send禁止了“也会涉及到这的。。
远野志贵 2008-7-21 15:38
楼上的连NET SEND都涉及到了,看来是高手了.
lushuishui 2008-7-30 17:13
学习了