js 与vbs 判断email的比较

Function chkemail(strEmailAddr)
    Dim re
    Set re = new RegExp
    re.IgnoreCase = false
    re.global = false
    re.pattern = "[/w/-/.]+[@]([/w/-]+[.]){1,2}(/w){2,3}"
    chkemail = re.Test(strEmailAddr)
 set re=nothing
End function

function checkform(){
if(document.form2.email.value!=""){
              var email1 = document.form2.email.value;
              var pattern = /^([a-zA-Z0-9_-])+@([a-zA-Z0-9_-])+(/.[a-zA-Z0-9_-])+/;
              flag = pattern.test(email1);
              if(!flag){
              alert("邮件地址格式不对!");
     document.form2.email.focus();
           return false;}
  }
}