Create a Pop-up Message using VBScript

Friday, October 28, 2011

The "Popup" method produces a pop-up message box which can display a message to a user for a specified amount of time. If the message time is omitted or set to zero, the pop-up will remain until the user dismisses the message. In addition, a title can be assigned to the pop-up message.  If it is omitted, the default is "Windows Script Host".
The syntax is as follows:

WshShell.Popup strText[,nSecondsToWait] [,strTitle] [,nType]

Arguments:

strText
String value containing the text you want to appear in the pop-up message box.

nSecondsToWait
Optional. Numeric value indicating the maximum length of time (in seconds) you want the pop-up message box displayed.

strTitle
Optional. String value containing the text you want to appear as the title of the pop-up message box.

nType
Optional. Numeric value indicating the type of buttons and icons you want in the pop-up message box. These determine how the message box is used.

IntButton
Integer value indicating the number of the button the user clicked to dismiss the message box. This is the value returned by the Popup method.

Button Types
0-Show OK button.
1-Show OK and Cancel buttons.
2-Show Abort, Retry, and Ignore buttons.
3-Show Yes, No, and Cancel buttons.
4-Show Yes and No buttons.
5-Show Retry and Cancel buttons.

Icons
16-Show "Stop Mark" icon.
32-Show "Question Mark" icon.
48-Show "Exclamation Mark" icon.
64-Show "Information Mark" icon.

intButton Return Codes
1-OK button
2-Cancel button
3-Abort button
4-Retry button
5-Ignore button
6-Yes button
7-No button

If the user does not click a button before nSecondsToWait seconds, intButton is set to -1.

Example:

Dim WshShell, BtnCode
Set WshShell = WScript.CreateObject("WScript.Shell")
BtnCode = WshShell.Popup("Do you like your job?", 7, "Answer This Question:", 4 + 32)
Select Case BtnCode
case 6 WScript.Echo "That's great!."
case 7 WScript.Echo "Sorry to hear that."
case -1 WScript.Echo "No Response?"
End Select

Did you find the page informational and useful? Share it using one of your favorite social sites.

Recommended Books & Training Resources

Advanced VBScript for Microsoft Windows Administrators Microsoft WSH and VBScript Programming for the Absolute Beginner