function createRequestObject() {
  var request;
 
  if(window.XMLHttpRequest)
  { request = new XMLHttpRequest(); } 
  else if(window.ActiveXObject) { 
 
    var ie_versions = ["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 <ie_versions.length; i++) {
      try {
        request = new ActiveXObject(ie_versions[i]);
      }
      catch (error) {request = false}
    }
}
 
    if (!request){
     alert("Error: initializing XMLHttpRequest!");}
    else{
    return request;
	}
 
} 


function UseXmlhttp(FormToUse){
 var UrlSearch = "components/send.cfm?"+ FormToUse + "=true&"
 UrlSearch += CreateQueryFormElements(FormToUse)
 UrlSearch += '&rand=' + Math.random();
//document.getElementById('error').innerHTML =UrlSearch
//return;

var xmlhttp = false;
 xmlhttp = createRequestObject()
 document.body.style.cursor = "wait"
 xmlhttp.onreadystatechange=function() 
 {
  if (xmlhttp.readyState==4) 
     {
	   if (xmlhttp.status == 200){
          var OBJXMLNAW = xmlhttp.responseText; 
	       document.getElementById('returnMsg').style.display="block"
		   document.getElementById('returnMsg').innerHTML = OBJXMLNAW
		  
		   if(OBJXMLNAW.search(/verstuurd/) != -1){
			  document.getElementById('messageform').style.display="none"
			  document.getElementById('verplicht').style.display="none"
               clearForm(FormToUse)
			   //refreshCaptcha()
			   //NewImage('createNewImage')
			  }
       }
		else{
			alert('Fout opgetreden:' +xmlhttp.status )
		}
	  document.body.style.cursor="default"
	  }
  }
  
 xmlhttp.open("GET", UrlSearch,true);
 xmlhttp.send(null)
}



function Google(FormToUse){

}



function GetReferentie(FunctionToUse,NameElementToWrite){
 var UrlSearch = "components/referentie.cfm?"+ FunctionToUse + "=true&"
 UrlSearch += '&rand=' + Math.random();
//document.getElementById('error').innerHTML =UrlSearch
 var xmlhttp = false;
 xmlhttp = createRequestObject()
 document.body.style.cursor = "wait"
 xmlhttp.onreadystatechange=function() 
 {
  if (xmlhttp.readyState==4) 
     {
	   if (xmlhttp.status == 200){
          var OBJXMLNAW = xmlhttp.responseText; 
	      
		  document.getElementById(NameElementToWrite).innerHTML =OBJXMLNAW;go()
       }
		else{
			alert('Fout opgetreden:' +xmlhttp.status )
			document.body.style.cursor="default"
		}
	  document.body.style.cursor="default"
	  }
  }
 xmlhttp.open("GET", UrlSearch,true);
 xmlhttp.send(null)
}
function SetSearchvalue(q){
 var UrlSearch = "../components/searchvalue.cfm?q="+q
 UrlSearch += '&rand=' + Math.random();
//document.getElementById('error').innerHTML =UrlSearch
 var xmlhttp = false;
 xmlhttp = createRequestObject()
 xmlhttp.onreadystatechange=function() 
 {
  if (xmlhttp.readyState==4) 
     {
	   if (xmlhttp.status != 200){
			alert('Fout opgetreden:' +xmlhttp.status )
		}
	  }
  }
 xmlhttp.open("GET", UrlSearch,true);
 xmlhttp.send(null)
}



function CreateQueryFormElements(NameForm){
var returnqs =''
 eleForms = document.getElementById(NameForm);
 ObjFormInput = eleForms.getElementsByTagName("INPUT");
 returnqs =CreateFormStr(ObjFormInput)
 ObjFormTextarea = eleForms.getElementsByTagName("textarea");
 ObjFormSelect = eleForms.getElementsByTagName("select");
 ObjFormCheckbox = eleForms.getElementsByTagName("checkbox");
 returnqs+=(returnqs=='')?'':'&'
 returnqs += CreateFormStr(ObjFormTextarea) 
 returnqs+=(returnqs=='')?'':'&'
 returnqs += CreateFormStr(ObjFormSelect) 
 returnqs+=(returnqs=='')?'':'&'
 returnqs += CreateFormStr(ObjFormCheckbox) 
 
 return returnqs 
	
	}
	
	function CreateFormStr(Getvalues){
	var qs =''
	for (e=0;e<Getvalues.length;e++) { 
	 if(Getvalues[e].name){
	  var name =Getvalues[e].name; 
            if(Getvalues[e].type == "checkbox"){
				if(Getvalues[e].checked){Getvalues[e].value=1}
				else{Getvalues[e].value=0}
			}
			//document.getElementById('error').innerHTML +='type:' + Getvalues[e].type + ' value:' + Getvalues[e].value + ' name:' + name +  '<br>'
			qs+=(qs=='')?'':'&' 
            qs+= name+'='+encodeURI(Getvalues[e].value.replace(/\&/g,"~")); 
   	 } 
	}
return qs

}