本文主要为广大网友提供“ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码”,希望对需要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