当前位置:编程学习 > asp >>

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

答案:'================================================
'函数名: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

上一个:CheckFile函数之asp实现检查某一文件是否存在的代码
下一个:asp之GetArray提取链接地址,以$Array$分隔的代码

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,