function is_leeg (v) {
  return ((v == null) || (v == ''));
}

function TestDataCheck() 
{ 
  var missinginfo = ""; 
  var email_rx = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})$/; 

  if (is_leeg(document.aanmeldformulier.naam.value))
  {
    missinginfo += "Vul uw naam in.\n\n"; 
  }

  if (is_leeg(document.aanmeldformulier.adres.value))
  {
    missinginfo += "Vul het adres in.\n\n"; 
  }

  if (is_leeg(document.aanmeldformulier.postcode.value))
  {
    missinginfo += "Vul de postcode in.\n\n"; 
  }

  if (is_leeg(document.aanmeldformulier.plaats.value))
  {
    missinginfo += "Vul de plaats in.\n\n"; 
  }

  if (is_leeg(document.aanmeldformulier.email.value)) 
  { 
    missinginfo += "Vul het e-mailadres in.\n\n"; 
  }

  if ( (!is_leeg(document.aanmeldformulier.telefoon.value)) && (!is_telefoonnr(document.aanmeldformulier.telefoon.value)) ) 
  { 
    missinginfo += "Geen geldig telefoonnummer.\n\n";
  }

  if (!is_leeg(document.aanmeldformulier.email.value) ) 
  { 
    missinginfo += YY_checkform('aanmeldformulier','email','S','2','Geen geldig e-mailadres.\n\n');
  }
  
  if ( (document.aanmeldformulier.nieuwsbrief[0].checked == false) &&
       (document.aanmeldformulier.nieuwsbrief[1].checked == false) 
     )
  {
    missinginfo += "Wilt u zich aanmelden, of afmelden?\n\n";
  }

  if ( (document.aanmeldformulier.consumenten.checked == false) &&
		 (document.aanmeldformulier.zakelijk.checked == false)
	  )
	{
		missinginfo += "Voor welke categorie wilt u zich aanmelden, of afmelden?\n\n";
	}

  if  (missinginfo != "")
  { 
    alert(missinginfo); 
    return false; 
  } 

  document.aanmeldformulier.aanafmelden.value = document.aanmeldformulier.nieuwsbrief[0].checked?'aangemeld':'afgemeld';

  if ( (document.aanmeldformulier.consumenten.checked) && 
       (document.aanmeldformulier.zakelijk.checked)
	  )
  {
    document.aanmeldformulier.categorie.value = 'Consumenten en Zakelijk';
  }
  else
  {
    document.aanmeldformulier.categorie.value = document.aanmeldformulier.consumenten.checked?'Consumenten':'Zakelijk';
  }
  
  if (document.aanmeldformulier.aanafmelden.value == 'aangemeld') {
    document.aanmeldformulier.mailtekst.value =
    '<p>Bedankt voor uw aanmelding.</p><p>Wij zullen u vanaf heden vier maal per jaar de Aevitae nieuwsbrief toezenden!</p>';
    document.aanmeldformulier.confirmationtekst.value =
    'Iemand heeft zich zojuist aangemeld voor de nieuwsbrief via de website www.aevitae.nl\n\n'; 
  }
  else 
  {
    document.aanmeldformulier.mailtekst.value =
    '<p>Bedankt voor uw reactie.</p><p>Wij zullen vanaf heden geen nieuwsbrieven meer naar uw adres verzenden.</p>';
    document.aanmeldformulier.confirmationtekst.value =
    'Iemand heeft zich zojuist afgemeld voor de nieuwsbrief via de website www.aevitae.nl\n\n'; 
  }

  return true; 
}

function is_telefoonnr(telefoonnr) {
	numcount = 0;
	numopenbr = 0;
	numclosebr = 0;
	numplus = 0;
	numminus = 0;
	numother = 0;
    for (var i = 0; i < telefoonnr.length; i++) {
      kar = telefoonnr.substring(i, i+1);
      if ((kar < '0') || (kar > '9')) 
	  {
	    if (kar == '-') {
	      numminus++;
        }
        else if (kar == '+') {
          numplus++;
        }
        else if (kar == '(') {
	      numopenbr++;
        }
        else if (kar == ')') {
	      numclosebr++;
        }
		else {
		  numother++;
		}
      } 
	  else 
	  {
        numcount++;
	  }
	}
	if ( (numcount<10) || (numclosebr>1) || (numopenbr>1) || (numminus>1) || (numplus>1) || (numother>0) ) 
	{
	  return false;
	}
	else
	{
	  return true;
	}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function YY_checkform() { //v4.71
//copyright (c)1998,2002 Yaromat.com
  var a=YY_checkform.arguments,oo=true,v='',s='',err=false,r,o,at,o1,t,i,j,ma,rx,cd,cm,cy,dte,at;
  for (i=1; i<a.length;i=i+4){
    if (a[i+1].charAt(0)=='#'){r=true; a[i+1]=a[i+1].substring(1);}else{r=false}
    o=MM_findObj(a[i].replace(/\[\d+\]/ig,""));
    o1=MM_findObj(a[i+1].replace(/\[\d+\]/ig,""));
    v=o.value;t=a[i+2];
    if (o.type=='text'||o.type=='password'||o.type=='hidden'){
      if (r&&v.length==0){err=true}
      if (v.length>0)
      if (t==1){ //fromto
        ma=a[i+1].split('_');if(isNaN(v)||v<ma[0]/1||v > ma[1]/1){err=true}
      } else if (t==2){
        rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-zA-Z]{2,4}$");if(!rx.test(v))err=true;
      } else if (t==3){ // date
        ma=a[i+1].split("#");at=v.match(ma[0]);
        if(at){
          cd=(at[ma[1]])?at[ma[1]]:1;cm=at[ma[2]]-1;cy=at[ma[3]];
          dte=new Date(cy,cm,cd);
          if(dte.getFullYear()!=cy||dte.getDate()!=cd||dte.getMonth()!=cm){err=true};
        }else{err=true}
      } else if (t==4){ // time
        ma=a[i+1].split("#");at=v.match(ma[0]);if(!at){err=true}
      } else if (t==5){ // check this 2
            if(o1.length)o1=o1[a[i+1].replace(/(.*\[)|(\].*)/ig,"")];
            if(!o1.checked){err=true}
      } else if (t==6){ // the same
            if(v!=MM_findObj(a[i+1]).value){err=true}
      }
    } else
    if (!o.type&&o.length>0&&o[0].type=='radio'){
          at = a[i].match(/(.*)\[(\d+)\].*/i);
          o2=(o.length>1)?o[at[2]]:o;
      if (t==1&&o2&&o2.checked&&o1&&o1.value.length/1==0){err=true}
      if (t==2){
        oo=false;
        for(j=0;j<o.length;j++){oo=oo||o[j].checked}
        if(!oo){s+=a[i+3]}
      }
    } else if (o.type=='checkbox'){
      if((t==1&&o.checked==false)||(t==2&&o.checked&&o1&&o1.value.length/1==0)){err=true}
    } else if (o.type=='select-one'||o.type=='select-multiple'){
      if(t==1&&o.selectedIndex/1==0){err=true}
    }else if (o.type=='textarea'){
      if(v.length<a[i+1]){err=true}
    }
    if (err){s+=a[i+3]; err=false}
  }
  return s;
}
