如何在用VBS打开HTA文件时显示信息

Question

我有只有一行的 VBS 文件

CreateObject("Wscript.Shell").Run "cmd /c start mshta.exe %cd%/app.hta",0,True

当我点击这个VBS文件时，在打开HTA文件之前有一个延迟，所以我需要在这段时间内显示一些消息，并在打开HTA文件时隐藏它。如果我能够用消息对 window 进行风格化，那就更好了。

我该怎么做？

Answer 1

这将加快启动程序的速度。不要无缘无故地启动名为 cmd 的程序。不调用 cmd 的 Start，它以不寻常的方式启动程序并且本质上很慢。指定它的路径意味着不需要搜索它。

CreateObject("Wscript.Shell").Run "C:\windows\system32\mshta.exe ""%cd%\app.hta""",0,True

Answer 2

使用 Popup 方法的消息示例：

CreateObject("Wscript.Shell").Popup "Please wait...", 1, "Window tile"

1 是等待的秒数

How to display a message when opening HTA file with VBS