asp中使用regular expression

 Dim RegEx
 Set RegEx = New regexp
 RegEx.Pattern = "[0-9]"
 RegEx.Global = True
 RegEx.IgnoreCase = True
     if  RegEx.Test(pass1) = FALSE then
         errmsg = errmsg & "<li>您設定的密碼必包含數字!</li>"
     end if    
    
Set RegEx = New regexp
RegEx.Pattern = "[a-z]"
RegEx.Global = True
RegEx.IgnoreCase = True
     if RegEx.Test(pass1) = FALSE then
        errmsg = errmsg & "<li>您設定的密碼必包含英文母!</li>"
     end if
Set RegEx = NOTHING