////////////////////////////////////////////////////////////////////
//功能：判断EMAIL是否合法
//输入：从窗体取得的EMAIL值
//输出：如果EMAIL值符合email格式,那么返回“真”，程序继续执行，否则返回“假”，程序不能继续下去！
//                                                                         王雄      2000-8-23  11:41:00
////////////////////////////////////////////////////////////////////////////////////////////////
function isEmail (s)
{

   var blank=" "
   if(s.indexOf(blank)>=0)
     {
       alert("email地址中不能有空格！");
       return false;
     }
   var i = 1;
   var len = s.length;

	if (len > 30)
	{
		alert("email地址长度不能超过30位!");
		return false;
	}
	
	pos1 = s.indexOf("@");
	pos2 = s.indexOf(".");
	pos3 = s.lastIndexOf("@");
	pos4 = s.lastIndexOf(".");
	//check '@' and '.' is not first or last character
	if ((pos1 <= 0)||(pos1 == len)||(pos2 <= 0)||(pos2 == len))  
	{
		alert("请输入有效的E-mail地址！");
		return false;
	}
	else
	{
		//check @. or .@
		if( (pos1 == pos2 - 1) || (pos1 == pos2 + 1) 
		  || ( pos1 != pos3 )  //find two @
		  || ( pos4 < pos3 ) ) //. should behind the '@'  		
		{
			alert("请输入有效的E-mail地址！");
			return false;
		}
	}
   
    var bag="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789.-_@" 
    for (i = 0; i < len; i++)
    {   
      var c = s.charAt(i);
      if (bag.indexOf(c) == -1) 
         {
          alert("email地址中只能包含字符ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789.-_@\n" + "请重新输入" );
          return false;
         }
    }
    
	return true;
}