[ASP] (img src)이미지경로 추출

'============================================================================

Patt1 = "src=[\""\']([^\""\']+)"     '이미지 경로 추출 패턴

Patt2 = "[^=""/]*\.(gif|jpg|bmp)"     '이미지 파일명 추출 패턴

'============================================================================

Function getImageTags(Patrn, TestStr)

  Dim ObjRegExp

  'On Error Resume Next

  Set ObjRegExp = New RegExp

  ObjRegExp.Pattern = Patrn               ' 정규 표현식 패턴

  ObjRegExp.Global = True                 ' 문자열 전체를 검색함

  ObjRegExp.IgnoreCase = True          ' 대.소문자 구분 안함

  Set Matches = ObjRegExp.Execute(TestStr)

  RetStr = ""

  j = 0

  For Each i in Matches 'Matches 컬렉션을 반복

  if j = 1 then exit for

  RetStr = i

  j = j + 1

  Next

  getImageTags = replace(Replace(RetStr, "src=""", ""),"/","\")

  Set ObjRegExp = Nothing

End Function

 

함수는 html코드상에 이미지들중 첫번째 이미지 경로만 가져오는것임.

그냥 돌아다니는 소스이긴 하나 좀 다른 부분은 패턴1이 src경로만 찾아서 가져옴

src="부분이 남기에 리턴해서 보낼때 replace해줌