VBScript中使用正則表達式(RegExp)
'檢查字串是否為英文與數字所組成的
function IsEngNum(strChk)
dim objRe
set objRe = New RegExp
'設定正則式
objRe.Pattern = "^[A-Za-z0-9]+$"
'如果符合就傳回true , 不符合就傳回false
IsEngNum = objRe.Test(strChk)
set objRE = nothing
end function
update : 2006/12/15
感謝"循獻"訂正!