Option Explicit

DIM objShell
Set objShell = WScript.CreateObject("Wscript.Shell")

DIM promptTitle,promptMessage,result

CONST iNormalFocus = 1
CONST vbExclaimation = 48

promptTitle = "Paused for Input"
promptMessage = "Click OK to Resume Deployment"

result = MsgBox(promptMessage, vbExclaimation + vbOKOnly + vbSystemModal, promptTitle)

wscript.echo result