var xmlHttp

function laad(str, pagina, waar, wacht) {
	xmlHttp=GetXmlHttpObject()
	if (xmlHttp==null) {
		alert ("Browser does not support HTTP Request")
		return
	}
	var url="/site/onderdelen/"+pagina+".php"
	url=url+"?"+str+"fd4a505b01aa354e5fd742bb4256e45d"
	url=url+"&sid="+Math.random()
	xmlHttp.onreadystatechange=function() { stateChanged(waar, wacht); };
	xmlHttp.open("GET",url,true)
	xmlHttp.send(null)
}

function stateChanged(waar, wacht) {
	if (xmlHttp.readyState==4 || xmlHttp.readyState=="complete") {
		var str = xmlHttp.responseText;
		var begin = str.indexOf("[start java]")+12;
		var eind = str.indexOf("[stop java]")-begin;
		var java = str.substr(begin,eind);
		document.getElementById(waar).innerHTML=str.replace("[start java]"+java+"[stop java]",'');
		eval (java);
	}
	if (wacht == '1') {
		if (xmlHttp.readyState==1) {
			document.getElementById(waar).innerHTML='<table width="100%" height="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center"><img src="/site/images/loader.gif" /></td></tr></table>';
		}
/*		if (xmlHttp.readyState==2) { 
			document.getElementById(waar).innerHTML='<table width="100%" height="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center"><img src="/site/images/loader.gif" /></td></tr></table>';
		}
		if (xmlHttp.readyState==1) {
			document.getElementById(waar).innerHTML='<table width="100%" height="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center"><img src="/site/images/loader.gif" /></td></tr></table>';
		}
		if (xmlHttp.readyState==0) {
			document.getElementById(waar).innerHTML='<table width="100%" height="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center"><img src="/site/images/loader.gif" /></td></tr></table>';
		}*/
	}
}

function GetXmlHttpObject() {
	var xmlHttp=null;
	try {
		// Firefox, Opera 8.0+, Safari
		xmlHttp=new XMLHttpRequest();
	}
	catch (e) {
		//Internet Explorer
		try {
			xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
		}
		catch (e) {
			xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
		}
	}
	return xmlHttp;
}
