.asp 파일로 저장하고 실행하십시오. ASPHTTP를 사용하여 컨텐츠를 캡처 할 때 이것을 사용하는 것은 매우 흥미 롭습니다. 물론 직접 개선해야합니다.
<%
옵션 출현
functionstriphtml (strhtml)
'Stripsthehtmltagsfromstrhtml
Dimobjregexp, Stroutput
setobjregexp = newRegexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "<.+?>"
'replaceallhtmltagmatcheswiththeemptystring
Stroutput = objregexp.replace (strhtml, "")
'replaceall <and> with <and>
Stroutput = replace (Stroutput, "<", "<")
Stroutput = replace (Stroutput, ">", ">")
striphtml = stroutput'troombalueofstroutput
setobjregexp = 아무것도 없습니다
최종 기능 장애
%>
<formmethod = "post"id = form1name = form1>
<b> enteranhtmlstring : </b> <br>
<textReaname = "txthtml"cols = "50"rows = "8"wrap = "virtual"> <%= request ( "txthtml")%> </textarea>
<p>
<inputtype = "제출"value = "StripHtmlTags!"id = awfl1name = 제출 1>
</form>
<%iflen (request ( "txthtml"))> 0then%>
<P> <HR> <P>
<b> <u> viewfstring <i> withno </i> htmlstripp : </u> </b> <br>
<xmp>
<%= request ( "txthtml")%>
</xmp> <p>
<b> <u> </i> htmlstripping : </u> </b> <br>
<사전>
<%= striphtml (request ( "txthtml"))%>
</pre>
<%endif%>