function Validar_Email(){
  var email = document.buzon.mail.value;
  var cadena = "Dirección de Correo no valida: " + email + "\n" +
               "Por favor, introduce bien tu direccion";

  if( email.indexOf('@',0) <= 0  || email.indexOf(';',0) != -1
   || email.indexOf(' ',0) != -1 || email.indexOf('/',0) != -1
   || email.indexOf(';',0) != -1 || email.indexOf('<',0) != -1
   || email.indexOf('>',0) != -1 || email.indexOf('*',0) != -1
   || email.indexOf('|',0) != -1 || email.indexOf('`',0) != -1
   || email.indexOf('&',0) != -1 || email.indexOf('$',0) != -1
   || email.indexOf('!',0) != -1 || email.indexOf('"',0) != -1
   || email.indexOf(':',0) != -1 )
     { alert(cadena); return false; }
  else return true;
  }
 
 
 function isnumber (num) {
       var numeros = "0123456789";
       var len = num.length;
       var aux;

       for (i=0;i<len;i++) {
           aux = num.charAt(i);
           if (numeros.indexOf(aux) == -1) 
              return -1;
       }

       return 1;
} 

function validatePrompt (Ctrl, PromptStr) {
	alert (PromptStr)
	Ctrl.focus();
	return;
}

function acentos(let){
	var letras=" .,;:()-0123456789abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZéÉóÓúÚáÁíÍ"
	var len = let.length;
	var aux;
	for (i=0;i<len;i++){
		aux=let.charAt(i);
		if (letras.indexOf(aux)==-1)
		    return -1;
	    }
	 return 1;
}

function mail2(let){
	var letras=" abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZ._-@123456789"
	var len = let.length;
	var aux;
	for (i=0;i<len;i++){
		aux=let.charAt(i);
		if (letras.indexOf(aux)==-1)
		    return -1;
	    }
	 return 1;
}

function cuenta()
{
	var numero;

	numero = document.buzon.comenta.value.length;
    if (numero > 2500) {
        alert("Sólo se permiten hasta 118 caracteres.");
        cadena = document.buzon.comenta.value.substring(0, numero - 1);
        document.buzon.comenta.value = cadena;
	    document.buzon.numcarac.value = document.buzon.comenta.value.length;
    }
    else {
	    document.buzon.numcarac.value = numero;
	}
}
 
function runSubmit (form, button)  {
document.buzon.nombre.value = document.buzon.nombre.value.toUpperCase()
document.buzon.inst.value = document.buzon.inst.value.toUpperCase()

if (document.buzon.nombre.value == '') {
	alert("Debes escribir tu nombre");
	return true;
}

if (acentos(document.buzon.nombre.value) == -1) {
  validatePrompt (form.nombre, "Tu nombre contiene algún caracter no valido.");
  document.buzon.nombre.value = ''
  return true;
}
if (isnumber(document.buzon.tel.value) == -1) {
  validatePrompt (form.tel, "Tu teléfono contiene caracteres. Solo deben ser digitos.");
  document.buzon.tel.value = ''
  return true;
}
if (isnumber(document.buzon.ext.value) == -1) {
  validatePrompt (form.ext, "Tu extensión contiene caracteres. Solo deben ser digitos.");
  document.buzon.ext.value = ''
  return true;
}
if (!Validar_Email(form)) return;
if (mail2(document.buzon.mail.value) == -1) {
  validatePrompt (form.mail, "Tu E-mail contiene algún caracter no valido.");
  document.buzon.mail.value = ''
  return true;
}
if ( document.buzon.tema.value == 34 ){
	 validatePrompt (form.tema, "Debes escoger algún tema.");
	 return false;
}
if (acentos(document.buzon.comenta.value) == -1) {
  validatePrompt (form.comenta, "Tus comentarios contienen algún caracter no valido.");
  document.buzon.comenta.value = ''
  return true;
}
if (document.buzon.comenta.value== ''){
	validatePrompt (form.comenta, "No puedes dejar en blanco los comentarios.");
	return false;
}
document.buzon.submit();	
} 
