ReplaceTrim 函數(shù)之a(chǎn)sp實(shí)現(xiàn)過(guò)濾掉字符中所有的tab和回車(chē)和換行的代碼
更新時(shí)間：2007年09月01日 22:09:45 作者：
'================================================
'函數(shù)名：ReplaceTrim
'作 用：過(guò)濾掉字符中所有的tab和回車(chē)和換行
'================================================
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
'函數(shù)名：ReplaceTrim
'作 用：過(guò)濾掉字符中所有的tab和回車(chē)和換行
'================================================
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
相關(guān)文章
web文件管理器的后續(xù)開(kāi)發(fā)...2007-03-03
新增加一個(gè)防垃圾評(píng)論的asp代碼，鄙視垃圾
最近開(kāi)通了，可以發(fā)表評(píng)論就一直被垃圾評(píng)論和留言困擾，一直沒(méi)有找到很好的解決辦法。今天發(fā)現(xiàn)了這個(gè)可以防止垃圾評(píng)論的asp代碼,特提供給大家，希望大家能擺脫2007-12-12
簡(jiǎn)單的ASP統(tǒng)計(jì)制作實(shí)例
一個(gè)能對(duì)訪問(wèn)者進(jìn)行編號(hào)、記錄訪問(wèn)次數(shù)、IP、時(shí)間的統(tǒng)計(jì)制作實(shí)例，需要的朋友可以參考下2015-09-09
有時(shí)候傳遞中文會(huì)出現(xiàn)亂碼等原因，最好對(duì)中文參數(shù)進(jìn)行編碼處理。2011-02-02
解決ASP中http狀態(tài)跳轉(zhuǎn)返回錯(cuò)誤頁(yè)的問(wèn)題
這篇文章主要介紹了ASP中http狀態(tài)跳轉(zhuǎn)返回錯(cuò)誤頁(yè)的問(wèn)題的解決方法，感興趣的小伙伴們可以參考一下2015-10-10
日期轉(zhuǎn)換星座函數(shù),參數(shù)是日期型的，需要的朋友可以參考下。2010-04-04
一直以來(lái)都很頭疼Asp里面的多行或者多列循環(huán) 今天算是有收獲了以下代碼貼出來(lái)為自己留念一下2008-07-07
asp操作access提示無(wú)法從指定的數(shù)據(jù)表中刪除原因分析及解決
asp操作access時(shí)提示無(wú)法從指定的數(shù)據(jù)表中刪除這個(gè)問(wèn)題相當(dāng)?shù)募?，于是搜索整理了一些?shí)用的解決方法，感興趣的你可以參考下本文2013-03-03
2008-02-02
本人常用的asp代碼...2006-08-08