var browser1 = ((navigator.appName == "Netscape") && (parseInt(navigator.appVersion) >= 3 ))
var browser2 = ((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4 ))

// set verzendswitch
var sendSW=0

// controleerf formulier
function formCheck (emailStr) {

// reeds op send gedrukt?
if(sendSW==1) {
	alert("Geduld a.u.b. Het formulier is reeds verzonden.")
	return false
}

// test achternaam
v2=document.forms.ctrl.v2.value;
if(v2.length < 1) {
	alert("\n Naam niet ingevuld")
document.forms.ctrl.v2.focus();
document.forms.ctrl.v2.select();
return false;
   }


// test initialen
v3=document.forms.ctrl.v3.value;
if(v3.length < 1) {
	alert("\n Initialen niet ingevuld")
document.forms.ctrl.v3.focus();
document.forms.ctrl.v3.select();
return false;
   }

// test bericht niet leeg
v11=document.forms.ctrl.v11.value;
if(v11.length < 1) {
	alert("\n Bericht is leeg")
	document.forms.ctrl.v11.focus();
	document.forms.ctrl.v11.select();
	return false;
}

// test emailadres
var emailPat=/^(.+)@(.+)$/
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]| (){}//"
var validChars="\[^\\s" + specialChars + "\]"
var quotedUser="(\"[^\"]*\")"
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")

var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
	alert("Het emailadres lijkt incorrect (controleer @ en punten)")
	return false
}
var user=matchArray[1]
var domain=matchArray[2]
// See if "user" is valid 
if(user.match(userPat)==null) {
	// user is not valid
	alert("De gebruikersnaam voor het @ lijkt incorrect.")
	return false
}

var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
 	// this is an IP address
	for (var i=1;i<=4;i++) {
		if(IPArray[i]>255) {
			alert("Bestemmings IP-adres is ongeldig.")
			return false
		}
	}
	return true
}

// Domain is symbolic name
var domainArray=domain.match(domainPat)
if(domainArray==null) {
	alert("De domeinnaam lijkt incorrect")
	return false
}

var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if(domArr[domArr.length-1].length<2 ||  domArr[domArr.length-1].length>4) {
	alert("Het emailadres moet eindigen op een drie/vier letterig domein of een twee letterig land")
	return false
}

// Make sure there's a host name preceding the domain.
if (len<2) {
	var errStr="Dit emailadres lijkt een hostnaam te missen"
	alert(errStr)
	return false
}

// alles is gecontroleerd en goed
sendSW=1
return true;
}
// --------------------

// test op numeriek
function checknumeric(waarde,lengte) {
	if (lengte>0)
		if (waarde.length!=lengte) return 0;
			return waarde.search("[^1234567890]");
}

// modulus-11 controle
function Controle_modulo_11(banknr) {
	w=banknr;
	v=0;
	for (i=1;w>0;i++) {
		w-=(x=w%10);
		v+=i * x;
		w/=10;
	}
	if(v %11 > 0 || banknr=='123456789') {
		alert("Banknummer onjuist");
		return false;
	}
	else {
		return true;
	}
}