Funciones en VbScript

[apablazaji]

Hola, Tengo un problema tengo la siguiente funcion:
<SCRIPT LANGUAGE = "VBScript">
FUNCTION mensajes2(XvError,vUrl)
XvMensaje = MSGBOX (XvError, VBQUESTION, "Confirmación.....")
document.location = vUrl
END FUNCTION
</SCRIPT>

%>
<script LANGUAGE = "VBScript">
XvMsg = "El Estudio de Préstamo ha sido Eliminado"
XvUrl = "fil_soc_est_ptm.asp"
mensajes2(XvMsg,XvUrl )
</script>

<%

pero no me hacepta mas de un parametro necesito saber por que o si esta mal la funcion gracias......