当前位置:主页 > 查看内容

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

发布时间:2021-07-23 00:00| 位朋友查看

简介:'================================================ '函数名:ReplaceTrim '作用:过滤掉字符中所有的tab和回车和换行 '================================================ PublicFunctionReplaceTrim(ByValstrContent) OnErrorResumeNext Dimre Setre=NewR……
'================================================
'函数名: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

原文链接:https://m.jb51.net/article/11228.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!
上一篇:ASP检查文件与目录是否存在的函数代码 下一篇:没有了

推荐图文


随机推荐