• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    asp 使用正则表达式替换word中的标签,转为纯文本
    公司客户在使用网站后台编辑添加修改内容时,经常是直接从word文档里复制内容到编辑器里后就提交。结果是在内容显示页面上是五花八门的样式,有时也需要部分纯文本内容作为摘录使用,这些都需要清除word格式。改变客户的习惯要客户先复制到记事本里再粘贴到编辑器里编辑是很难的,所以从我们自己改变起。从网上百度了若干清除word格式的正则,使用效果不甚理想,所以自己写了清除word格式的asp函数,能满足我们自己的使用需求。函数如下:
    复制代码 代码如下:

    function cleanWord(html)
    dim regEx
    set regEx=New RegExp
    regEx.IgnoreCase=True
    regEx.Global=True
    regEx.Pattern="[^>]*>" '清除所有>之间的内容
    html = regEx.replace(html,"" )
    regEx.Pattern="{[^}]*}" '清除所有{}之间的内容
    html = regEx.replace(html,"" )
    regEx.Pattern="/[^/]*/" '清除所有/**/之间的注释
    html = regEx.replace(html,"" )
    html =Replace(html,"table.MsoNormalTable","") '替换掉漏网的单词
    cleanWord= html
    set regEx=nothing
    end function
    您可能感兴趣的文章:
    • js中使用正则表达式查找字母和数字的方法
    • 在VS2008中使用正则表达式进行查找和替换
    • JAVA中正则表达式匹配,替换,查找,切割的方法
    • Django查找网站项目根目录和对正则表达式的支持
    • Python使用正则表达式实现文本替换的方法
    • Java基于正则表达式实现的替换匹配文本功能【经典实例】
    • Python 实用技巧之正则表达式查找和替换文本的操作方法
    上一篇:一段ASP单页显示文件夹下所有图片的代码
    下一篇:实现UTF8转换GB2312国标码的asp代码
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    asp 使用正则表达式替换word中的标签,转为纯文本 asp,使用,正则,表达式,替换,