当前位置: 首页 > 图文教程 > 网络编程 > ASP > ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码

ASP
获取字符中中文首字字符
系统分配随机密码
MusicGet 类
数据库记录的删除,delete好还是update好?
asp提高首页性能的一个技巧
研究动网得到的一些动网参数
在ASP中连接MySQL数据库,最好的通过ODBC方法
FSO文件对象介绍及常用函数
分享一段代码show.asp?id=26变成show/?26的形式
ASP+XML留言板介绍
忠网广告 系统 用到的几个函数
asp读取xml文件
把无限级分类生成数组
用ASP+FSO生成JS文件
ASP动态生成的javascript表单验证代码
在asp中通过getrows实现数据库记录分页的一段代码
asp错误的几种处理方式
asp数组使用(2)
asp中 select top 问题!~
批量复制数据

ASP 中的 ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 68 ::
收藏到网摘: n/a

'================================================
'函数名:ReplaceTrim
'作 用:过滤掉字符中所有的tab和回车和换行
'================================================
Public Function ReplaceTrim(ByVal strContent)
On Error Resume Next
Dim re
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "(" & Chr(8) & "|" & Chr(9) & "|" & Chr(10) & "|" & Chr(13) & ")"
strContent = re.Replace(strContent, vbNullString)
Set re = Nothing
ReplaceTrim = strContent
Exit Function
End Function