您好,DL。是的,我们确实知道这样的命令,可以在 HTA

中使用并可以替代 Wscript.Shell

命令,我们一会儿就会向您介绍。不过,在介绍它之前,我们应注意到您实际上可以在

HTA 中使用 Wscript.Shell 对象。这是一个常会引发混淆之处:因为您在

HTA 中无法使用某些命令(如 Wscript.Echo 和

Wscript.Sleep),人们就认为您在 HTA 中无法使用任何 WSH

命令。

继续之前,还有一个问题:为什么您在 HTA 中无法使用 Wscript.Echo

和 Wscript.Sleep 呢?是这样,这些方法是 Wscript

对象的属性,而您是无法创建 Wscript 对象实例。Wscript

对象是自动创建的,而且只有在您运行 Windows Script Host(即

Wscript.exe 或

Cscript.exe)时才会创建。正因为这一点,才可以说以下脚本绝对有效:

Wscript.Echo "Hey."

请注意,我们没有创建 Wscript 对象,该对象是在我们调用 Windows

Script Host 时自动创建的。

但这只限于 Wscript 对象。还有其他您可以创建的 WSH

对象,包括 Shell 对象。例如,下面是一个简单的小 HTA,它创建

Wscript.Shell 对象,然后运行 Notepad.exe(并在此过程中打开文件

C:\Scripts\Test.txt):
Sub RunProgram
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "notepad.exe c:\scripts\test.txt"
End Sub
Run Program

如您可以看到的,这差不多是您能获得的最简单的

HTA:它只由一个按钮组成,单击时会运行名为 RunProgram

的子例程。请看一下 RunProgram 的代码:

Sub RunProgram
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "notepad.exe c:\scripts\test.txt"
End Sub

就是这样:我们创建 Wscript.Shell 对象的一个实例,然后调用

Run 方法。这样就为 Run 传递了单一参数:可执行文件名

(notepad.exe)

后跟想要打开的文件的路径。这就是我们需要做的一切。

顺便说一句,只要是在 HTA

中运行该脚本,则不会有任何问题。如果尝试在 HTML

文件(即文件扩展名为 .htm

的文件)中运行它,则会显示一个消息框,警告您有一个 ActiveX

控件正在尝试于页面上运行。此时必须单击是以允许该子例程创建

Shell 对象,并随后运行它。这是因为 WSH

对象被认为“对脚本编写是不安全的”。

注意:是啊,这听起来有点怪,竟然认为脚本编写对象对脚本编写是不安全的。但这是因为

Internet Explorer 使用与 WSH 不同的脚本宿主和不同的安全模型。幸好

HTA 使用与 Internet Explorer 不同的安全模型,这意味着您在 HTA

内创建 Shell 对象时不会遇到此问题。

那么,如果是使用那个替代命令呢?嗯,如果出于某种原因您不想使用

Wscript.Shell 对象,则可以改为使用 Windows Shell 对象。下面的 HTA

也可以启动记事本并打开文件 C:\Scripts\Test.txt:

Sub RunProgram
Const NORMAL_WINDOW = 1
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "notepad.exe", "c:\scripts\test.txt", , , NORMAL_WINDOW
End Sub
Run Program

坦白地讲,我们认为使用 Windows Shell 对象与使用 Wscript.Shell

对象相比并没有什么真正的优势:这两个对象的功能基本上一样。不过,如果您想要摆弄一下

Windows Shell,请查阅有关 ShellExecute

方法的文档。重要的是这一点:如果想要从 HTA

启动应用程序,两种方法都可以使用。