본문 바로가기
개발자 커뮤니티에 오신 것을 환영합니다!

vb6.0/vba [vb6.0/vba] HTML 테그를 한방에 정리(함수)

페이지 정보

profile_image
작성자 하나를하더라도최선을
댓글 0건 조회 25,611회 작성일 19-10-29 01:53

본문

Public Function HTMLDEL(ByRef T As StringAs String
    Dim regEx As Object
'    Set regEx = New RegExp
    Set regEx = CreateObject("vbscript.regexp")
 
    regEx.Pattern = "<[^>]+>"  '--- html tag match를 위한 정규식
    regEx.IgnoreCase = True
    regEx.Global = True
    HTMLDEL = regEx.Replace$(T, "")
End Function 

댓글목록

등록된 댓글이 없습니다.


Copyright © program1472 | IT HUB. All rights reserved.