/************************************************************
© by Markus C. Unterleitner
Last updated: 24.04.2003
All rights reserved
*************************************************************/

function buildlink(vn, name, domain,tld, link) {
	
var link1 = "<a href='mailto:";
if (vn.length==0)
	link1+=name+"@"+domain+"."+tld+"' class='link1'>"+link+"</a>";
else
	link1+=name+"."+vn+"@"+domain+"."+tld+"' class='link1'>"+link+"</a>";
document.write(link1);
}

function isblank(s) {
	for(var i = 0; i< s.length; i++) {
		var c = s.charAt(i);
		if ((c != ' ') && (c != '\n') && (c != '')) return false;
	}
	return true;
}

function check_email(e) {
ok = "1234567890qwertyuiop[]asdfghjklzxcvbnm.@-_QWERTYUIOPASDFGHJKLZXCVBNM";

	for(i=0; i < e.length ;i++){
		if(ok.indexOf(e.charAt(i))<0){ 
			return (false);
		}	
	} 
	var re_mail = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z]{2,4})+$/;
	if (!e.match(re_mail)) {
		return (false);
	}		
	return true;
}

function checknumber(e){
var x=e.value;
var aNum=/(^\d+$)|(^\d+\.\d+$)/;
//alert(x);
if (aNum.test(x))
return false;
else
return true;
}

function verify(f) {
	var msg;
	var undef;
	var empty_fields ="";
	var errors ="";
	var Zuw = false;
	var Ort = false;
	var Zuw1 = false;
		
	for(var i=0; i<f.length; i++){
		var e=f.elements[i];
		//alert(e.value);		
		if (((e.type=="text")||(e.type=="select-one")) && !e.optional) {
		
			if ((e.value == null) || (e.value == "") || (e.value == "-Bitte Auswahl treffen-") || isblank(e.value)) {
				empty_fields += "\n	"+e.name;
				continue;
			}
			if ((e.name=="EMAIL") && !e.optional ) {
				if (!check_email(e.value)) {
					errors += "* ERROR: \nEMail Addresse im Feld "+e.name+" ist fehlerhaft.\n";
					EMail = false;
					continue;
				}
			}
			if (e.numeric || (e.min != null && e.min!= undef) || (e.max != null && e.max!= undef)) {
				
				var v = parseFloat(e.value);
				if (checknumber(e) || ((e.min != null) && (v < e.min)) || ((e.max != null) && (v > e.max))) {
					errors += "Im Feld "+e.name+" muß eine Zahl (0 bis 9) sein";
					if (e.min != null)
						errors+= " die größer als "+e.min+" ist, bitte keine Sonderzeichen wie z.B. / oder - angeben";
					if ((e.max != null) && (e.min != null))
						errors+= " und kleiner als "+e.max+" ist, bitte keine Sonderzeichen wie z.B. / oder - angeben";
					else if (e.max != null)
						errors+= "die kleiner als "+e.max+" ist, bitte keine Sonderzeichen wie z.B. / oder - angeben";
					errors+=".\n";
				}
			}
		}
	}
	
	
	
	if (!empty_fields && ! errors) return true;
	
	msg = "_____________________________________________________\n\n";
	msg+= "Das Formular wurde wegen der folgenden Fehler nicht übertragen.\n"
	msg+= "Bitte korregieren Sie diese Fehler und wiederholen Sie danach die Anfrage.\n";
	msg+= "_____________________________________________________\n\n";
	
	if (empty_fields) {
		msg+="* Diese Felder sind leer: " + empty_fields +"\n";
		if (errors) msg+="\n";
	}
	msg+= errors;
	alert(msg);
	return false;
}

function resval(spfad)
{
var res=window.screen.width+"x"+window.screen.height+"x"+window.screen.colorDepth; 
Bild01 = new Image();
Bild01.src = "resval.php?dep="+res;
}