//--- Prüft, ob nur Ziffern eingegeben wurden
function NurZiffern(Feld)
{  PruefeZeichen(Feld, "0123456789", "Bitte prüfen Sie die Zahl") }

//--- Prüft, ob nur Zeichen eingegeben wurden,
//--- die für eine Telefonnummer üblich sind
function NurTelefon(Feld)
{  PruefeZeichen(Feld, "0123456789 /-+()", "Bitte prüfen Sie die Telefonnummer") }

//--- Prüft, ob eine eMail-Adresse korrekt aufgebaut ist
function eMailAdresseOK(eMail)
{  
// Falls das Feld leer ist, ohne Prüfung aussteigen
     if (eMail.value.length==0) { return true }

     // Text für die Fehlermeldung
     var FehlerMeldung = new String("Fehler in der eMail-Adresse\n\n")

     // Position des @ herausfinden
     var PosEt = eMail.value.indexOf("@")
     if (PosEt == -1) {
       alert(FehlerMeldung + "Es fehlt ein @")
       return eMail.focus() }
     if (PosEt == 0) {
       alert(FehlerMeldung + "Es fehlt der Empfänger")
       return eMail.focus() }
     if (eMail.value.indexOf("@", PosEt + 1) > PosEt) {
       alert(FehlerMeldung + "Es darf nur ein @ enthalten sein")
       return eMail.focus() }

     // Position des ersten . nach dem @ herausfinden
     var PosPt = eMail.value.indexOf(".", PosEt)

     if ((PosPt == -1) || (PosPt - PosEt < 2) || (eMail.value.length - PosPt < 3)) {
       FehlerMeldung += "Eine eMail-Adresse muß so aufgebaut sein: x@x.xx "
       FehlerMeldung += "Jedes x steht für mindestens ein Zeichen"
       alert(FehlerMeldung)
	   eMail.value = "";
       return eMail.focus() }

     // Zulässige Zeichen für eMails definieren
     var ZugelasseneZeichen = new String("abcdefghijklmnopqrstuvwxyz")
     ZugelasseneZeichen += ZugelasseneZeichen.toUpperCase() + "0123456789.-_@"

     // eMail-Adresse auf zulässige Zeichen überprüfen
   return PruefeZeichen(eMail, ZugelasseneZeichen, FehlerMeldung)
}

//--- Unterprogramm, welches die Zeichen prüft
function PruefeZeichen(Feld, ZugelasseneZeichen, FehlerMeldung)
{  
   for (var Pos = 0; Pos < Feld.value.length; Pos++)
   {
          if (ZugelasseneZeichen.indexOf(Feld.value.charAt(Pos)) == -1)
          { FehlerMeldung += "\n\nIhre Eingabe enthält das Zeichen '"
            FehlerMeldung += Feld.value.charAt(Pos)
            FehlerMeldung += "'. Sie dürfen nur diese Zeichen verwenden:\n"
            FehlerMeldung += ZugelasseneZeichen
            if (ZugelasseneZeichen.indexOf(" ") == -1)
               { FehlerMeldung += "\nLeerzeichen sind nicht erlaubt" }
            else
               { FehlerMeldung += "\nund das Leerzeichen" }
            alert(FehlerMeldung)
			Feld.value="";
            Feld.focus()
            return
          }
    }
}