|
|
|
|
 |
|
itsmee / 2002-03-13 / 오후 6:15:04 / 61.72.200.150
조회수 : 147
|
| [질문] 태그 벗겨내기..
|
Function stripHTML(strHTML)
Dim objRegExp, strOutput
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<.+?>"
strOutput = objRegExp.Replace(strHTML, "")
strOutput = Replace(strOutput, "<", "<")
strOutput = Replace(strOutput, ">", ">")
stripHTML = strOutput
Set objRegExp = Nothing
End Function
태그 벗겨내기 가능하네여..ㅡㅡ;; |
|
|
