Function customConfirm(customTitle, customMessage, promptOption)
if customTitle="" then customTitle="TESite PSA"
if promptOption=1 then customConfirm = MsgBox(customMessage, 36, customTitle)
if promptOption=2 then customConfirm = MsgBox(customMessage, 35, customTitle)
if promptOption=3 then customConfirm = MsgBox(customMessage, 34, customTitle)
End Function
vbEnabledBrowser="Y"