[asp]정규식 패턴, regexp

asp가 오래되었지만 이러한 정규식도 있고 좋네요!

 

'정규식 패턴
 pattern = "[^-가-힣a-zA-Z0-9_\s/]"
   flag = Word_check(fileStr,pattern)

Function Word_check(str,patrn)
 Dim regEx, match, matches
 SET regEx = New RegExp
 regEx.Pattern = patrn            ' 패턴을 설정합니다.
 regEx.IgnoreCase = True            ' 대/소문자를 구분하지 않도록 합니다.
 regEx.Global = True         ' 전체 문자열을 검색하도록 설정합니다.
 SET Matches = regEx.Execute(str)
 if 0 < Matches.count then
  Word_check = true
 Else
  Word_check = false
 end if
End Function