利用正则表达式去掉字符串中所有html内容,得到所有文本内容，去掉的内容有：div,img,超连接，script脚本等html内容。将以下例子保存为asp文件，运行一下就知道效果了。
<% Function RemoveHTML( strText ) Dim RegEx Set RegEx = New RegExp RegEx.Pattern = "<[^>]*>" RegEx.Global = True RemoveHTML = RegEx.Replace(strText, "") End Function str="<html><body><a href=""a.asp"">打开</a><img src=""1.jpg""><div class=""a3"">aaa</div></body></html>" response.write removehtml(str) %> |