Speichern Sie es als .asp -Datei und führen Sie es aus. Es ist sehr aufregend, dies zu verwenden, wenn Sie ASPHTTP verwenden, um Inhalte zu erfassen. Natürlich müssen Sie es selbst verbessern.
<%
OptionExPlicit
Funktionsstreiphtml (strhtml)
'StriptheHtmltagsfromstrhtml
Dimobjregexp, Stroutput
SetObjregexp = newregexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "<.+?>"
'ErsatzlhtmltAgMatchesWithTheEmptyString
stroutput = objregexp.replace (strhtml, "")
'Ersetzen Sie <und> durch <und>
stroutput = ersetzen (stroutput, "<", "<")
stroutput = ersetzen (stroutput, ">", ">")
StripHtml = Stroutput'ReturnThevalueOfStroutput
SetObjregexp = nichts
Endfunktion
%>
<formMethod = "post" id = Form1Name = Form1>
<b> EnteranHtmlString: </b> <br>
<textareaname = "txthtml" cols = "50" rows = "8" Wrap = "virtual"> <%= request ("txthtml")%> </textArea>
<p>
<inputType = "subieren" value = "striphtmltags!" id = suble1Name = subjekt>
</form>
<%iflen (Anfrage ("txthtml"))> 0Then%>
<p> <hr> <p>
<b> <u> viewofString <i> Withno </i> htmlstripPing: </u> </b> <br>
<xmp>
<%= Request ("txthtml")%>
</xmp> <p>
<b> <u> viewofstring <i> mit </i> htmlstripPing: </u> </b> <br>
<pre>
<%= StripHtml (Request ("Txthtml")%>
</pre>
<%Endif%>