3
<title>Embperl Tests - Embperl::Form::Validate</title>
9
Stundenzahl nicht numerisch
10
Bitte (sinnvollen) Kommentar eingeben
14
function epform_validate_foo()
16
var msgs = new Array ;
26
obj = document.foo['datum'] ; if (!(obj.value)) { msgs[i++]='Bitte Datum eintragen'; break;}
27
obj = document.foo['datum'] ; if (!(obj.value.search(/\d+\.\d+\.\d+/) >= 0)) { msgs[i++]='Datum �berpr�fen'; break;}
29
} while (0) ; if (fail) break ;
32
obj = document.foo['stunden'] ; if (!(obj.value)) { msgs[i++]='Bitte Stunden eintragen'; break;}
33
obj = document.foo['stunden'] ; if (!(obj.value.search(/^\s*[0-9+-.][0-9.eE]*\s*$/) >= 0)) { msgs[i++]='Stundenzahl nicht numerisch'; break;}
34
obj = document.foo['stunden'] ; if (!(obj.value > 0)) { msgs[i++]='Stundenzahl mu� >0 sein'; break;}
36
} while (0) ; if (fail) break ;
39
obj = document.foo['kommentar'] ; if (!(obj.value)) { msgs[i++]='Bitte (sinnvollen) Kommentar eingeben'; break;}
41
} while (0) ; if (fail) break ;
43
} while (0) ; if (fail) break ;
48
alert (msgs.join('\n')) ;
56
<form name="foo" action="POST" onSubmit="return epform_validate_foo()">
57
stunden <input type="text" name="stunden" value="x"><br>
58
datum <input type="text" name="datum" value="23.12.2002"><br>
59
kommentar <input type="text" name="kommentar" value=""><br>
60
<input type="submit"><br>