check_email_num.js

ASP程序实现的科技期刊系统

<!--
function isnumeric(VP) 
{ 
  p=VP.value
 if (p == "") 
 {
  alert("内容不能为空！");
  VP.focus();
  return false; 
  }
 var l = p.length; 
 var count=0; 
 for(var i=0; i<l; i++) 
 { 
  var digit = p.charAt(i); 
  if(digit == "." ) 
 { 
    ++count; 
    if(count>1) 
	{
	  alert("数据格式不对！");
	  VP.focus();
	return false; 
	}
   } 
  else if(digit < "0" || digit > "9") 
  	{
	  alert("数据格式不对！");
	  VP.focus();
  return false; 
	  }
 } 
 return true; 
} 

function isEmail(vEmail) 
{ 
  var email=vEmail.value; 
 // valid format "[e-mail]" 
 invalidChars = " /;,:{}[]|*%$#!()`<>?"; 
if (email == "") 
    { 
  alert('电子邮件不能为空！')
  vEmail.focus();
  return false; 
    } 
for (i=0; i< invalidChars.length; i++) 
    { 
  badChar = invalidChars.charAt(i) 
  if (email.indexOf(badChar,0) > -1) 
         { 
  alert('电子邮件输入不正确,出现特殊字符！如：/;,:{}[]|*%$#!()`<>?')
    vEmail.focus();
   return false; 
         } 
    } 
atPos = email.indexOf("@",1) 
 // there must be one "@" symbol 
if (atPos == -1) 
    { 
   alert('电子邮件输入不正确,无@,正确格式如：[e-mail]，请重新输入！')
  vEmail.focus();
  return false; 
    } 
if (email.indexOf("@", atPos+1) != -1) 
 { 
 // and only one "@" symbol 
  return false; 
 } 
 periodPos = email.indexOf(".",atPos) 
if(periodPos == -1) 
     { 
 // and at least one "." after the "@" 
   alert('电子邮件输入不正确,无.,正确格式如：[e-mail]，请重新输入！')
  vEmail.focus();
  return false; 
     } 
if ( atPos +2 > periodPos) 
 // and at least one character between "@" and "." 
 { 
    alert('电子邮件输入不正确,正确格式如：[e-mail]，请重新输入！')
  vEmail.focus();
  return false; 
 } 
 if ( periodPos +3 > email.length) 
 { 
    alert('电子邮件输入不正确,正确格式如：[e-mail]，请重新输入！')
  vEmail.focus();
  return false; 
 } 
 return true; 
} 
-->