// JavaScript Document
/*
function String_ValidarEmail(PRM_Email) 
{
	var Email = PRM_Email;
	var Arroba = "@";
	var Ponto = ".";
	var Arroba_Index = Email.indexOf(Arroba);
	var Email_Length = Email.length;
	//var Ponto_Index = Email.indexOf(Ponto);
	
	if (Email.indexOf(Arroba) == -1)
	{
		return false;
	}
	
	if (Email.indexOf(Arroba) == -1 || Email.indexOf(Arroba) == 0 || Email.indexOf(Arroba) == Email_Length)
	{
		return false;
	}
	
	if (Email.indexOf(Ponto) == -1 || Email.indexOf(Ponto) == 0 || Email.indexOf(Ponto) == Email_Length)
	{
		 return false;
	}
	
	if (Email.indexOf(Arroba, (Arroba_Index+1)) != -1)
	{
		return false;
	}
	
	if (Email.substring(Arroba_Index-1, Arroba_Index) == Ponto || Email.substring(Arroba_Index+1, Arroba_Index+2) == Ponto)
	{
		return false;
	}
	
	if (Email.indexOf(Ponto, (Arroba_Index+2)) == -1)
	{
		return false;
	}
	
	if (Email.indexOf(" ") != -1)
	{
		return false;
	}
	
	return true;
}
*/
/*
Origem do código...
http://www.imasters.com.br/forum/lofiversion/index.php/t201090.html
*/
function String_ValidarEmail(PRM_Email)
{
	//--*->
	var RegExp_Email = new RegExp(/^[A-Za-z0-9_\-\.]+@[A-Za-z0-9_\-\.]{2,}\.[A-Za-z0-9]{2,}(\.[A-Za-z0-9])?/);
	//--*->
	if(PRM_Email.search(" ") != -1)
	{
		return false; 			
	}
	//--*->
	if(typeof(PRM_Email) == "string")
	{
		if(RegExp_Email.test(PRM_Email))
		{ 
			return true; 
		}
		else
		{
			return false; 
		}
	}
	else if(typeof(PRM_Email) == "object")
	{
		if(RegExp_Email.test(PRM_Email.value) == true)
		{ 
			return true; 
		}
		else
		{
			return false; 
		}
	}
	else
	{
		return false;
	}
	//--*->
}
/*
//---> Exemplo de como utilizar...
function Form_Validar()
{
	
	var EMAIL = window.document.all.EMAIL;
	
	if ((EMAIL.value == null) || (EMAIL.value == ""))
	{
		window.alert("*** EMAIL VAZIO ***\nPor favor, preencher o email...");
		EMAIL.focus();
		return false;
	}
	
	if (String_ValidarEmail(EMAIL.value) == false)
	{
		EMAIL.value = "";
		window.alert("*** EMAIL INVÁLIDO ***\nPor favor, corrigir o email...");
		EMAIL.focus();
		return false;
	}
	
	return true;
}
*/