gpt4 book ai didi

delay - HTA 脚本的休眠例程

转载 作者:行者123 更新时间:2023-12-02 08:40:35 27 4
gpt4 key购买 nike

在我创建的几个 .HTA 脚本中,我需要 VBScript WScript.Sleep 命令,它只是等待几毫秒而不使用 CPU。当我浏览网页时,似乎我不是唯一一个在寻找这个的人:

https://www.google.nl/search?q=hta+sleep

(我敢打赌,如果您阅读了这篇文章,您可能也需要(编辑)它)

我能找到的最佳解决方案似乎是使用 PING 命令的解决方案。但特别是对于只需要暂停脚本 100 毫秒的情况,此解决方案非常奇怪,因为它使用外部命令并触发各种(网络)进程,这些进程不太可能与相关的 .HTA 脚本有任何关系。

所以我首先想到的是使用 WMI Win32_PingStatus 类来避免外部命令,但后来我开始质疑为什么不完全基于 WMI。我花了好几个小时才找到正确的 WMI 类和方法,但最终我成功了……

最佳答案

编写 HTA 时,您应该异步思考。考虑重写您的代码以使用 window.setTimeout。在下面的示例中,我将使用 window.setTimeout 每 2 秒发出一次铃声:

<!DOCTYPE html>
<html>
<head>
<meta http-equiv="x-ua-compatible" content="ie=8">
<title>Bell Test</title>
<script language="VBScript">
Option Explicit
Dim objWShell
Set objWShell = CreateObject("WScript.Shell")
Sub DoPing
divText.innerText = Now
objWShell.Run "%COMSPEC% /c ECHO " & Chr(7), 0, False
window.setTimeOut "DoPing", 2000
End Sub
Sub window_OnLoad
window.ResizeTo 240,130
DoPing
End Sub
</script>
</head>
<body>
<div id="divText">TEST</div>
</body>
</html>

关于delay - HTA 脚本的休眠例程,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/16865430/

27 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com