function Valida_Email(email)
	{	//Funcionalidade:	Valida o e-mail retornando True se for
		//					um email válido e False caso contrário
		// PARÂMETROS: 
		//		email: E-mail a ser validado
		
		teste_arroba = "false";         //VAR P/ VERIFICAR SE FOI DIGITADO PELO MENOS 
							            //UM ARROBA NO E-MAIL
		teste_ponto = "false";         //VAR P/ VERIFICAR SE FOI DIGITADO PELO MENOS 
							          //UM PONTO NO E-MAIL
		tamanho_email = email.length;
		
		if (tamanho_email > 4)
		{
			for (i=0; i < tamanho_email; i++)
			{
			
				if ((email.charAt(i) == ';')||(email.charAt(i) == ',')||(email.charAt(i) == " ")||
				    (email.charAt(i) == 'ç')||(email.charAt(i) == '*')||(email.charAt(i) == "'")|| 
				    (email.charAt(i) == '"')||(email.charAt(i) == '!')||(email.charAt(i) == '#')||
				    (email.charAt(i) == '$')||(email.charAt(i) == '%')||(email.charAt(i) == '¨')||
				    (email.charAt(i) == '+')||(email.charAt(i) == '=')||(email.charAt(i) == '´')||
				    (email.charAt(i) == '`')||(email.charAt(i) == '[')||(email.charAt(i) == '{')||
				    (email.charAt(i) == '~')||(email.charAt(i) == '^')||(email.charAt(i) == ']')||
				    (email.charAt(i) == '}')||(email.charAt(i) == '|')||(email.charAt(i) == ':')||
				    (email.charAt(i) == '/')||(email.charAt(i) == '?')||(email.charAt(i) == 'à')||
				    (email.charAt(i) == 'á')||(email.charAt(i) == 'â')||(email.charAt(i) == 'ã')||
				    (email.charAt(i) == 'ä')||(email.charAt(i) == '<')||(email.charAt(i) == '>')||
				    (email.charAt(i) == 'Á')||(email.charAt(i) == 'À')||(email.charAt(i) == 'Â')||
				    (email.charAt(i) == 'Ã')||(email.charAt(i) == 'Ä')||(email.charAt(i) == 'é')||
				    (email.charAt(i) == 'è')||(email.charAt(i) == 'ê')||(email.charAt(i) == 'ë')||
				    (email.charAt(i) == 'É')||(email.charAt(i) == 'È')||(email.charAt(i) == 'Ê')||
				    (email.charAt(i) == 'Ë')||(email.charAt(i) == 'í')||(email.charAt(i) == 'ì')||
				    (email.charAt(i) == 'î')||(email.charAt(i) == 'ï')||(email.charAt(i) == 'Í')||
				    (email.charAt(i) == 'Ì')||(email.charAt(i) == 'Î')||(email.charAt(i) == 'Ï')||
				    (email.charAt(i) == 'ó')||(email.charAt(i) == 'ò')||(email.charAt(i) == 'õ')||
				    (email.charAt(i) == 'ô')||(email.charAt(i) == 'ö')||(email.charAt(i) == 'Ó')||
				    (email.charAt(i) == 'Ò')||(email.charAt(i) == 'Õ')||(email.charAt(i) == 'Ô')||
				    (email.charAt(i) == 'Ö')||(email.charAt(i) == 'ú')||(email.charAt(i) == 'ù')||
				    (email.charAt(i) == 'û')||(email.charAt(i) == 'ü')||(email.charAt(i) == 'Ú')||
				    (email.charAt(i) == 'Ù')||(email.charAt(i) == 'Û')||(email.charAt(i) == 'Ü')||
				    (email.charAt(i) == ')')||(email.charAt(i) == '(')
				    )
				{
					return(false);
				}
			
				if (((email.charAt(i) == "@") || (email.charAt(i) == ".")) && ((i == 0) || (i == parseInt(tamanho_email) - 1)))
				{   //DIGITOU'@' OU '.' NA PRIMEIRA OU ÚLTIMA POSIÇÃO
					return (false);
				}
				else
				{
					if (email.charAt(i) == "@") //ACHOU ARROBA
					{
						
						//VERIFICA SE EXISTE PONTO DEPOIS DA @
						pos = email.indexOf("@") + 1;
						pedaco =  email.substr(pos,tamanho_email); 
						achou = "";
						
						for (j = 0; j < pedaco.length; j++)
						{
							if (pedaco.charAt(j) == ".")
							{
								achou = "ok";	
							}
						}
					
						if ((achou != "ok") || (achou == ""))
						{
							return(false);
						}
					
						if (teste_arroba == "true") //ENCONTROU 2 ARROBAS
						{
							return (false);
						}
						else
						{
							teste_arroba = "true";
							if ((email.charAt(i + 1) == ".") || (email.charAt(i - 1) == ".") || (email.charAt(i + 1) == "@"))
							{	//ACHOU "@.", ".@" OU "@@"
								return (false);
							}
						}
					}
					else
					{
						if (email.charAt(i) == ".") //ACHOU PONTO
						{
							teste_ponto = "true";
							if ((email.charAt(i + 1) == ".") || (email.charAt(i - 1) == "."))
							{	//ACHOU ".."
								return (false);
							}
							
						}


					}

				}
			}

			if (teste_arroba == "false" || teste_ponto == "false") //NÃO ENCONTROU ARROBA OU PONTO NO EMAIL
			{
				return (false);
			}
		}
		else //email com menos de 5 caracteres
		{
			return (false);
		}

		return (true);
		
	}