function MM_findObj(n, d) 
{
	var p,i,x;

	if(!d)
		d=document; 

	if((p=n.indexOf("?"))>0&&parent.frames.length) 
	{
		d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
	}
      
	if(!(x=d[n])&&d.all) 
		x=d.all[n]; 

	for (i=0;!x&&i<d.forms.length;i++) 
		x=d.forms[i][n];

	for(i=0;!x&&d.layers&&id.layers.length;i++) 
		x=MM_findObj(n,d.layers[i].document); 

	return x;
}
	
function MM_showHideLayers() 
{
	var i,p,v,obj,args=MM_showHideLayers.arguments;

	for (i=0; i<(args.length-2); i+=3)
	{
		if ((obj=MM_findObj(args[i]))!=null) 
		{ 
			v=args[i+2];
			if (obj.style) 
			{ 
				obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; 
			}
			obj.visibility=v; 
		}
	}
}

function MM_openBrWindow(theURL,winName,features)
{ 
	window.open(theURL,winName,features);
}

<!-- Begin
function emailCheck(emailStr) 
{
	var emailPat=/^(.+)@(.+)$/
	var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
	var validChars="\[^\\s" + specialChars + "\]"
	var quotedUser="(\"[^\"]*\")"
	var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
	var atom=validChars + '+'
	var word="(" + atom + "|" + quotedUser + ")"
	var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
	var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")

	var matchArray=emailStr.match(emailPat)
	if (matchArray==null) 
	{
		return false
	}
	var user=matchArray[1]
	var domain=matchArray[2]

	if (user.match(userPat)==null) 
	{
		return false
	
		var IPArray=domain.match(ipDomainPat)
		if (IPArray!=null) 
		{
			for (var i=1;i<=4;i++) 
			{
				if (IPArray[i]>255) 
				{
					return false
				}
			}
			return true
		}
	}

	var domainArray=domain.match(domainPat)
	if (domainArray==null) 
	{
		return false
	}

	var atomPat=new RegExp(atom,"g")
	var domArr=domain.match(atomPat)
	var len=domArr.length
	if (domArr[domArr.length-1].length<2 || domArr[domArr.length-1].length>3) 
	{
		return false
	}

	if (len<2) 
	{
		return false
	}

	return true;
}

function Valida_formulario()
{
	var i,password,email,p,q,nm,test,num,min,max,errors='',args=Valida_formulario.arguments;

	for (i=0; i<(args.length-2); i+=3)
	{
		test=args[i+2];
		val=MM_findObj(args[i]);
		
		if (val)
          	{
			nm=val.name;
			email = val.value
			if(nm=="password")
			{
				password = val.value
			}
			if((nm=="password_confirm")&&(password!=val.value))
			{
				errors +='- password y confirmar password deben ser iguales .\n';			}
			if ((val=val.value)!="")
			{
				if (test.indexOf('isEmail')!=-1)
				{
					if (!emailCheck(email)) 
						errors+='- '+nm+' tiene que ser una dirección de email válida.\n';
				}
				else if (test!='R')
				{
					num = parseFloat(val);

					if (val!=''+num) 
						errors+='- '+nm+' tiene que ser un número.\n';

					if (test.indexOf('inRange') != -1)
					{
						p=test.indexOf(':');
						min=test.substring(8,p);
						max=test.substring(p+1);

						if (num<min || max<num) 
							errors+='- '+nm+' debe estar comprendido entre '+min+' y '+max+'.\n';
					}
				}
			}
			else if (test.charAt(0) == 'R') 
				errors += '- '+nm+' es obligatorio.\n';
		}
	}

	if (errors) 
		alert('Se han encontrado los siguientes errores:\n'+errors);

	document.MM_returnValue = (errors == '');
}

function MM_validateForm() 
{
	var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;

	for (i=0; i<(args.length-2); i+=3)
	{ 
		test=args[i+2]; 
		val=MM_findObj(args[i]);

		if (val)
		{ 
			nm=val.name; 
			if ((val=val.value)!="")
			{
				if (test.indexOf('isEmail')!=-1)
				{ 
					p=val.indexOf('@');

					if (p<1 || p==(val.length-1)) 
						errors+='- '+nm+' no es un email .\n';
				} 
				else if (test!='R') 
				{ 
					num = parseFloat(val);

					if (val!=''+num) 
						errors+='- '+nm+' debe ser un número.\n';

					if (test.indexOf('inRange') != -1) 
					{ 
						p=test.indexOf(':');
						min=test.substring(8,p); 
						max=test.substring(p+1);

						if (num<min || max<num) 
							errors+='- '+nm+' debe estar comprendido entre '+min+' y '+max+'.\n';
					} 
				} 
			} 
			else if (test.charAt(0) == 'R') 
				errors += '- '+nm+' es obligatorio.\n'; 
		}
	} 

	if (errors) 
		alert('Se han encontrado los siguientes errores:\n'+errors);

	document.MM_returnValue = (errors == '');
}