以下为判断email输入是否正确的函数,应该可能满足要求。
function IsValidEmail(email)dim names, name, i, c'Check for valid syntax in an email address.IsValidEmail = true
names = Split(email, "@")
if UBound(names) <> 1 then '如果没有@符号 
   IsValidEmail = false
   exit function
end if
for each name in names
   if Len(name) <= 0 then '如果@符号的前或后没有字符
     IsValidEmail = false
     exit function
   end if
   for i = 1 to Len(name)
     c = Lcase(Mid(name, i, 1))
     if InStr("abcdefghijklmnopqrstuvwxyz_-.", c) <= 0 and not IsNumeric(c) then'如果不是字母数字或者_-.符号
       IsValidEmail = false
       exit function
     end if
   next
   if Left(name, 1) = "." or Right(name, 1) = "." then '如果后缀左边第一个字母或右边第一个是"."
      IsValidEmail = false
      exit function
   end if
next
if InStr(names(1), ".") <= 0 then '如果后缀没有.
   IsValidEmail = false
   exit function
end if
i = Len(names(1)) - InStrRev(names(1), ".")
if i <> 2 and i <> 3 then '如果后缀的主域名不是两位或三位,如.com,.net
   IsValidEmail = false
   exit function
end if
if InStr(email, "..") > 0 then '如果出现边续两个..
   IsValidEmail = false
end if

解决方案 »

  1.   

    不能用Javascript?用什么?用国语吗?呵呵
      

  2.   

    倒  楼上的,那是asp代码吧  
      

  3.   

    用jsp作验证,很不方便,因为需要服务器端验证,太慢,而Javascript是客户端验证速度,很快
    你说用户会接受那个?
      

  4.   


      我自己已经搞定了,呵呵,谢谢各位.  因为我是为日方的i-mode手机做开发,所以不能用任何脚本,呵呵,所有的任务都要置于服务器端.
      

  5.   

    用javabean呀,自己写包呀。
    其实也就是判断一个@和.号两个符号是否存在。