function addEvent2(elm, evType, fn, useCapture){if(elm.addEventListener){elm.addEventListener(evType, fn, useCapture);return true;}else if (elm.attachEvent){var r = elm.attachEvent('on' + evType, fn);return r;}else{elm['on' + evType] = fn;}}
function ExecAJAX (){
	//premier parametre = nom du script serveur
	var args = ExecAJAX.arguments;
	var erreur = 0;
	var script = args[0];
	var xhr_object1 = null;   
    if(window.XMLHttpRequest) xhr_object1 = new XMLHttpRequest();   // Firefox     
	else if(window.ActiveXObject) xhr_object1 = new ActiveXObject("Microsoft.XMLHTTP");   // Internet Explorer  
	else return;   // XMLHttpRequest non supporte par le navigateur   
	xhr_object1.open("POST", script, true);   
	xhr_object1.onreadystatechange = function() { if(xhr_object1.readyState == 4) eval(xhr_object1.responseText); }   
	xhr_object1.setRequestHeader("Content-type", "application/x-www-form-urlencoded");   
	var data = "";
	for (i=1;i<args.length;i++)
	{
		if (i>1) data = data + "&";
		data = data + "param" + i + "=" + escape(args[i]);		
	}
	xhr_object1.send(data);  
}
function new_browser3(src,name,w,h)
{
	size=",width="+w+",height="+h
	browser=window.open(src,name,"resizable=no,scrollbars=no,toolbar=no,status=no,menubar=no,location=0,directories=no"+size)
}
// SUPPRIME LA SELECTION D'UNE LISTBOX
function supprime_select(destination)
	{
		var destlen =	eval("document.formulaire."+destination+".length") - 1
		
		for (i=destlen ; i>=0; i--)
			{
				if ( eval("document.formulaire."+destination+".options[i].selected == true") ) 
				eval("document.formulaire."+destination+".options[i] = null");
			}
	}
	
	

// AJOUTE LA SELECTION D'UNE LISTBOX A UNE AUTRE LISTBOX
function ajoute_select(sources,destination)
	{	
		var sourceslen = eval("document.formulaire."+sources+".length")
		var destlen
		
		for (i=0; i< sourceslen; i++)
		{
			destlen =	eval("document.formulaire."+destination+".length")		
			if (  eval("document.formulaire."+sources+".options[i].selected == true")  )
				{
					trouve = "faux"

					// verification si l'element est deja present
					for (j=0; j<destlen ; j++)
					{
						if (   eval("document.formulaire."+sources+".options[i].value")  ==   eval("document.formulaire."+destination+".options[j].value")  )
						{
							trouve = "vrai"
						}
					}
					
					// ajout de l'element s'il n'est pas deja present
					if (trouve == "faux")
					{
						opt = new Option(   eval("document.formulaire."+sources+".options[i].text")  );
						opt.value = eval("document.formulaire."+sources+".options[i].value") ;	
						eval("document.formulaire."+destination+".options[destlen] = opt") ;								
					}	
				}
		}
		
		ordonne (sources,destination)												
		
	}
	
		
// AJOUTE LA SELECTION D'UNE LISTBOX A UNE AUTRE LISTBOX
function ajoute_selecti(sources,destination,trelation, FK1, FK2, valFK2)
	{	
		var sourceslen = eval("document.formulaire."+sources+".length")
		var destlen
		
		for (i=0; i< sourceslen; i++)
		{
			destlen =	eval("document.formulaire."+destination+".length")		
			if (  eval("document.formulaire."+sources+".options[i].selected == true")  )
				{
					trouve = "faux"

					// verification si l'element est deja present
					for (j=0; j<destlen ; j++)
					{
						if (   eval("document.formulaire."+sources+".options[i].value")  ==   eval("document.formulaire."+destination+".options[j].value")  )
						{
							trouve = "vrai"
						}
					}
					
					// ajout de l'element s'il n'est pas deja present
					if (trouve == "faux")
					{
						opt = new Option(   eval("document.formulaire."+sources+".options[i].text")  );
						opt.value = eval("document.formulaire."+sources+".options[i].value") ;	
						eval("document.formulaire."+destination+".options[destlen] = opt") ;	
						
						// ouverture du sous-formulaire
						//monurl = "ajoutessformulaire.asp?mode=ajout&o=1&latable=" + trelation + "&" + "champtliee=" + FK1 + "&valchamptliee=" + montexte + "&champtliee2=" + FK2 + "&valchamptliee2=" + valFK2
						//new_browser(monurl,'ssform',800,600)
					}	
				}
		}
		
		ordonne (sources,destination)												
		
	}
	
// modification d'un element de la listbox
function modif_selecti(torigine,sources,destination,trelation, FK1, FK2, valFK2, GUID)
	{	
		var sel = eval("document.formulaire."+destination+".selectedIndex")
		montexte = eval("document.formulaire."+destination+".options[sel].value")
		var montexte2 = eval("document.formulaire.ssform_"+torigine+trelation+sources+".value")
		var monurl = "ajoutessformulaire.asp?GUID=" + GUID + "&input1=" + montexte2 + "&o=1&latable=" + trelation + "&" + "champtliee=" + FK1 + "&valchamptliee=" + montexte + "&champtliee2=" + FK2 + "&valchamptliee2=" + valFK2 + "&nomssform=ssform_"+torigine+trelation+sources
		
		
		new_browser(monurl,'ssform',640,480)		
	}
	
	
// reordonne la listbox
function ordonne (sources,destination)
	{	

		var taille  = eval("document.formulaire."+destination+".length")
		var sourceslen = eval("document.formulaire."+sources+".length")		
						
		// sauvegarde des valeurs dans 1 tableau
		valeur = new Array(taille);
		for (i=0; i < taille; i++) valeur[i] = eval("document.formulaire."+destination+".options[i].value");
						
		//on vide la select
		for (i=(taille-1); i>=0; i--) eval("document.formulaire."+destination+".options[i] = null");

		//on rempli la select dans l'ordre
		for (i=0; i<sourceslen ; i++)
		{
			trouve = "faux"

			// verification si l'element est present
			for (j=0; j<taille ; j++)
				if (eval("document.formulaire."+sources+".options[i].value") == valeur[j]) trouve = "vrai";
					
			// ajout de l'element s'il est present
			if (trouve == "vrai")
			{
				opt = new Option(   eval("document.formulaire."+sources+".options[i].text")  );
				opt.value = eval("document.formulaire."+sources+".options[i].value") ;	
				
				var taille2 =  eval("document.formulaire."+destination+".length")
				
				eval("document.formulaire."+destination+".options[taille2] = opt");														
			}	
		}
	}
	
	
// SELECTIONNE TOUS LES ELEMENTS D'UNE LISTBOX (afin de soumettre le formulaire)
function select_all(obj)
{
	var k = eval("document.formulaire."+obj+".length") - 1
	for (i=k; i>=0; i--)
	{
		eval("document.formulaire."+obj+".options[i].selected = true");
	}
}

function unselect_all(obj)
{
	var k = eval("document.formulaire."+obj+".length") - 1
	for (i=k; i>=0; i--)
	{
		eval("document.formulaire."+obj+".options[i].selected = false");
	}
}


function popup(ad, largeur, hauteur, nom)
{
	var top=(screen.height-hauteur)/2;

	var left=(screen.width-largeur)/2;
	
	window.open(ad, nom,'resizable=yes, location=no, top='+top+',left='+left+', width='+largeur+', height='+hauteur+', menubar=no, status=no, scrollbars=yes, menubar=no');
}

function openCenteredWindow(url, height, width, name, parms) {
   var left = Math.floor( (screen.width - width) / 2);
   var top = Math.floor( (screen.height - height) / 2);
   var winParms = "top=" + top + ",left=" + left + ",height=" + height + ",width=" + width;
   if (parms) { winParms += "," + parms; }
   var win = window.open(url, name, winParms);
   if (parseInt(navigator.appVersion) >= 4) { win.window.focus(); }
   return win;
}