function validar_email(texto){ 

    var mailres = true;             
    var cadena = "abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZ1234567890@._-"; 
     
    var arroba = texto.indexOf("@",0); 
    if ((texto.lastIndexOf("@")) != arroba) arroba = -1; 
     
    var punto = texto.lastIndexOf("."); 
                 
     for (var contador = 0 ; contador < texto.length ; contador++){ 
        if (cadena.indexOf(texto.substr(contador, 1),0) == -1){ 
            mailres = false; 
            break; 
     } 
    } 

    if ((arroba > 1) && (arroba + 1 < punto) && (punto + 1 < (texto.length)) && (mailres == true) && (texto.indexOf("..",0) == -1)) 
     mailres = true; 
    else 
     mailres = false; 
                 
    return mailres; 
}


// valida un campo de fckeditor por si esta vacio
function validar(f){
        var correcto=false;      
        var oEditor = FCKeditorAPI.GetInstance('texto') ;
        	f.texto.value=oEditor.GetXHTML();

        if(esNulo(f.texto)) {
           //alert("el texto es nulo");
           return false
        }else{
            correcto=true;
        }  
        return correcto;
}    


function volver() {
        history.back();
    }

// comprueba si un texto tiene un caracter que no sea letras o espacios o letras con tilde
function comprobarCaracteresLetras(texto) {

    var mailres = true;             
    var cadena = "abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZ áéíóúÁÉÍÓÚäëïöüÄËÏÖÜàèìòùÀÈÌÒÙâêîôûÂÊÎÔÛ-çÇ'"; 

     for (var contador = 0 ; contador < texto.length ; contador++){ 
        if (cadena.indexOf(texto.substr(contador, 1),0) == -1){ 
            mailres = false; 
            break; 
        } 
    }
    return mailres;
}