

<!--
function CheckEmailForm(fmInput, sLabel)
{
   var isError  = 0;
   var sWhite   = " \t\n\r";
   var sInput = TrimLeftRight(fmInput.value);
   if (!IsValidElement(sInput.substring(0, sInput.indexOf("@")), "") || !IsValidElement(sInput.substring(sInput.indexOf("@")+1, sInput.length), "domain"))
   {
      isError = 1;
      sErrorList += "<LI>Enter an " + sLabel + 
                    " Address, such as \"bill@yahoo.com.\"";
      if( !fmFirstError ) 
         fmFirstError = fmInput;
   }
   return isError;
}
function CheckEmailForm(fmInput, sLabel, isReq)
{
   var isError  = 0;
   var sWhite   = " \t\n\r";
   var sInput = TrimLeftRight(fmInput.value);
   if ((!IsValidElement(sInput.substring(0, sInput.indexOf("@")), "") || !IsValidElement(sInput.substring(sInput.indexOf("@")+1, sInput.length), "domain")) && isReq == true)
   {
      isError = 1;
      sErrorList += "<LI>Enter an " + sLabel + 
                    " Address, such as \"xyz@yahoo.com.\"";
      if( !fmFirstError ) 
         fmFirstError = fmInput;
   }
   return isError;
}
function IsValidElement(sElement, flag) {
   var k = 0;
   var ch = "";
   if (sElement.length < 1) 	return 0;
   if ((flag == "domain") && (sElement.indexOf(".") == -1)) return 0;
   while(IsValidChar(ch = sElement.charAt(k)) && k < sElement.length )
   {
	k++;
   }
   if (k < sElement.length) 	return 0;
   return 1;
}
function IsValidChar(c)
{
   return( IsLetter(c) || IsDigit(c) || IsValidSymbol(c) ); 
}
function IsValidSymbol(c) 
{
   return( (c == "!") || (c >= "#" && c <= "'") || (c >= "*" && c <= "+") || (c >= "-" && c <= "/") || (c == "~") || (c == "_") ); 
}
function IsLetter(c) 
{
   return( (c >= "a" && c <= "z") || (c >= "A" && c <= "Z") ); 
}
function IsDigit(c) 
{
   return( c >= "0" && c <= "9" ); 
}
function IsWordChar(c) 
{
   return( IsLetter(c) || IsDigit(c) || c == "_" || c == "-" ); 
}
function TrimLeftRight(sIn) 
{ 
   var sWhite = " \t\n\r";
   var sTrim  = "";
   var ch     = "";
   var k      = 0;
   while( sWhite.indexOf(ch = sIn.charAt(k)) >= 0 && k < sIn.length ) 
   {
      k++;
   }
   if( sIn.length > 0 ) 
   {
      sTrim = sIn.substring(k, sIn.length);
      if( sTrim.length > 0 ) 
      {
         k = sTrim.length - 1;
         while( sWhite.indexOf(ch = sTrim.charAt(k)) >= 0 && k >= 0 ) 
         {
            k--;
         }
         sTrim = sTrim.substring(0, k+1);   
     }
   }
   return sTrim;
}
// done hiding -->