function createRequestObject() {
	if (window.XMLHttpRequest) { var obj = new XMLHttpRequest(); }
	else {
		var obj = new ActiveXObject('Msxml2.XMLHTTP');
		if(!obj) { var obj = new ActiveXObject('Microsoft.XMLHTTP'); }
	}
	return obj;
}
function ReLoad(url,data) {
	var Req = createRequestObject();
	Req.onreadystatechange = function(){if(Req.readyState==4&&Req.status==200) { myeval(Req.responseText); }};
	Req.open('POST',url,true);
	Req.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
	Req.send(data);
}
function myeval(txt) {
	document.all.rcalendar.innerHTML=txt
}