'***************************************
'
' VBScript utility functions
'
'***************************************

'---------------------------------------
' Show a message box with OK and cancel
'---------------------------------------
function alertVB(sText, buttons)
	alertVB = MsgBox(sText, buttons)
end function

function promptVB(sPrompt, sTitle, sDefault)
	promptVB = InputBox(sPrompt, sTitle, sDefault)
end function