[vbscript] VBScript 기능이 외국 문자를 제거합니다.

정규 표현식 은 외국 문자를 피하면서 이러한 문자열을 멋지게 정리할 수 있습니다.

보다 구체적으로이 기능은 다음과 같습니다.

Function strClean (strtoclean)
    Dim objRegExp, outputStr
        Set objRegExp = New Regexp
        
            objRegExp.IgnoreCase = True
                objRegExp.Global = True
                    objRegExp.Pattern = "[(?*"",\\<>&#~%{}+_.@:\/!;]+"
                        outputStr = objRegExp.Replace(strtoclean, "-")
                        
                            objRegExp.Pattern = "\-+"
                                outputStr = objRegExp.Replace(outputStr, "-")
                                
                                    strClean = outputStr
                                    End Function
                                    

출처
https://stackoverflow.com/questions/22080010