	// D2S HttpRequest 1.0
	
	var arrHTTPR_Request = new Array();
	var arrHTTPR_URL = new Array();
	var arrHTTPR_FillObject = new Array();
	var arrHTTPR_FillMode = new Array();
	var arrHTTPR_FillMaxObjects = new Array();
	
	function sendHTTPRequest(intRId) {
		document.body.style.cursor = "wait";
	    arrHTTPR_Request[intRId] = false;
	    if (window.XMLHttpRequest) { // Mozilla, Safari,...
	        arrHTTPR_Request[intRId] = new XMLHttpRequest();
	        if (arrHTTPR_Request[intRId].overrideMimeType) {
	            arrHTTPR_Request[intRId].overrideMimeType('text/xml');
	        }
	    } else if (window.ActiveXObject) { // IE
	        try {
	            arrHTTPR_Request[intRId] = new ActiveXObject("Msxml2.XMLHTTP");
	        } catch (e) {
	            try {
	            arrHTTPR_Request[intRId] = new ActiveXObject("Microsoft.XMLHTTP");
	            } catch (e) {}
	        }
	    }
	
	    if (!arrHTTPR_Request[intRId]) {
	        alert('Giving up :( Cannot create an XMLHTTP instance');
	        return false;
	    }

	    arrHTTPR_Request[intRId].onreadystatechange = new Function("setHttpContents("+intRId+")");
	    arrHTTPR_Request[intRId].open('GET', arrHTTPR_URL[intRId], true);
	    arrHTTPR_Request[intRId].send(null);
	
	}
	
	function setHttpContents(intRId) {
		document.body.style.cursor = "default";
	    if (arrHTTPR_Request[intRId].readyState == 4) {
	        if (arrHTTPR_Request[intRId].status == 200) {
	            fillHttpData(arrHTTPR_Request[intRId].responseText,intRId);
	        } else {
				alert('System Error');
	        }
	    }

	}
	
	
	function fillHttpData(strRData, intRId){
		if(strRData != ""){
			var oMain = document.getElementById(arrHTTPR_FillObject[intRId]);
			
			if(arrHTTPR_FillMode[intRId] == ""){
				oMain.innerHTML = strRData;
			}
			if(arrHTTPR_FillMode[intRId] == "insert_before"){
				var myDiv = document.createElement("div");
				var oFirstChild = oMain.firstChild;
				if(oFirstChild == null)
					oMain.appendChild(myDiv);
				else
					oMain.insertBefore(myDiv, oFirstChild);
				myDiv.innerHTML = strRData;
				var intLength = oMain.childNodes.length;
				
				if(intLength > arrHTTPR_FillMaxObjects[intRId]){
					oLastChild = oMain.lastChild;
					oMain.removeChild(oLastChild);
				}
			}
			if(arrHTTPR_FillMode[intRId] == "jsCallBack"){
				if(strRData != "")
					eval(strRData);
			}
		}
	}
	
	function startHTTPRequest(intRId, strRURL, strFObject, strFMode, inFMax )
	{
		arrHTTPR_URL[intRId] = strRURL;
		arrHTTPR_FillObject[intRId] = strFObject;
		arrHTTPR_FillMode[intRId] = strFMode;
		arrHTTPR_FillMaxObjects[intRId] = inFMax;
		sendHTTPRequest(intRId);
	}