// JavaScript Document
function el(id) {
  if (document.getElementById) {
    return document.getElementById(id);
  }
  return null;
}

function setFontSize(par) {
	var loc = document.location.href;
	loc = loc.replace(/[\?&]css=[\+\-]?[0-9]+/, '');
	var sep = (loc.indexOf('?') == -1) ? '?' : '&';
	loc += sep + 'css=' + par;
	document.location.replace(loc);
}

function getResponse(sURL) 
{
	if (document.all)
	{
		// IE version
		try {
			var xml = new ActiveXObject("Microsoft.XMLHTTP");
			xml.Open( "GET", sURL, false );
			xml.Send()
			return xml.responseText;
		}
		catch (e) 
		{
			var xml = new ActiveXObject("MSXML2.XMLHTTP.4.0");
			xml.Open( "GET", sURL, false );
			xml.Send()
			return xml.responseText;
		}
	}
	else
	{
		// Mozilla/Netscrap 6+ version
		var xml=new XMLHttpRequest();
		xml.open("GET",sURL,false);
		xml.send(null);
		return xml.responseText;
	}
}

function wordhighlight(aSourceObject, aWords){
	//Extract HTML Tags
	regexp=/<[^<>]*>/ig;
	vHTMLArray = aSourceObject.innerHTML.match(regexp);
	//Replace HTML tags
	vStrippedHTML = aSourceObject.innerHTML.replace(regexp,"$!$");
	
	//alert(vStrippedHTML);
	
	//Replace search words
	regexp= new RegExp ("(" + aWords + ")", "gi");
	vTemp = vStrippedHTML.replace(regexp,'<span class="highlight">$1</span>');
	
	//Reinsert HTML
	for(i=0;vTemp.indexOf("$!$") > -1;i++){
		vTemp = vTemp.replace("$!$", vHTMLArray[i]);
	}
	//Diaply Result
	aSourceObject.innerHTML = vTemp;
	//alert(vTemp);
}



function removehighlight2(aSourceObject){
	regexp=/(<span class\=highlight>)([^<>]*)(<\/span>)/ig;
	aSourceObject.innerHTML = aSourceObject.innerHTML.replace(regexp, "$2");
}

/*
  -------------------------------------------------------------------------
	                    JavaScript Form Validator 
                                Version 2.0.2
	Copyright 2003 JavaScript-coder.com. All rights reserved.
	You use this script in your Web pages, provided these opening credit
    lines are kept intact.
	The Form validation script is distributed free from JavaScript-Coder.com

	You may please add a link to JavaScript-Coder.com, 
	making it easy for others to find this script.
	Checkout the Give a link and Get a link page:
	http://www.javascript-coder.com/links/how-to-link.php

    You may not reprint or redistribute this code without permission from 
    JavaScript-Coder.com.
	
	JavaScript Coder
	It precisely codes what you imagine!
	Grab your copy here:
		http://www.javascript-coder.com/
    -------------------------------------------------------------------------  
*/
function Validator(frmname)
{
  this.formobj=document.forms[frmname];
	if(!this.formobj)
	{
	  alert("BUG: couldnot get Form object "+frmname);
		return;
	}
	if(this.formobj.onsubmit)
	{
	 this.formobj.old_onsubmit = this.formobj.onsubmit;
	 this.formobj.onsubmit=null;
	}
	else
	{
	 this.formobj.old_onsubmit = null;
	}
	this.formobj.onsubmit=form_submit_handler;
	this.addValidation = add_validation;
	this.setAddnlValidationFunction=set_addnl_vfunction;
	this.clearAllValidations = clear_all_validations;
}
function set_addnl_vfunction(functionname)
{
  this.formobj.addnlvalidation = functionname;
}
function clear_all_validations()
{
	for(var itr=0;itr < this.formobj.elements.length;itr++)
	{
		this.formobj.elements[itr].validationset = null;
	}
}
function form_submit_handler()
{
	for(var itr=0;itr < this.elements.length;itr++)
	{
		if(this.elements[itr].validationset &&
	   !this.elements[itr].validationset.validate())
		{
		  return false;
		}
	}
	if(this.addnlvalidation)
	{
	  str =" var ret = "+this.addnlvalidation+"()";
	  eval(str);
    if(!ret) return ret;
	}
	return true;
}
function add_validation(itemname,descriptor,errstr)
{
  if(!this.formobj)
	{
	  alert("BUG: the form object is not set properly");
		return;
	}//if
	var itemobj = this.formobj[itemname];
  if(!itemobj)
	{
	  alert("BUG: Couldnot get the input object named: "+itemname);
		return;
	}
	if(!itemobj.validationset)
	{
	  itemobj.validationset = new ValidationSet(itemobj);
	}
  itemobj.validationset.add(descriptor,errstr);
}
function ValidationDesc(inputitem,desc,error)
{
  this.desc=desc;
	this.error=error;
	this.itemobj = inputitem;
	this.validate=vdesc_validate;
}
function vdesc_validate()
{
 if(!V2validateData(this.desc,this.itemobj,this.error))
 {
    this.itemobj.focus();
		return false;
 }
 return true;
}
function ValidationSet(inputitem)
{
    this.vSet=new Array();
	this.add= add_validationdesc;
	this.validate= vset_validate;
	this.itemobj = inputitem;
}
function add_validationdesc(desc,error)
{
  this.vSet[this.vSet.length]= 
	  new ValidationDesc(this.itemobj,desc,error);
}
function vset_validate()
{
   for(var itr=0;itr<this.vSet.length;itr++)
	 {
	   if(!this.vSet[itr].validate())
		 {
		   return false;
		 }
	 }
	 return true;
}
function validateEmailv2(email)
{
// a very simple email validation checking. 
// you can add more complex email checking if it helps 
    if(email.length <= 0)
	{
	  return true;
	}
    var splitted = email.match("^(.+)@(.+)$");
    if(splitted == null) return false;
    if(splitted[1] != null )
    {
      var regexp_user=/^\"?[\w-_\.]*\"?$/;
      if(splitted[1].match(regexp_user) == null) return false;
    }
    if(splitted[2] != null)
    {
      var regexp_domain=/^[\w-\.]*\.[A-Za-z]{2,4}$/;
      if(splitted[2].match(regexp_domain) == null) 
      {
	    var regexp_ip =/^\[\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\]$/;
	    if(splitted[2].match(regexp_ip) == null) return false;
      }// if
      return true;
    }
return false;
}
function V2validateData(strValidateStr,objValue,strError) 
{ 
    var epos = strValidateStr.search("="); 
    var  command  = ""; 
    var  cmdvalue = ""; 
    if(epos >= 0) 
    { 
     command  = strValidateStr.substring(0,epos); 
     cmdvalue = strValidateStr.substr(epos+1); 
    } 
    else 
    { 
     command = strValidateStr; 
    } 
    switch(command) 
    { 
        case "req": 
        case "required": 
         { 
           if(eval(objValue.value.length) == 0) 
           { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " is verplicht."; 
              }//if 
              alert(strError); 
              return false; 
           }//if 
           break;             
         }//case required 
        case "maxlength": 
        case "maxlen": 
          { 
             if(eval(objValue.value.length) >  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : "+cmdvalue+" maximum aantal karakters "; 
               }//if 
               alert(strError + "\n[huidig aantal = " + objValue.value.length + " ]"); 
               return false; 
             }//if 
             break; 
          }//case maxlen 
        case "minlength": 
        case "minlen": 
           { 
             if(eval(objValue.value.length) <  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : " + cmdvalue + " minimum aantal karakters  "; 
               }//if               
               alert(strError + "\n[huidig aantal = " + objValue.value.length + " ]"); 
               return false;                 
             }//if 
             break; 
            }//case minlen 
        case "alnum": 
        case "alphanumeric": 
           { 
              var charpos = objValue.value.search("[^A-Za-z0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
               if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": ongeldige tekens aanwezig "; 
                }//if 
                alert(strError + "\n [ongeldig karakter op positie " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//case alphanumeric 
        case "num": 
        case "numeric": 
           { 
              var charpos = objValue.value.search("[^0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": alleen cijfers toegestaan "; 
                }//if               
                alert(strError + "\n [ongeldig karakter op positie " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break;               
           }//numeric 
        case "alphabetic": 
        case "alpha": 
           { 
              var charpos = objValue.value.search("[^A-Za-z]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": alleen letters toegestaan "; 
                }//if                             
                alert(strError + "\n [ongeldig karakter op positie " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//alpha 
		case "alnumhyphen":
			{
              var charpos = objValue.value.search("[^A-Za-z0-9\-_]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": toegestane tekens A-Z,a-z,0-9,- en _"; 
                }//if                             
                alert(strError + "\n [ongeldig karakter op positie " + eval(charpos+1)+"]"); 
                return false; 
              }//if 			
			break;
			}
        case "email": 
          { 
               if(!validateEmailv2(objValue.value)) 
               { 
                 if(!strError || strError.length ==0) 
                 { 
                    strError = objValue.name+": ongeldig e-mailadres "; 
                 }//if                                               
                 alert(strError); 
                 return false; 
               }//if 
           break; 
          }//case email 
        case "lt": 
        case "lessthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": moet een getal zijn "); 
              return false; 
            }//if 
            if(eval(objValue.value) >=  eval(cmdvalue)) 
            { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " : value should be less than "+ cmdvalue; 
              }//if               
              alert(strError); 
              return false;                 
             }//if             
            break; 
         }//case lessthan 
        case "gt": 
        case "greaterthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": Should be a number "); 
              return false; 
            }//if 
             if(eval(objValue.value) <=  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : value should be greater than "+ cmdvalue; 
               }//if               
               alert(strError); 
               return false;                 
             }//if             
            break; 
         }//case greaterthan 
        case "regexp": 
         { 
		 	if(objValue.value.length > 0)
			{
	            if(!objValue.value.match(cmdvalue)) 
	            { 
	              if(!strError || strError.length ==0) 
	              { 
	                strError = objValue.name+": ongeldige karakters gevonden "; 
	              }//if                                                               
	              alert(strError); 
	              return false;                   
	            }//if 
			}
           break; 
         }//case regexp 
        case "dontselect": 
         { 
            if(objValue.selectedIndex == null) 
            { 
              alert("BUG: dontselect command for non-select Item"); 
              return false; 
            } 
            if(objValue.selectedIndex == eval(cmdvalue)) 
            { 
             if(!strError || strError.length ==0) 
              { 
              strError = objValue.name+": selecteer een optie "; 
              }//if                                                               
              alert(strError); 
              return false;                                   
             } 
             break; 
         }//case dontselect 
    }//switch 
    return true; 
}
function DoPasswordCheck()
{
  var frm = document.forms["frmAamelden"];
  if(frm.inpWachtwoord.value != frm.inpWachtwoord2.value)
  {
    alert('De ingevulde wachtwoorden zijn niet hetzelfde.');
	frm.inpWachtwoord.focus();
    return false;
  }
  else
  {
    return true;
  }
}
function DoEmailCheck()
{
  var frm = document.forms["frmAamelden"];
  sResponse = getResponse("/forms/aanmelden.asp?check="+frm.inpEmail.value);
  if(sResponse=="bezet")
  {
    alert('Dit e-mailadres is al in gebruik.\nGebruik een ander e-mailadres.');
	frm.inpEmail.focus();
    return false;
  }
  else
  {
    return true;
  }
}

function DoCustomValidation()
{	
  if(false == DoPasswordCheck())
  {
    return false;
  }
  else
  if(false == DoEmailCheck())
  {
    return false;
  }
  else
  {
    return true;
  }
}
/*
	Copyright 2003 JavaScript-coder.com. All rights reserved.
*/

function WachtwoordVergeten()
{
  var msg = "U heeft niet alle velden ingevuld.\nVult u alstublieft alle verplichte velden in.";  
  var frm = document.forms["frmInloggen"];
  
  if(frm.inpEmailVergeten.value==''){
	  	alert(msg);
		frm.inpEmailVergeten.focus();
		return false;  
  }
  
  sResponse = getResponse("/forms/aanmelden.asp?check="+frm.inpEmailVergeten.value);
  if(sResponse=="beschikbaar")
  {
    alert('Dit e-mailadres is niet bekend bij ons.\nGebruik een ander e-mailadres.');
	frm.inpEmailVergeten.focus();
    return false;
  }
  else
  {
	  sResponse = getResponse("/forms/stuurmail.asp?action=wachtwoordvergeten&email="+frm.inpEmailVergeten.value);
	  if(sResponse=="succes")
	  {
		alert('Uw wachtwoord is vestuurd naar het opgegeven e-mailadres.');
		frm.inpEmailVergeten.value='';
    	return true;
	  }else {
		alert('Er is een fout opgetreden.\nProbeer opnieuw.');
		frm.inpEmailVergeten.focus();
		return false;		  
	  }
  }
}



//LILLY-specifiek (Peiling)
function moveUpList(listField) {
   if ( listField.length == -1) {  // If the list is empty
      alert("There are no values which can be moved!");
   } else {
      var selected = listField.selectedIndex;
      if (selected == -1) {
         alert("U moet eerst een aspect selecteren!");
      } else {  // Something is selected 
         if ( listField.length == 0 ) {  // If there's only one in the list
            alert("There is only one entry!\nThe one entry will remain in place.");
         } else {  // There's more than one in the list, rearrange the list order
            if ( selected == 0 ) {
               //alert("The first entry in the list cannot be moved up.");
            } else {
               // Get the text/value of the one directly above the hightlighted entry as
               // well as the highlighted entry; then flip them
               var moveText1 = listField[selected-1].text;
               var moveText2 = listField[selected].text;
               var moveValue1 = listField[selected-1].value;
               var moveValue2 = listField[selected].value;
               listField[selected].text = moveText1;
               listField[selected].value = moveValue1;
               listField[selected-1].text = moveText2;
               listField[selected-1].value = moveValue2;
               listField.selectedIndex = selected-1; // Select the one that was selected before
            }  // Ends the check for selecting one which can be moved
         }  // Ends the check for there only being one in the list to begin with
      }  // Ends the check for there being something selected
   }  // Ends the check for there being none in the list
   
   sValue=""
   for(i=0;i<=listField.length-1;i++) {
   	sValue+=","+listField[i].value;
   }
   document.frmLillyPeiling.uitslag.value=sValue;
}

function moveDownList(listField) {
   if ( listField.length == -1) {  // If the list is empty
      alert("There are no values which can be moved!");
   } else {
      var selected = listField.selectedIndex;
      if (selected == -1) {
         alert("U moet eerst een aspect selecteren!");
      } else {  // Something is selected 
         if ( listField.length == 0 ) {  // If there's only one in the list
            alert("There is only one entry!\nThe one entry will remain in place.");
         } else {  // There's more than one in the list, rearrange the list order
            if ( selected == listField.length-1 ) {
               //alert("The last entry in the list cannot be moved down.");
            } else {
               // Get the text/value of the one directly below the hightlighted entry as
               // well as the highlighted entry; then flip them
               var moveText1 = listField[selected+1].text;
               var moveText2 = listField[selected].text;
               var moveValue1 = listField[selected+1].value;
               var moveValue2 = listField[selected].value;
               listField[selected].text = moveText1;
               listField[selected].value = moveValue1;
               listField[selected+1].text = moveText2;
               listField[selected+1].value = moveValue2;
               listField.selectedIndex = selected+1; // Select the one that was selected before
            }  // Ends the check for selecting one which can be moved
         }  // Ends the check for there only being one in the list to begin with
      }  // Ends the check for there being something selected
   }  // Ends the check for there being none in the list
   
   sValue=""
   for(i=0;i<=listField.length-1;i++) {
   	sValue+=","+listField[i].value;
   }
   document.frmLillyPeiling.uitslag.value=sValue;
}