function CreateHttpRequest() {
	var types = new Array(
						'MSXML2.XMLHTTP',
						'MSXML2.XMLHTTP.6.0',
						'MSXML2.XMLHTTP.5.0',
						'MSXML2.XMLHTTP.4.0',
						'MSXML2.XMLHTTP.3.0',
						'MSXML2.XMLHTTP',
						'Microsoft.XMLHTTP');
	for (var i = 0; i < types.length; i++) {
		try {
			return new ActiveXObject(types[i]);
		} catch(e) {}
	}
	try {
		return new XMLHttpRequest();
	} catch(e) { }
	return false;
}
function Request(url, param, target, msg) {
	var objHTTP = CreateHttpRequest();
	objHTTP.open("POST", url, true);
	objHTTP.onreadystatechange = function check_status() {
		if(objHTTP.readyState == 4){
			if(objHTTP.status == 200) {
				response = objHTTP.responseText;
				if(objTgt = document.getElementById(target)) {
					objTgt.innerHTML = response;
				}
				extraiScript(response);
			}
		} else {
			if(objTgt = document.getElementById(target)) {
				objTgt.innerHTML = "";
				objTgt.innerHTML = "<div align='left' style='padding:10px;'>&nbsp;<img src='images/loading.gif' align='absmiddle'>&nbsp;&nbsp;<font class='texto'>" + msg + "</font></div><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br>";
			}
		}
	}
	objHTTP.send(param);
}

function POST(url) {
	var objHTTP = CreateHttpRequest();
	objHTTP.open("POST", url, false);
	objHTTP.send(param);
	response = objHTTP.responseText;
	return response;
}

function extraiScript(texto){
    var ini = 0;
        while (ini!=-1){
        ini = texto.indexOf('<script', ini);
                if (ini >=0){
                ini = texto.indexOf('>', ini) + 1;
            var fim = texto.indexOf('</script>', ini);
            codigo = texto.substring(ini,fim);
            novoS = document.createElement("script");
                        novoS.text = codigo;
                        document.body.appendChild(novoS);
        }
    }
}

function gE(field) {
    return document.getElementById(field);
}