ASP 대소문자 구분 없이 변환(Replace)

ASP의 함수 replace를 할 경우 대소문자를 구분한다.
대소문자 구분없이 변환을 원할 경우 아래와 같이 사용자 정의 함수를 사용하자

Function MyReplace(ByRef sourceText, ByVal findText, ByVal replaceText) 
     Dim obj
     Set obj = New RegExp
     obj.Pattern = findText        '패턴 설정 
     obj.IgnoreCase = True      '대소문자 구분 여부 
     obj.Global = True             '전체 문서에서 검색 
     MyReplace = obj.Replace(sourceText, replaceText)
End Function