关于文本编译

<span id="xx"><size=4> <face=楷体_gb2312> <b> <size=2> 测试 </size> </b> <i> 测试 </i> <u> 测试 </u> </face> </size></span>
<script language="javascript">
var xstr=xx.innertext
xx.innertext=xstr
</script>

<%
function striphtml（strhtml)
'strips the html tags from strhtml

dim objregexp, stroutput
set objregexp = new regexp

objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "<.+?>"

'replace all html tag matches with the empty string
stroutput = objregexp.replace（strhtml, "")

'replace all < and > with < and >
stroutput = replace（stroutput, "<", "<")
stroutput = replace（stroutput, ">", ">")

striphtml = stroutput 'return the value of stroutput

set objregexp = nothing
end function