[VBScript / Batch] Windows Dialog MsgBox Tool for Batch Files

This is a tiny little script intended to make it possible (and easy) to use windows dialog functionality from batch files.

USAGE:

msgbox.vbs [title] [message] [buttons]

[title] the title of the dialog.
[message] the content of the message box.
[buttons] the sum of values used to determine the icon, buttons, and modality of the message box.​

NOTES:

"{cr}" can be used in the message in place of a carriage return (newline).
"{qt}" can be used in the message in place of a double quotation mark (").

Using a value or a sum of values from the following list, you can specify the number and type of buttons to display, the icon style to use, the identity of the default button, and the modality of the message box. The first group (0–5) describes the buttons to be displayed in the message box, the second group (16, 32, 48, 64) describes the icon style, the third group (0, 256, 512, 768) indicates which button is the default; and the fourth group (0, 4096) determines the modality of the message box. When adding numbers to create a final value for the buttons parameter, use only one number from each group.

• 0 = vbOKOnly - OK button only
• 1 = vbOKCancel - OK and Cancel buttons
• 2 = vbAbortRetryIgnore - Abort, Retry, and Ignore buttons
• 3 = vbYesNoCancel - Yes, No, and Cancel buttons
• 4 = vbYesNo - Yes and No buttons
• 5 = vbRetryCancel - Retry and Cancel buttons
• 16 = vbCritical - Critical Message icon
• 32 = vbQuestion - Warning Query icon
• 48 = vbExclamation - Warning Message icon
• 64 = vbInformation - Information Message icon
• 0 = vbDefaultButton1 - First button is default
• 256 = vbDefaultButton2 - Second button is default
• 512 = vbDefaultButton3 - Third button is default
• 768 = vbDefaultButton4 - Fourth button is default
• 0 = vbApplicationModal - Application modal (the current application will not work until the user responds to the message box)
• 4096 = vbSystemModal - System modal (all applications wont work until the user responds to the message box)

The ERRORLEVEL environment variable will return the number of the button that was clicked in the dialog.

• 1 = vbOK - OK was clicked
• 2 = vbCancel - Cancel was clicked
• 3 = vbAbort - Abort was clicked
• 4 = vbRetry - Retry was clicked
• 5 = vbIgnore - Ignore was clicked
• 6 = vbYes - Yes was clicked
• 7 = vbNo - No was clicked

​

EXAMPLE:

Code:

msgbox.vbs "Failure" "The target file could not be reassembled!{cr}{cr}Press {qt}Retry{qt} to try again, or {qt}Cancel{qt} to skip to the next target." 37
IF %ERRORLEVEL% EQU 4 (echo.Retry was pressed.) ELSE (IF %ERRORLEVEL% EQU 2 (echo.Cancel was pressed.))

Here's the script, nice and short:

Code:

' MsgBox v1.0 by anemeros
set args=WScript.Arguments
wscript.quit MsgBox(Replace(Replace(args.item(1),"{cr}",vbNewLine,1,-1,1),"{qt}",Chr(34),1,-1,1),args.item(2),args.item(0))