// Email Validation Javascript
// copyright 23rd March 2003, by Stephen Chapman, Felgall Pty Ltd

function validateEmail(addr,man,db) {
if (addr == '' && man) {
   if (db) alert('E-POSTADRESS är obligatorisk');
   return false;
}
var invalidChars = '\/\'\\ ";:?!()[]\{\}^|';
for (i=0; i<invalidChars.length; i++) {
   if (addr.indexOf(invalidChars.charAt(i),0) > -1) {
      if (db) alert('E-POSTADRESS innehåller ogiltiga tecken');
      return false;
   }
}
for (i=0; i<addr.length; i++) {
   if (addr.charCodeAt(i)>127) {
      if (db) alert("E-POSTADRESS innehåller ogiltiga* tecken. *EJ ASCII");
      return false;
   }
}

var atPos = addr.indexOf('@',0);
if (atPos == -1) {
   if (db) alert('E-POSTADRESS måste innehålla ett @');
   return false;
}
if (atPos == 0) {
   if (db) alert('E-POSTADRESS kan inte börja med @');
   return false;
}
if (addr.indexOf('@', atPos + 1) > - 1) {
   if (db) alert('E-POSTADRESS kan bara ha ett @');
   return false;
}
if (addr.indexOf('.', atPos) == -1) {
   if (db) alert('E-POSTADRESS måste ha en punkt i domännamnet');
   return false;
}
if (addr.indexOf('@.',0) != -1) {
   if (db) alert('Punkt kan inte komma direkt efter @ i E-POSTADRESS');
   return false;
}
if (addr.indexOf('.@',0) != -1){
   if (db) alert('Punkt kan inte komma direkt före @ i E-POSTADRESS');
   return false;
}
if (addr.indexOf('..',0) != -1) {
   if (db) alert('2 punkter kan inte följa varandra i E-POSTADRESS');
   return false;
}
var suffix = addr.substring(addr.lastIndexOf('.')+1);
if (suffix.length != 2 && suffix != 'com' && suffix != 'net' && suffix != 'org' && suffix != 'edu' && suffix != 'int' && suffix != 'mil' && suffix != 'gov' & suffix != 'arpa' && suffix != 'biz' && suffix != 'aero' && suffix != 'name' && suffix != 'coop' && suffix != 'info' && suffix != 'pro' && suffix != 'museum') {
   if (db) alert('Ogiltig huvuddomän i E-POSTADRESS');
   return false;
}
return true;
}