Function ClearHtml(Content)<br /> Content=Zxj_ReplaceHtml(&quot;&amp;#[^&gt;]*;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot; &quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content) <br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;(javascript|jscript|vbscript|vbs):&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;on(mouse|exit|error|click|key)&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;&lt;\\?xml[^&gt;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;&lt;\/?[a-z]+:[^&gt;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;, &quot;&quot;, Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> Content=Zxj_ReplaceHtml(&quot;]*&gt;&quot;,&quot;&quot;,Content)<br /> ClearHtml=Content<br /> End Function <br /> Function Zxj_ReplaceHtml(patrn, strng,content)<br /> IF IsNull(content) Then<br /> content=&quot;&quot;<br /> End IF<br /> Set regEx = New RegExp ' 建立正则表达式。<br /> regEx.Pattern = patrn ' 设置模式。<br /> regEx.IgnoreCase = true ' 设置忽略字符大小写。<br /> regEx.Global = True ' 设置全局可用性。<br /> Zxj_ReplaceHtml=regEx.Replace(content,strng) ' 执行正则匹配<br /> End Function <br /> <br /> 调用函数　ClearHtml()