file - 从另一个 HTA 文件打开 HTA 文件

Question

好的，所以我正在创建一个简单的程序，当您单击链接时应该打开另一个 .HTA 文件。例如：

Sub RunProgram 
    Const NORMAL_WINDOW = 1
    Set objShell = CreateObject("Shell.Application")
    objShell.ShellExecute "explorer.exe", "Virus_Support.hta", , , NORMAL_WINDOW
 End Sub

然后后来...

<body> 
<button onclick="RunProgram">Run Program</button> <p>
</body>

但是，它返回“变量未定义：objShell”错误。我试图让 virus_support.hta 从 SupportMain.hta 文件中打开……而不是在 IE 或任何浏览器上。

score 0 · Accepted Answer

Try this:

Sub RunProgram
    Set objShell = CreateObject("WScript.shell")
    objShell.run("Virus_Support.hta")
End Sub

file - 从另一个 HTA 文件打开 HTA 文件

1 回答 1

Related

Reference