asp從字符串里截取N個(gè)帶HTML的字符的函數(shù)
'函數(shù)名:getHTMLContent'參數(shù):NO-->要取得的字符數(shù), txtContent-->要處理的字符串
'功能: 從字符串里截取N個(gè)帶HTML的字符,現(xiàn)在的實(shí)現(xiàn)方法還不完善,過(guò)程是:從字符串里找各種控件的開始,然后依些分開,放到數(shù)組里,然后一個(gè)一個(gè)數(shù)組的加上來(lái)看看字符是否大于給定的字符如果是,那么,返回這個(gè)數(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中限制某些字符留言評(píng)論,原理就是通過(guò)instr函數(shù)查找。感覺很簡(jiǎn)單，寫起來(lái)還是有點(diǎn)手生，感覺阿會(huì)南2014-07-07
ASP基礎(chǔ)入門第九篇（Global.asa文件的使用）
這篇文章主要介紹了Global.asa文件的使用，是一個(gè)可選文件，每個(gè)應(yīng)用程序只能有一個(gè) Global.asa 文件，需要了解的朋友可以參考下2015-10-10
很多朋友對(duì)于asp的換行的實(shí)現(xiàn)，不是很懂，不懂什么情況下該使用什么樣的代碼，這里腳本之家簡(jiǎn)單的為大家說(shuō)下，希望對(duì)大家能有所幫助。2011-01-01
解決ASP中http狀態(tài)跳轉(zhuǎn)返回錯(cuò)誤頁(yè)的問題
這篇文章主要介紹了ASP中http狀態(tài)跳轉(zhuǎn)返回錯(cuò)誤頁(yè)的問題的解決方法，感興趣的小伙伴們可以參考一下2015-10-10
asp 驗(yàn)證輸入網(wǎng)址是否有效并可以訪問 與正則驗(yàn)證輸入網(wǎng)址
這篇文章主要是驗(yàn)證用戶輸入的字符是否是網(wǎng)址的方法，需要的朋友可以參考一下2007-08-08
ASP XML操作類，想學(xué)習(xí)xml操作的朋友可以參考下。2009-12-12
實(shí)現(xiàn)UTF8轉(zhuǎn)換GB2312國(guó)標(biāo)碼的asp代碼
ASP來(lái)實(shí)現(xiàn)UTF8轉(zhuǎn)換GB2312國(guó)標(biāo)碼-GB2312轉(zhuǎn)UTF-8,需要的朋友可以參考下。2010-04-04
利用Adodb.Stream制作彩色驗(yàn)證碼...2006-08-08
這篇文章主要介紹了ASP編碼和解碼函數(shù)的相關(guān)資料，需要的朋友可以參考下2015-10-10