/*
'FEHLERCODES;
-------------
500: unerlaubtes zeichen vor dem @ zeichen eingegeben.
501: unerlaubtes zeichen nach dem @ zeichen eingegeben.
503: @ oder . fehlt oder email kuerzer als 7 zeichen
504: letzes zeichen ist ein . oder ein -
505: erstes zeichen ist ein . oder letzes zeichen ist ein & oder _
506: domainname ungueltig
507: . direkt nach dem @ zeichen
*/
function IsEmailValid(sEmail) 
{
var bErr = false;
var errCode = '';
var i;
var iAscii;
var punkt = false;
if ( (sEmail.indexOf("@") > -1) && (sEmail.indexOf(".") > -1) && (sEmail.length >= 7) )
{
for(i=0;i<(sEmail.indexOf("@")-1);i++)
{
iAscii = sEmail.charAt(i);
if (! ( (iAscii >= 0 && iAscii <= 9) || (iAscii >= 'A' && iAscii <= 'Z') || (iAscii >= 'a' && iAscii <= 'z') || iAscii == '-' || iAscii == '.' || iAscii == '_' || iAscii == '&'))
{
errCode = '500 ';
bErr = true;
}
}
if (!bErr)
{
for(i=(sEmail.indexOf("@")+1);i<=sEmail.length;i++)
{
iAscii = sEmail.charAt(i);
if (! ( (iAscii >= 0 && iAscii <= 9) || (iAscii >= 'A' && iAscii <= 'Z') || (iAscii >= 'a' && iAscii <= 'z') || iAscii == '-' || iAscii == '.' || iAscii == '_' || iAscii == '&'))
{
errCode = errCode + '501 ';
bErr = true;
}
}
if(sEmail.charAt(sEmail.length-1) == '.' || sEmail.charAt(sEmail.length-1) == '-')
{
errCode = errCode + '504 ';
bErr = true;
}
if(sEmail.charAt(0) == '.' || sEmail.charAt(sEmail.length-1) == '&'|| sEmail.charAt(sEmail.length-1) == '_')
{
errCode = errCode + '505 ';
bErr = true;
}
for(i=(sEmail.length-5);i<=(sEmail.length-1);i++)
{
if(sEmail.charAt(i) == '.')
punkt = true;
}
if(punkt == true)
{
if (sEmail.charAt(sEmail.length-2) == '.')
punkt = false;
}
if(punkt == false)
{
errCode = errCode + '506 ';
bErr = true;
}
if(sEmail.charAt(sEmail.indexOf("@")+1) == '.')
{
errCode = errCode + '507 ';
bErr = true;
}
}
}
else
{
errCode = errCode + '503 ';
bErr = true;
}
if(bErr)
alert('Bitte geben Sie eine korrekte Email-Adresse an.');
//alert('Bitte geben Sie eine korrekte Email-Adresse an. (Fehlercode ' + errCode + ')');
return bErr == false;
}