/*        ----------------------------------------------
   \\\         (c) Philippe Sarcher 1998
   (oO)      Philippe.Sarcher@mail.dotcom.fr
   /C \    http://www.mygale.org/~karsher/javascript
  /__/\\  ----------------------------------------------
  \\__//  Script libre de droit a condition de laisser 
 __> U<__  ces commentaires / Scripts free of charge
   _\/_         please left these comments lines  
          ----------------------------------------------
*/
/*         ==========================
	     Gestion des Cookies version 1.0
			     06 Mai 1998
           ==========================    */
function GetCookie (name) {
        var arg = name + "=";
	    var Cook = document.cookie;
          var i = 1;
          while ((Ret = GetField(Cook,i,"; ")) != null) {
			if (Ret.substring(0,arg.length) == arg)
				return unescape(GetField(Ret,2,"="));	
			i++;
		}
          return null;
   }
function SetCookie(name,valeur) {
	document.cookie = name + "=" + escape(valeur) + ";path=/;expires=Sunday, 31-Dec-00 00:00:00 GMT";
}
function RazCookie(name) {
	document.cookie = name + "= ;path=/;expires=Sunday, 31-Dec-00 00:00:00 GMT";
}
function GetField(Chaine,Nombre, Sep) {
	if (Sep == null) Sep = ";";
	var Compteur = 0;
	var x = 0;
	var Param = "";
	while (Chaine != null) {
		Compteur += 1;
		x=Chaine.indexOf(Sep);
		if (x == -1) {
			Param = Chaine;
			Chaine = null;
		} else {
			Param = Chaine.substring(0,x);
			Chaine = Chaine.substring(x+Sep.length , Chaine.length);
		}
		if (Compteur == Nombre) { 
			return (Param);
		}
	}
	return (null);
}