Vbscript - 텍스트 파일에서 IP 주소 형식 찾기

다음 스크립트는, 텍스트 문서에서 IP 주소 형식을 찾아내는 스크립트 입니다. 정규편식을 이용한 방법이구요..^^

Const ForReading = 1

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Scripts\Test.txt", ForReading)

strSearchString = objFile.ReadAll

objFile.Close

Set objRegEx = CreateObject("VBScript.RegExp")

objRegEx.Global = True  
objRegEx.Pattern = "\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}"

Set colMatches = objRegEx.Execute(strSearchString) 

If colMatches.Count > 0 Then
    For Each strMatch in colMatches  
       Wscript.Echo strMatch.Value
    Next
End If

Introduction to Regular Expressions :
http://msdn2.microsoft.com/en-us/library/6wzad2b2.aspx