function Valide() 
{ 
var strEmail;
var checkTLD=1;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
var emailPat=/^(.+)@(.+)$/;
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
var validChars="\[^\\s" + specialChars + "\]";
var quotedUser="(\"[^\"]*\")";
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
var atom=validChars + '+';
var word="(" + atom + "|" + quotedUser + ")";
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
var erreur1 = "false";
var erreur2 = "false";
var erreur3= "false";
var erreur4 = "false";
var erreur5 = "false";
var erreur6 = "false";
var erreur7 = "false";
strEmail=window.document.FEnregistre.IEmail.value;

while(''+window.document.FEnregistre.IUrl.value.charAt(0)==' ')
	{
   window.document.FEnregistre.IUrl.value=window.document.FEnregistre.IUrl.value.substring(1,window.document.FEnregistre.IUrl.value.length);

	}

while(''+window.document.FEnregistre.ITitre.value.charAt(0)==' ')
	{
   window.document.FEnregistre.ITitre.value=window.document.FEnregistre.ITitre.value.substring(1,window.document.FEnregistre.ITitre.value.length);
	}
	
while(''+window.document.FEnregistre.IDescription.value.charAt(0)==' ')
	{
   window.document.FEnregistre.IDescription.value=window.document.FEnregistre.IDescription.value.substring(1,window.document.FEnregistre.IDescription.value.length);
	}


	if (window.document.FEnregistre.IUrl.value.indexOf('http://',0)==-1)	
   		{ 
		erreur1 = "true";
   		}		
		
	if (window.document.FEnregistre.ITitre.value == "")
   		{ 
		
		erreur2 = "true";
   		}	
		
	if (window.document.FEnregistre.IDescription.value == "")
   		{ 
		erreur3 = "true";
   		}		
		
	if (window.document.FEnregistre.INoCategorie.options[window.document.FEnregistre.INoCategorie.selectedIndex].value == "NULL")
	
   		{ 
		erreur4 = "true";
   		}		
		
	if (strEmail!="")
		{

		{
	var matchArray=strEmail.match(emailPat);

	if (matchArray==null)
		 {
		alert("Votre email entré ne semble pas valide ( verifier @ ou . )"); 
		erreur5 = "true";
				}
	if (matchArray!=null)	
		{
		var user=matchArray[1];
		var domain=matchArray[2];

		for (i=0; i<user.length; i++)
			{
			if (user.charCodeAt(i)>127)
				{
				alert("Le nom d'usager contient des caractères invalides.");
				erreur5 = "true";
		    	}
			}
		for (i=0; i<domain.length; i++)
			{
			if (domain.charCodeAt(i)>127) 
				{
				alert("Le nom de domaine contient des  caractères invalides.");
				erreur5 = "true";
		    	}
			}
		if (user.match(userPat)==null)
			{
			alert("Le nom d'usager ne semble pas être valide.");
			erreur5 = "true";
			}

		var IPArray=domain.match(ipDomainPat);
		if (IPArray!=null)
			{
			for (var i=1;i<=4;i++)
				{
				if (IPArray[i]>255)
			   		{
					alert("L'adresse ip de destination est invalide!");
					erreur5 = "true";
   					}
				}
			}

		var atomPat=new RegExp("^" + atom + "$");
		var domArr=domain.split(".");
		var len=domArr.length;
		for (i=0;i<len;i++)
			{
			if (domArr[i].search(atomPat)==-1)
				{
				alert("Le nom de domaine ne semble pas être valide.");
				erreur5 = "true";
   				}
			}

		if (checkTLD && domArr[domArr.length-1].length!=2 && domArr[domArr.length-1].search(knownDomsPat)==-1)
			{
			alert("L'adresse doit finir par un nom de domain connu (.com, .net, etc...) ou 2 lettres du pays (.ca, .fr, etc...)");
			erreur5 = "true";
			}

		if (len<2) 
			{
			alert("Cette adresse n'a pas de hostname!");
			erreur5 = "true";
			}
		}	
	}

}		
		
		
if (strEmail=="")
	{
	erreur6 = "true";
	}		
	
if (window.document.FEnregistre.INoPays.options[window.document.FEnregistre.INoPays.selectedIndex].value == "NULL")
	{ 
	erreur7 = "true";
	}	
	
	
					  


if (erreur1 == "true")
	{
	alert("Vous devez entrer l'adresse url");		
	window.document.FEnregistre.IUrl.focus()
	}

else if (erreur2 == "true")
	{
	alert("Vous devez entrer le titre");	
	window.document.FEnregistre.ITitre.focus()
	}

else if (erreur3 == "true")
	{
	alert("Vous devez entrer une description")
	window.document.FEnregistre.IDescription.focus()	
	}	
	
else if (erreur4 == "true")
	{
	alert("Vous devez choisir une catégorie")
	window.document.FEnregistre.INoCategorie.focus()	
	}	
	
else if (erreur5 == "true")
	{
	window.document.FEnregistre.IEmail.focus()	
	}	
	
else if (erreur6 == "true")
	{
	alert("Vous devez entrer votre email")
	window.document.FEnregistre.IEmail.focus()	
	}	
	
else if (erreur7 == "true")
	{
	alert("Vous devez choisir un pays")
	window.document.FEnregistre.INoPays.focus()		
	}	

else
	{
	window.document.FEnregistre.submit();		
	}
}