function valida_email (s)
{    
	if (s == "") {
		return true;
	}
	
    var i = 1;
	var contarroba = 0;
    var sLength = s.length;
	
	// procura ç, ', ^, á, é, í, ó, ú, â, ê, î, ô, û
    while ((i < sLength) && (s.charAt(i) != "ç") && (s.charAt(i) != "^") && (s.charAt(i) != "'") && (s.charAt(i) != "á") && (s.charAt(i) != "é") && (s.charAt(i) != "í") && (s.charAt(i) != "ó") && (s.charAt(i) != "ú") && (s.charAt(i) != "â") && (s.charAt(i) != "ê") && (s.charAt(i) != "î") && (s.charAt(i) != "ô") && (s.charAt(i) != "û")) 
    { i++;
    }

    if (i < sLength) return false;
    else i = 1;

	// verifica se existe mais de um @
    while (i < sLength) 
    { if (s.charAt(i) == "@") contarroba=contarroba+1
		i++
	}
    if (contarroba > 1) return false;
    else i=1;
	
	// procura @
    while ((i < sLength) && (s.charAt(i) != "@")) 
    { i++
    
	}
    if ((i >= sLength) || (s.charAt(i) != "@")) return false;
    else i += 2;

    // procura .
    while ((i < sLength) && (s.charAt(i) != "."))
    { i++
    }

    // deve existir no mínimo um caractere depois do ponto
    if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;
    else return true;
}