繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
- ASP
- ASP实用大全-ASP服务器组件(4)
- ASP实用大全-ASP服务器组件(5)
- ASP实用大全-ASP服务器组件(6)
- ASP实用大全-ASP服务器组件(7)
- ASP 3.0高级编程（一）
- ASP 3.0高级编程（二）
- ASP 3.0高级编程（三）
- ASP 3.0高级编程（四）
- ASP 3.0高级编程（五）
- ASP 3.0高级编程（六）
- Asp Object 之:AddHeader
- Asp Object 之:AppendToLog
- Asp Object 之:BinaryRead
- Asp Object 之:BinaryWrite
- Asp Object 之:Buffer
- Asp Object 之:CacheControl
- Asp Object 之:Charset
- Asp Object 之:Clear
- Asp Object 之:ClientCertificate
- Asp Object 之:ContentType
ASP 中的 ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 256 ::
收藏到网摘: 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
评论 (0) All
