2004-09-01

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

張貼留言

Google以後可以查祖譜嗎?

今天看到一篇INDISE的文章 : 比爾蓋茲和賈伯斯,他們的孩子都是 14 歲才能用手機 想說比爾蓋茲不是有點年紀了嗎? 他的小孩應該也都不小了. 他們14歲時應該還沒有甚麼智慧手機吧… 說不定還是在BB call的年代. 所以就好奇的用google查一下有沒...