'R0' erforderl. - Zahl (jede bel. 1-stell. Ziffer nach R geht hier)
'RinRange1:5' erforderl. - Zahlbereich (hier 1-5)
'NinRange5:10' nicht erforderl. - wenn drin, dann Bereich (hier von 5-10)
'RisEmail' erforderl. - Email-Check (auf @ und ., Länge mind. 7 Zeichen und TLD mind. 2 Zeichen,
domain mind. 3 Zeichen )
'NisEmail' nicht erforderl. - wenn drin, dann eMailCheck
'N0' nicht erforderl. - wenn drin, dann Zahl
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -# */
function MM_findObj(n, d) { //v3.0 © Macromedia - Anpassung R. Hempel
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);
return x;
}
function MM_validateForm() { //v3.0 © Macromedia - Anpassung R. Hempel
var i,p,q,nm,test,num,min,max,errors='',nerrs=0,plural,args=MM_validateForm.arguments;
for (i=0; i<(args.length-2); i+=3) {test=args[i+2]; val=MM_findObj(args[i]);
if (val) {nm=val.name;if(args[i+1])nm=args[i+1];if ((val=val.value)!="") {
if (test.indexOf('isEmail')!=-1) {p=val.indexOf('@');l=val.length; d=val.indexOf('.');t=val.substring(d+1).length;
if (p<1 || p==(val.length-6) || d<1 || l<7 || t<2) {++nerrs;errors+='- '+nm+' scheint keine gültige eMail-Adresse zu sein.\n';}
} else if (test!='R') {num = parseFloat(val);if (val!=''+num) {++nerrs;errors+='- '+nm+' muss eine Zahl sein.\n';}
if (test.indexOf('inRange') != -1) {p=test.indexOf(':');min=test.substring(8,p);max=test.substring(p+1);
if (num<min || max<num) {++nerrs;errors+='- '+nm+' muss eine Zahl zwischen '+min+' und '+max+' sein.\n';}
}}
} else if (test.charAt(0) == 'R') {++nerrs;errors += '- Eingabe im Feld '+nm+' erforderlich.\n';}
}}
if (errors) {if(nerrs==1)plural='Folgender Fehler';else plural='Folgende '+nerrs+' Fehler';
alert(plural+' bei der Eingabe:\n'+errors);
}
document.MM_returnValue = (errors == '');
}
//-->
