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

張貼留言

一頁式詐騙網站進階了嗎?

之前facebook常常出現一頁式購物詐騙. 難道現在已經進級變成網站式的了嗎? 無意見看到"Ray Ban網站"在大特價. 連到網站上看,還真的每款眼鏡都下殺到一折以下, 買三支還免運. 而且網站的功能似乎還很完整. 這麼好康的事,我當然不能放過 要好好研究...