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

产品分类

全国咨询热线:
18351553618

产品展示More+

走进安达利坚More+

盐城安达利坚机械设备有限公司

<%set rs=server.CreateObject("adodb.recordset") rs.Open "select * from system_text_info where sort_name_id=348 and pass=1 order by id desc",conn,1,1 response.Write trim(left(ClearHtml(rs("info")),300)&"....") rs.Close set rs=nothing %>
查看详情+

荣誉资质More+

常见新闻More+

    <% set rs=server.CreateObject("adodb.recordset") sql="select top 5 * from system_text_info where sort_name_id=345 and pass=1 order by id desc" rs.open sql,conn,1,1 %> <% do while not rs.eof %>
  • "><%=left(rs("title"),20) %>
    <%= left(ClearHtml(rs("info")),80) %>...
  • <% rs.movenext loop rs.close set rs=nothing %>

行业新闻More+

<% set rs=server.CreateObject("adodb.recordset") sql="select top 5 * from system_text_info where sort_name_id=415 and pass=1 order by id desc" rs.open sql,conn,1,1 %> <% do while not rs.eof %>
"><%=left(rs("title"),23) %>
<% rs.movenext loop rs.close set rs=nothing %>

最新动态More+

<% set rs=server.CreateObject("adodb.recordset") sql="select top 5 * from system_text_info where sort_name_id=416 and pass=1 order by id desc" rs.open sql,conn,1,1 %> <% do while not rs.eof %>
"><%=left(rs("title"),23) %>
<% rs.movenext loop rs.close set rs=nothing %>