<!--
  //////////////////////////////////////////////////////////////////////////////
  //''' Filename : chkmail.js
  //''' 說明     : 檢查傳入之字串是否為合法的 e-mail address
  //''' return value:
  //'''       若傳回"NULL"  : 表示傳入值為 empty or NULL or len(trim()) = 0
  //'''       若傳回"WRONG" : 表示是不正確的E-mail address
  //'''       若傳回"CHINESE" : 表示有中文字串的E-mail address
  //'''       若傳回"OK"    : 表示為合法的E-mail address
  //'''       使用範例      : a = chkemail_fCheckEMailAddr("dino@anjes.com.tw")              
  //''' Author : Smith Chen
  //''' Created Date : 2000/07/07
  //''' Last Modified Date : 2001/11/14 Carolyn
  //////////////////////////////////////////////////////////////////////////////

function chkemail_fCheckEMailAddr(a_MailAddr)
{
  var l_x;
   
  if ((a_MailAddr == "") || (a_MailAddr == null)) {
    return("NULL");
  }else if (a_MailAddr.replace(" ","").length == 0) {
    return("NULL");
  }else if ((a_MailAddr.charAt(0) == "@") || (a_MailAddr.substring(a_MailAddr.length-1,a_MailAddr.length) == ".") ||
     (a_MailAddr.indexOf("@") == -1) || (a_MailAddr.indexOf(".") == -1) ||
     (a_MailAddr.indexOf(",") != -1) || (a_MailAddr.indexOf("<") != -1) ||
     (a_MailAddr.indexOf(">") != -1) || (a_MailAddr.indexOf("@.") != -1) ||
     (a_MailAddr.indexOf("..") != -1)) {  
    return("WRONG");
  }else if ((a_MailAddr.indexOf(".bbs@") != -1) || (a_MailAddr.indexOf("@bbs.") != -1)) {
    return("BBS"); 
  }else{
    return("OK"); 
  }
}

//-->