아래 함수를 이용하시면 됩니다..
Function RemoveHTML( strText ) dim contTmp set tagfree = New Regexp tagfree.Pattern= "<[^>]+>" tagfree.Global=true strText=tagfree.Replace(strText,"") RemoveHTML= strText End Function
참고 Url : http://h5bak.tistory.com/147
아래 함수를 이용하시면 됩니다..
Function RemoveHTML( strText ) dim contTmp set tagfree = New Regexp tagfree.Pattern= "<[^>]+>" tagfree.Global=true strText=tagfree.Replace(strText,"") RemoveHTML= strText End Function
참고 Url : http://h5bak.tistory.com/147