從 HTA 中啟動應用程序
2024-08-26 00:15:42
供稿：網友
如何從 HTA 中啟動應用程序？
問：
您好，腳本專家！對于 HTA，有沒有什么可以替代 Wscript.Shell 命令？我需要運行某個應用程序并指定要打開的文件。
-- DL
答：
您好，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）：
代碼如下:
<html>
<head>
<script language="VBScript">
Sub RunProgram
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "notepad.exe c:/scripts/test.txt"
End Sub
</script>
</head>
<body>
<button onclick="RunProgram">Run Program</button> <p>
</body>
</html>
如您可以看到的，這差不多是您能獲得的最簡單的 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 對象時不會遇到此問題。
