asp 使用正则表达式替换word中的标签,转为纯文本
来源:asp之家 时间:2011-02-28 10:49:00
公司客户在使用网站后台编辑添加修改内容时,经常是直接从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
标签:asp,正则表达式,word标签
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
关于Ajax在浏览器中产生前进后退的实现方法
2010-01-29 13:01:00
ASP使用xmlhttp定时触发事件
2008-08-19 18:09:00
将ASP纪录集输出成n列表格的方法
2008-03-19 13:27:00
asp下以Json获取中国天气网天气的代码
2011-03-06 11:01:00
记一次成功的sql注入入侵检测附带sql性能优化
2011-09-30 11:29:39
base href 使用方法详解
2008-05-18 13:27:00
20年来我得到的20条编程经验
2010-05-26 13:44:00
IE中伪类:hover的使用及BUG
2007-05-11 17:04:00
SQL Server 2005日志文件损坏的处理方法
2008-12-02 14:36:00
HTML语言将加入硬件操作功能
2009-12-16 19:19:00
![](https://img.aspxhome.com/file/UploadPic/200912/16/01-55s.jpg)
js实现一个日期联动下拉菜单
2007-08-04 20:49:00
Access数据库下如何使用通用对话框的问题
2008-11-28 16:37:00
交互设计师应该具备哪些素质
2009-03-12 12:21:00
浅析CMS生成静态页面的两种方案
2008-03-17 12:51:00
教你快速掌握一些方便易用的SQL语句
2008-11-28 15:21:00
CSS布局之浮动(一)两列布局
2008-08-18 21:24:00
谷歌历年母亲节Logo一览
2009-05-11 12:17:00
![](https://img.aspxhome.com/file/UploadPic/20095/11/goog_md_aus-19s.jpg)
轻松在线制作各种Logo标志
2008-05-26 12:54:00
![](https://img.aspxhome.com/file/UploadPic/20085/26/20085261329597s.jpg)
WinHTTP Services 5.1 参考资料
2010-03-27 20:49:00
mysql rand(x)生产重复随机序列
2010-12-03 16:01:00