VBScript Timed MsgBox (PopUp info)

Use this forum if you have problems with a hMailServer script, such as hMailServer WebAdmin or code in an event handler.
Post Reply
User avatar
SorenR
Senior user
Senior user
Posts: 3169
Joined: 2006-08-21 15:38
Location: Denmark

VBScript Timed MsgBox (PopUp info)

Post by SorenR » 2019-04-08 16:01

Came across this today ...

Code: Select all

Sub Popup()
   Dim AckTime, InfoBox
   Set InfoBox = CreateObject("WScript.Shell")
   AckTime = 3
   Select Case InfoBox.Popup("Click OK or do nothing within 3 seconds.", AckTime, "This is your Message Box", 0)
      Case 1, -1
      Exit Sub
   End Select
End Sub

Call Popup
SørenR.

The quantum rule of insecurity which states that the act of observing how vulnerable a host or service is changes the insecurity level of the service.

estradis
Normal user
Normal user
Posts: 145
Joined: 2014-09-09 10:47

Re: VBScript Timed MsgBox (PopUp info)

Post by estradis » 2019-04-24 14:05

SorenR wrote:
2019-04-08 16:01
Came across this today ...
Nice! Didn't know that feature. Thank you for sharing! :D

Post Reply