vbscript - 超时消息框弹出窗口

Question

我有一个运行的小脚本（基本上会触发一个 msgbox 来告诉人们他们的帐户密码即将到期）。

我希望它在 30 分钟后自行关闭，但无法正确使用语法，有人可以帮忙吗？

下面是调用 msgbox 的部分

if (daysLeft < warningDays) and (daysLeft > -1) then

Msgbox "Your Password Expires in " & daysLeft & " day(s)" & " at " & whenPasswordExpires & chr(13) & chr(13) & "Please ensure that you change your password before" & chr(13) & "its expiry time to prevent any disruption of service.", 4144, "PASSWORD EXPIRATION WARNING!"

End if

--

加文。

Answer 1

对象的Popup()方法WShell可以在指定的秒数后超时。这是一个应该在 30 分钟后消失的示例。

CreateObject("WScript.Shell").Popup "Hello!", 1800, "Title"

Answer 2

您将无法这样做，您将需要使用自己的自定义表单和计时器，因为消息框只能在用户交互时关闭。

Answer 3

与@user3585329 的观点相呼应，为此，您可能需要创建一个 HTA 应用程序，该应用程序可以在 Internet Explorer 表单中显示信息。

Answer 4

像这样修复：

CreateObject("WScript.Shell").Popup "MessageHere", 10, "Title"

TimeOut 以秒为单位，而不是毫秒！