<!--
function ValidarEmail(Mail, requerido) {
	var mailOk = 0; 
	if (Mail == "") {
		if (requerido == 1) alert("Debe introducir obligatoriamente la email (correo electrónico)."); else mailOk = 1;
	} else {
		var arroba = Mail.indexOf("@");
		Mail = Mail.substring(arroba + 1, Mail.length);
		var punto = Mail.indexOf(".");
		Mail = Mail.substring(punto+1, Mail.length);
		if (arroba > 0 && punto > 0 && Mail.length > 1) mailOk = 1; else alert("Revise el formato de la dirección de correo. Ejemplo: usuario@dominio.com");
	}
	return(mailOk);
}

function isEmailAddress(Mail, requerido)
{	
	var filter =/^[A-Za-z][A-Za-z0-9_]*@[A-Za-z0-9_]+\.[A-Za-z0-9_.]+[A-za-z]$/;
	// otra: /^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/
	if (Mail.length == 0) if (requerido == 1) return 0; else return 1;
	if (filter.test(Mail)) 	return 1; else {
			alert("Revise el formato de la dirección de correo. Ejemplo: usuario@dominio.com");
			return 0;
	}
}



//-->