asp CutStrX字符串截取函數(shù)(過濾全部HTML標記)
更新時間:2011年07月05日 15:30:51 作者:
asp CutStrX字符串截取函數(shù)(過濾全部HTML標記),比較不錯,需要的朋友可以參考下。
復制代碼 代碼如下:
Function CutStrX(ByVal Str,ByVal StrLen)
Dim l,t,c,i,r
'過濾全部HTML標記
Set r=New RegExp
r.Global=True
r.MultiLine=True
r.Pattern="(</?[A-Za-z][A-Za-z0-9]*[^>]*>)"
str=r.Replace(str," ")
Set r=Nothing
l=Len(str)
t=0
For i=1 To l
c=AscW(Mid(str,i,1))
If c<0 Or c>255 Then t=t+2 Else t=t+1
IF t>=StrLen Then
CutStrX=Left(Str,i)&"..."
Exit For
Else
CutStrX=Str
End If
Next
End Function
相關(guān)文章
ASP.NET?MVC+EntityFramework圖片頭像上傳功能實現(xiàn)
這篇文章主要介紹了ASP.NET?MVC+EntityFramework圖片頭像上傳功能實現(xiàn),本文通過實例代碼給大家介紹的非常詳細,對大家的學習或工作具有一定的參考借鑒價值,需要的朋友可以參考下2023-12-12使用AJAX實現(xiàn)UTF8編碼表單提交到GBK編碼腳本無亂碼的解決方法
這篇文章主要介紹了用AJAX實現(xiàn),多個不同編碼的項目(GBK,UTF8)互相通過 POST/GET 匯總表單數(shù)據(jù)。最終實現(xiàn) 使用同一個頁面接收 不同編碼的 表單(GBK,UTF8),特別適合 JS 采集項目,需要的朋友可以參考下2020-09-09在ASP中連接MySQL數(shù)據(jù)庫的方法,最好的通過ODBC方法
在ASP中連接MySQL數(shù)據(jù)庫的方法,最好的通過ODBC方法...2007-04-04ReplaceSaveRemoteFile 替換、保存遠程圖片 的代碼
ReplaceSaveRemoteFile 替換、保存遠程圖片 的代碼...2007-09-09