function doorlinken(id_waarde,bestands_waarde)
{	
	
	var invoer_tekst = document.getElementById("tekst")
	if(bestands_waarde.indexOf("_agenda") != -1)
	{
	invoer_tekst.innerHTML = ""
	var gegevens = "id="+escape(id_waarde)+"&bestandswaarde="+escape(bestands_waarde)
	var strPageURL = "http://"+document.location.host+"/rpc/intern_zoeken.asp"
	var objXMLHTTP = new ActiveXObject('Microsoft.XMLHTTP'); 
	objXMLHTTP.open('POST',strPageURL,false);
	objXMLHTTP.setRequestHeader("Content-Type", "application/x-www-form-urlencoded")    
	objXMLHTTP.send(gegevens)
	var result =  unescape(objXMLHTTP.responseText)
	var lijst = new Array(result.length)
  	var nieuw = ""
	
	for(x=0; x<result.length; x++) //Routine om xml-string op te schonen
  	{
	lijst[x] = result.substring(x+1,x)
		if(lijst[x] == "+")
		{
		lijst[x] = " "//opvullen met nieuwe waarde
		} 
  	}
  	for(q=0; q<result.length; q++)
	{
 	nieuw = nieuw  + lijst[q] 
 	}

	
	var beschrijving = new Array(8)
	beschrijving[0] = "Titel"
	beschrijving[1] = "Korte beschrijving"
	beschrijving[2] = "Uitgebreide beschrijving"
	beschrijving[3] = "Locatie"
	beschrijving[4] = "Prijs"
	beschrijving[5] = "Tijd"
	beschrijving[6] = "Van"
	beschrijving[7] = "Tot"
	teller = 0
	var obj_tabel = document.createElement("table")
		obj_tabel.border = "0"
		obj_tabel.className = "agendatabel"
		obj_tabel.bordercolor="#000000"
		obj_tabel.setAttribute("rules","groups") 
		 
		obj_tabel.width = "100%"
		 
		obj_tabel.id = "tabel"+teller

		var obj_head = document.createElement("tbody")
		
		
		var splits = nieuw.split("|||")
		if(splits.length > 1)
		{
		for(z=0; z<beschrijving.length; z++)
		{
				
 			if(z <= 2) //De eerste 3 array items worden uitgevoerd
				{
					if(splits[z] != "")
					{
					var kop = document.createElement("tr")
					
  					var rij1 = document.createElement("td")
					rij1.width = "40%"
					//
					kop.style.verticalAlign= "top"
					var rij1_tekst = document.createTextNode(beschrijving[z])
					rij1.appendChild(rij1_tekst)
					kop.appendChild(rij1)
					
					var rij2 = document.createElement("td")
 					rij2.width = "60%"
					 
					rij2.innerHTML = splits[z]
 					kop.appendChild(rij2)
					}
					obj_head.appendChild(kop)
					if(z==0)
					{
					rij1.style.backgroundColor = "#E6E6E6"
					rij2.style.backgroundColor = "#E6E6E6"
					}
					if(z==1)//Wanneer z=1 dan wordt op die plaats iets bijgevoegd
					{
					rij2.setAttribute("width", "55%")
					var ruimte = document.createTextNode('  ')
					rij2.innerHTML = splits[z]+"    <br><a href=# onClick=\"aan(this.id,"+(teller+1)+"); return false;\" id="+-teller+">meer informatie</a>"
					rij2.appendChild(ruimte)
					}
					
					if(z==2)//plaatsing van attribuutwaarden bij het item Uitgebreide Beschrijving
					{
					kop.setAttribute("id", teller)
					kop.style.display = "none"
					}
				}
				if(z==5 && splits[z] != "--")
					{
					var kop = document.createElement("tr")
  					var rij1 = document.createElement("td")
					rij1.width = "40%"
					kop.style.verticalAlign= "top"
					var rij1_tekst = document.createTextNode(beschrijving[3])
					rij1.appendChild(rij1_tekst)
					kop.appendChild(rij1)
					
					var rij2 = document.createElement("td")
					rij2.width = "60%"
					 
					rij2.innerHTML = splits[z]
 					kop.appendChild(rij2)
					obj_head.appendChild(kop)
					}
 
					
					if(z==6 && splits[z] != "--")
					{
					var kop = document.createElement("tr")
  					var rij1 = document.createElement("td")
					rij1.width = "40%"
					kop.style.verticalAlign= "top"
					var rij1_tekst = document.createTextNode(beschrijving[4])
					rij1.appendChild(rij1_tekst)
					kop.appendChild(rij1)
					
					var rij2 = document.createElement("td")
					rij2.width = "60%"
					 
					rij2.innerHTML = splits[z]
 					kop.appendChild(rij2)
					obj_head.appendChild(kop)
					}
					
					if(z==7 && splits[z] != "--")
					{
					var kop = document.createElement("tr")
  					var rij1 = document.createElement("td")
					rij1.width = "40%"
					kop.style.verticalAlign= "top"
					var rij1_tekst = document.createTextNode(beschrijving[5])
					rij1.appendChild(rij1_tekst)
					kop.appendChild(rij1)
					
					var rij2 = document.createElement("td")
					rij2.width = "60%"
					 
					rij2.innerHTML = splits[z]
 					kop.appendChild(rij2)
					obj_head.appendChild(kop)
					}
					
					if( z==7 && splits[8] != splits[9]) //Wanneer begin- en einddatum verschillen
					{
						
					var kop = document.createElement("tr")	
					var rij1 = document.createElement("td")//begindatum
					rij1.width = "40%"
					var rij1_begindatum = document.createTextNode(beschrijving[6])
					rij1.appendChild(rij1_begindatum)
 					var rij2 = document.createElement("td")
					rij2.width = "60%"
					rij2_datumtekst = document.createTextNode(splits[8])
					
					rij2.appendChild(rij2_datumtekst)
					
						if(rij2_datumtekst.length == 8) //Beetje uitlijnen
						{
						var kolom3 = document.createTextNode('             Tot         ')
						}
						else if(rij2_datumtekst.length == 9)
						{
						var kolom3 = document.createTextNode('          Tot         ')
						}
						else if(rij2_datumtekst.length == 10)
						{
						var kolom3 = document.createTextNode('          Tot         ')
						}
						
 					rij2.appendChild(kolom3)
					
					var rij2_datumtekst = document.createTextNode(splits[9]) 
					rij2.appendChild(rij2_datumtekst)
					
					
					kop.appendChild(rij1)
					kop.appendChild(rij2)
					obj_head.appendChild(kop)
					}
					
					if(z==7 && splits[8] == splits[9])
					{
						 
					var kop = document.createElement("tr")	
					var rij1 = document.createElement("td")//begindatum
					rij1.width = "40%"
					var tekst = document.createTextNode("Op")
					rij1.appendChild(tekst)
					
					var rij2 = document.createElement("td")
					rij2.width = "60%"
					var einddatum = document.createTextNode(splits[9])
					rij2.appendChild(einddatum)
					
					kop.appendChild(rij1)
					kop.appendChild(rij2)
					obj_head.appendChild(kop)
 					}
			
		teller = teller+1
		obj_tabel.appendChild(obj_head)
 		invoer_tekst.appendChild(obj_tabel)
		}//for(z=0; z<beschrijving.length; z++)
		}
		//else
		//{
			//invoer_tekst.innerHTML = "Dit agendaonderwerp is niet beschikbaar.........."
		//}
	laden()
 	herstel()
	}
	
	else
	{
	var gegevens = "id="+ escape(id_waarde)+"&bestandswaarde="+escape(bestands_waarde)
	var strPageURL = "http://"+document.location.host+"/rpc/intern_zoeken.asp"
	var objXMLHTTP = new ActiveXObject('Microsoft.XMLHTTP'); 
	objXMLHTTP.open('POST',strPageURL,false);
	objXMLHTTP.setRequestHeader("Content-Type", "application/x-www-form-urlencoded")    
	objXMLHTTP.send(gegevens)
	var result =  unescape(objXMLHTTP.responseText)
	var lijst = new Array(result.length)
  	var nieuw = ""
   
  	for(x=0; x<result.length; x++) //Routine om xml-string op te schonen
  	{
	lijst[x] = result.substring(x+1,x)
		if(lijst[x] == "+")
		{
		lijst[x] = " "//opvullen met nieuwe waarde
		} 
  	}
  	for(q=0; q<result.length; q++)
	{
 	nieuw = nieuw  + lijst[q] 
 	}
	var patroon = new RegExp("admin/bl.asp","gi")
	var obj_uit = nieuw.replace(patroon,"")
   	invoer_tekst.innerHTML = obj_uit
 	//invoer_tekst.innerHTML = nieuw 
	laden()
	herstel()
	}
}