function validacion()
{
		var f = document.formulario;
		var a, sName, sValue, item;
		a=0
			
	for (i=0; i<f.elements.length; i++)	
	{
		item = f.elements[i];
		sName = item.name;
		
		// if it is a Drop Down (>SELECT> element)
        if (item.type.indexOf('select') != -1)	
        {
			if (item.selectedIndex == -1) sValue = '';
			else sValue = item.options[item.selectedIndex].value;
		}
		else
			sValue = item.value;
		
		switch (sName.charAt(0))	
		{
						
		//Busca todos los inputs que cuyo nombre inicie con la letra e, 
		//y los valida como campos email
		
		case "e":
				
				sValue = Trim(sValue);
				if(!IsEmpty(sValue))	{
					if(!ValidateEmail(sValue))	{
						item.focus();
						return false;
						
					}
				}	
				break;	
								
		}//end switch
		}//cierra for
		
		
	//Validacion de espacios vacios
	if (f.Tnombre.value == "") 
	  	{
	   	alert ("Por favor ingrese su nombre, si no desea usarlo favor escribir ANONIMO");
	   	return false;
		}	 	
	if (f.eFROM.value == "") 
	  	{
	   	alert ("Por favor ingrese su email");
	   	return false;
		}	 	
	if (f.sasunto.value == "") 
	  	{
	   	alert ("Por favor elija algún asunto");
	   	return false;
		}	 	
	if (f.sasunto.value == "9" && f.SUBJECT.value == "") 
	  	{
	   	alert ("Si eligió como asunto OTRO, favor escribir cual es su asunto");
	   	return false;
		}	 	
	if (f.BODY.value == "") 
	  	{
	   	alert ("Por favor ingrese el contenido de su mensaje");
	   	return false;
		}	 
	f.submit();
    }
//}


/*Trim: Elimina los espacios antes y despues de la primera y ultima palabra	*/
	function Trim(sText)
		{
		var newText = "";
		var ipos, inipos=0, endpos=0;
		
		// trim initial spaces
		for (ipos = 0; ipos < sText.length; ipos++)
			if (sText.substring(ipos, ipos+1) != " ")
				{
				inipos=ipos;
				break;
				}
		
		for (ipos = inipos; ipos < sText.length; ipos++)
			if (sText.substring(ipos, ipos+1) != " ")
				endpos = ipos+1;
		
		if (endpos >= inipos)
			newText = sText.substring(inipos, endpos);
		return newText;
		}
	


/*IsEmpty: Valida si un campo es vacio
	*/
	function IsEmpty(sText)	{
		var i=0;

		for (i=0; i < sText.length; i++)
			if (sText.substring(i, i+1) != ' ') {
				return false;
			}
			if (sText.substring(i, i+1) != '') {
				return false;
			}

		return true;
		}

/*Valida si la direccion de email es valida*/

function ValidateEmail(val)
{ 
var frmemail;
var frmemailtemp;
var probarmail;
var posiarroba;
var posipunto;
probarmail==1;
frmemail=val;

// el primer caracter debe ser una letra
cas=frmemail.charCodeAt(0)
if (!((cas>=65 && cas<=90) || (cas>=97 && cas<=122))){
	alert("E-mail Inválido 1.");
	return false;
}

// ultimo caracter debe ser una letra
cas=frmemail.charCodeAt(frmemail.length-1);
if (!((cas>=65 && cas<=90) || (cas>=97 && cas<=122))){
	alert("E-mail Inválido 2.");
	return false;
}

// Valida ,  @ . y _
for (var i=1; i<=frmemail.length-2; i++){
  cas=frmemail.charCodeAt(i);
  if (!((cas>=48 && cas<=57) || (cas>=65 && cas<=90) || (cas>=97 && cas<=122) || cas==95 || cas==45 || cas==46 || cas==64))
  {
    alert("E-mail Inválido 3.");
    return false;
  }
}

// debe tener solo un @
posiarroba=frmemail.indexOf("@");
if (posiarroba==-1)
 {
	alert(frmemail+"E-mail Inválido 4.");
	return false;
  }
else{
  frmemailtemp=frmemail.substr(posiarroba+1);
  posiarroba=frmemailtemp.indexOf("@");
  if (posiarroba!=-1){
	alert("E-mail Inválido 5.");
	return false;
    }
  else{
    posipunto=frmemailtemp.indexOf(".");
    if (posipunto==-1){
		alert("E-mail Inválido 6.");
		return false;
    }
  }
}

// antes y despues un punto, _ o underscore debe ser una letra o numero
for (var i=1; i<=frmemail.length-2; i++){
  cas=frmemail.charCodeAt(i);
  if (cas==95 || cas==45 || cas==46 || cas==64 ){
    cas=frmemail.charCodeAt(i-1);
    if (!((cas>=48 && cas<=57) || (cas>=65 && cas<=90) || (cas>=97 && cas<=122))){
		alert("E-mail Inválido 7.");
		return false;		
    }
    cas=frmemail.charCodeAt(i+1);
    if (!((cas>=48 && cas<=57) || (cas>=65 && cas<=90) || (cas>=97 && cas<=122))){
		alert("E-mail Inválido 8.");
		return false;
    }
  }
}
return true;
//f.submit();
}

function cual_correo()
{
	switch ( formulario.sasunto.value )
	{
		case '1': formulario.SUBJECT.value = "INFORMACIÓN DE PREGRADO"; break;
		case '2': formulario.SUBJECT.value = "INFORMACIÓN DE POSGRADOS"; break;
		case '3': formulario.SUBJECT.value = "EDUCACIÓN CONTINUA"; break;
		case '4': formulario.SUBJECT.value = "ADMISIONES"; break;
		case '5': formulario.SUBJECT.value = "PASTORAL"; break;
		case '6': formulario.SUBJECT.value = "OPINIONES DE LA PÁGINA"; break;
		case '7': formulario.SUBJECT.value = "FALTA INFORMACIÓN"; break;
		case '8': formulario.SUBJECT.value = "ERRORES DE LA PÁGINA"; break;
		case '9': formulario.SUBJECT.value = "Escriba aquí su asunto"; break;
	}	
}

function cjaBlanca()
{
	if ( formulario.sasunto.value == '9' )
	{	formulario.SUBJECT.value = ""; }
}
