QTP运行时提示“缺少对象: 'WScript'”问题处理

今天BSTT群里有群友碰到一个问题缺少对象: 'WScript'”，示例如下.

Dim WshShell

Set WshShell=WScript.CreateObject("WScript.Shell")

WshShell.Run "notepad"

WScript.Sleep 2000   

修证如下：将以上代码封装成test.vbs保存在C盘根目录下，Qtp代码编写如下。

Dim WshShell

Set WshShell=CreateObject ("WSCript.shell")

WshShell.run "cmd /K wscript. c:\test.vbs"

原因分析：WScript是windows操作系统对象，不是QtP的对象，所以运行时报这个错误。WSCript全称“Windows Scripting Host”，它是Windows 98新增的功能，是一种批次语言/自动执行工具——它所对应的程序“WSCript.exe”是一个脚本语言解释器，位于WINDOWS目录下，正是它才使得脚本可以被执行，就象执行批处理一样，可以拿来执行.wsh，.vbs，.js等。它本身并不是病毒，但由于其功能十分强大，所以会被一些恶意病毒代码所利用。建议您安装用杀毒软件查杀病毒。