function CheckForm1(e) {
var addr=e.email.value;
var man=1;    // Set to 1 if email is manditory or set to 0 if optional
var db=1;     // Set to 1 to show individual messages 0 to suppress
if (addr == '' && man) {
   if (db) alert('Please enter a valid email address.');
	e.email.focus();
   return false;
}
if (addr == '') return true;
var invalidChars = '\/\'\\ ";:?!()[]\{\}^|';
for (i=0; i<invalidChars.length; i++) {
   if (addr.indexOf(invalidChars.charAt(i),0) > -1) {
      if (db) alert('Email address contains invalid characters.');
		e.email.focus();
      return false;
   }
}
for (i=0; i<addr.length; i++) {
   if (addr.charCodeAt(i)>127) {
      if (db) alert("Email address contains non ascii characters.");
		e.email.focus();
      return false;
   }
}

var atPos = addr.indexOf('@',0);
if (atPos == -1) {
   if (db) alert('Email address must contain an @');
		e.email.focus();
   return false;
}
if (atPos == 0) {
   if (db) alert('Email address must not start with @');
		e.email.focus();
   return false;
}
if (addr.indexOf('@', atPos + 1) > - 1) {
   if (db) alert('Email address must contain only one @');
		e.email.focus();
   return false;
}
if (addr.indexOf('.', atPos) == -1) {
   if (db) alert('Email address must contain a period in the domain name');
		e.email.focus();
   return false;
}
if (addr.indexOf('@.',0) != -1) {
   if (db) alert('Period must not immediately follow @ in email address');
		e.email.focus();
   return false;
}
if (addr.indexOf('.@',0) != -1){
   if (db) alert('Period must not immediately precede @ in email address');
		e.email.focus();
   return false;
}
if (addr.indexOf('..',0) != -1) {
   if (db) alert('Two periods must not be adjacent in email address');
		e.email.focus();
   return false;
}
var suffix = addr.substring(addr.lastIndexOf('.')+1);
if (suffix.length < 2) {
   if (db) alert('Invalid domain in the email address');
		e.email.focus();
   return false;
}
return true;
}

