ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
摘要:'================================================'函数名:ReplaceTrim'作用:过...
'================================================
'函数名:ReplaceTrim
'作用:过滤掉字符中所有的tab和回车和换行
'================================================
PublicFunctionReplaceTrim(ByValstrContent)
OnErrorResumeNext
Dimre
Setre=NewRegExp
re.IgnoreCase=True
re.Global=True
re.Pattern="("&Chr(8)&"|"&Chr(9)&"|"&Chr(10)&"|"&Chr(13)&")"
strContent=re.Replace(strContent,vbNullString)
Setre=Nothing
ReplaceTrim=strContent
ExitFunction
EndFunction
【ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码】相关文章: