Set regEx = Nothing End Function#39说明 #39ReplaceHTMLcontent，quot\lt*？\quot，quotquot#39替换所有lt之间的内容 #39ReplaceHTMLcontent，quot\lt\！\2开始\2\*？\lt\！\2结束\2\quot，quot被替换内容quot#39替换。

DropHTML=regExReplacestr， quot$1quotEnd Function dim htmlStr， newStrhtmlStr=quotltfont color=#00ff00依然家族创始ltfontquotnewStr=DropHTMLhtmlStrResponseWritenewStr#39输出依然家族创始%。

要控制被删除的标签列表，可以通过向TAGLIST常数中添加删除标记来实现 例如，要保留所有的ltB标签，则从TAGLIST中删除B 当前的列表包含了MSDN中的所有html标签以及 LAYER 标签 每个标签要用quotquot括起来开始标签和结束标签。

#39进行匹配 Set Matches = objRegExpExecutestrHTML#39 遍历匹配集合，并替换掉匹配的项目 For Each Match in Matches strHtml=ReplacestrHTML，MatchValue，quotquotNext RemoveHTML=strHTML Set objRegExp = Nothing End F。

应该是可以过掉所有的标签的大小写已经忽略，全局已经打开，多行也打开着，看了一下你的匹配式也是正确的啊你过不掉的可能是因为中间有空间，而^表示的是不包含的所有字符怎么会过滤不掉呢？quotlt\？\w+\s+。

strOutput = objRegExpReplacestrHTML， quotquot#39是替换啊，把lt+？替换为quotquot不显示，你可以使用quot*quot看效果 strOutput = ReplacestrOutput， quotltquot， quotltquotstrOutput = ReplacestrOutput， quotquot， quotquotstripHTML = str。

Dim Str，re Str=Textstr Set re=new RegExp reIgnoreCase =True reGlobal=True rePattern=quotlt^*quotStr=reReplaceStr， quotquotSet Re=Nothing Replacehtml=Str End Function 这个是过滤脚本的，你可以无限。

用正则表达式吧，剔除掉html代码我有个vb写的 Public Function RemoveHTMLstrTextDim RegEx Set RegEx = New RegExp RegExPattern = quotlt^*quotRegExGlobal = True RemoveHTML = RegExReplacestrText， quotquotEn。

RemoveHTML = strResult End Function 不需要移除的标签可以从TAGLIST中删除 参考资料lta href=quot？id=5810htmlquot target=quot_blankquot rel=quotnofollow noopenerquot。

对于希望很好的处理这个错误信息，而不使用默认ASPNet异常报错信息的程序员们，你们不要禁用validateRequest=false正确的做法是在你当前页面添加Page_Error函数，来捕获所有页面处理过程中发生的而没有处理的异常然后给用户。

好说啊，用浏览器打开网页，然后选中所有内容CTRL+A复制打开一个记事本粘贴到记事本里，ok了什么标签都没有了。

你可以用替换的办法，源代码字符串Replacequotltpquot，quot你需要替换成的字符，如果要去掉就直接写一个双引号即可quot。

调用这个方法就可以了Function replaceWithoutPContentStrDim ClsTempLoseStr，regEx ClsTempLoseStr = CstrContentStrSet regEx = New RegExp regExPattern = quotlt\0，1^ltp*lt\0，1^lt。

dim conn dim connstr dim db db=quotdatabaseEnterPrisemdbquot #39如果在web根目录下使用的话，就用这一句#39db=quotdatabaseEnterPrisemdbquot #39如果在web根目录下面的文件夹目录使用的话，就用这一句Set conn =。

我这个不用JS ，用正则匹配，效率也是很高的，调用也很方便，我一直用到现在，希望对您也有用 ltsummary 移除HTML标签 ltsummary ltparam name=quotHTMLStrquotHTMLStrltparam publi。

下面是asp中的方法，你可以改造成net的 Function FilterHTMLstrToFilterDim strTemp strTemp = strToFilter strTemp=replacestrTemp，quotquotquot，quotquotstrTemp=replacestrTemp，quot quot，quotquotstrTemp=replacestrTemp，quot quot，quotquotstrTemp。