asp從字符串里截取N個帶HTML的字符的函數(shù)
'函數(shù)名:getHTMLContent'參數(shù):NO-->要取得的字符數(shù), txtContent-->要處理的字符串
'功能: 從字符串里截取N個帶HTML的字符,現(xiàn)在的實現(xiàn)方法還不完善,過程是:從字符串里找各種控件的開始,然后依些分開,放到數(shù)組里,然后一個一個數(shù)組的加上來看看字符是否大于給定的字符如果是,那么,返回這個數(shù)組.
'作者:柳永法
'時間:2007-6-1 20:03 :)
Function getHTMLContent(NO, txtContent)
If Len(txtContent)<= NO Then
getHTMLContent = txtContent
ExitFunction
EndIf
Set re =New RegExp
re.IgnoreCase =True
re.Global =True
patrn ="<p|<br|<li|<table"
patrn = Split(patrn,"|")
ForEach p in patrn
re.Pattern = p
txtContent = re.Replace(txtContent,"||"& p )
Next
txtContent = Split(txtContent,"||")
ForEach E in txtContent
If Len(s)>NO ThenExitFor
s = s + E
Next
getHTMLContent = s
EndFunction
%>
相關(guān)文章
kesion科訊V4.0管理員Key工具...2007-08-08
這篇文章主要介紹了ASP中限制某些字符留言評論,原理就是通過instr函數(shù)查找。感覺很簡單，寫起來還是有點(diǎn)手生，感覺阿會南2014-07-07
ASP基礎(chǔ)入門第九篇（Global.asa文件的使用）
這篇文章主要介紹了Global.asa文件的使用，是一個可選文件，每個應(yīng)用程序只能有一個 Global.asa 文件，需要了解的朋友可以參考下2015-10-10
很多朋友對于asp的換行的實現(xiàn)，不是很懂，不懂什么情況下該使用什么樣的代碼，這里腳本之家簡單的為大家說下，希望對大家能有所幫助。2011-01-01
解決ASP中http狀態(tài)跳轉(zhuǎn)返回錯誤頁的問題
這篇文章主要介紹了ASP中http狀態(tài)跳轉(zhuǎn)返回錯誤頁的問題的解決方法，感興趣的小伙伴們可以參考一下2015-10-10
asp 驗證輸入網(wǎng)址是否有效并可以訪問 與正則驗證輸入網(wǎng)址
這篇文章主要是驗證用戶輸入的字符是否是網(wǎng)址的方法，需要的朋友可以參考一下2007-08-08
ASP XML操作類，想學(xué)習(xí)xml操作的朋友可以參考下。2009-12-12
實現(xiàn)UTF8轉(zhuǎn)換GB2312國標(biāo)碼的asp代碼
ASP來實現(xiàn)UTF8轉(zhuǎn)換GB2312國標(biāo)碼-GB2312轉(zhuǎn)UTF-8,需要的朋友可以參考下。2010-04-04
利用Adodb.Stream制作彩色驗證碼...2006-08-08
這篇文章主要介紹了ASP編碼和解碼函數(shù)的相關(guān)資料，需要的朋友可以參考下2015-10-10