用正则表达式写的HTML分离函数

封侯拜相V

封侯拜相V

2016-01-29 18:24

用正则表达式写的HTML分离函数,用正则表达式写的HTML分离函数
  存成.asp文件,执行,你用ASPHTTP抓内容的时候用这个很爽,当然自己要改进一下了

<%
Option Explicit

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 &lt; and &gt;
  strOutput = Replace(strOutput, "<", "&lt;")
  strOutput = Replace(strOutput, "", "&gt;")
  
  stripHTML = strOutput    'Return the value of strOutput

  Set objRegExp = Nothing
End Function


%

<form method="post" id=form1 name=form1
  <bEnter an HTML String:</b<br
  <textarea name="txtHTML" cols="50" rows="8" wrap="virtual"<%=Request("txtHTML")%</textarea
  <p
  <input type="submit" value="Strip HTML Tags!" id=submit1 name=submit1
</form

<% if Len(Request("txtHTML")) 0 then %
    <p<hr<p
    <b<uView of string <iwith no</i HTML stripping:</u</b<br
    <xmp
    <%=Request("txtHTML")%
    </xmp<p
    <b<uView of string <iwith</i HTML stripping:</u</b<br
    <pre
    <%=StripHTML(Request("txtHTML"))%
    </pre
<% End If %

 
展开更多 50%)
分享

猜你喜欢

用正则表达式写的HTML分离函数

ASP
用正则表达式写的HTML分离函数

好东西老外用正则表达式写的HTML分离函数

Web开发
好东西老外用正则表达式写的HTML分离函数

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

用正则表达式过滤html代码

Web开发
用正则表达式过滤html代码

java正则表达式验证函数

Web开发
java正则表达式验证函数

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

正则表达式

Web开发
正则表达式

正则表达式口诀 正则表达式学习工具

Web开发
正则表达式口诀 正则表达式学习工具

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

session变量中的数组如何引用

session变量中的数组如何引用

一种理论上最快的Web数据库分页方法

一种理论上最快的Web数据库分页方法
下拉加载更多内容 ↓