ASP从字符串截取一个n个字符的函数

功能名称:gethtmlcontent参数:是由无-->获得字符数的字符串进行处理txtcontent -->
函数:从字符串截取n与HTML字符,现在实现方法并不完美,这个过程是:从字符串查找到各种控件,然后根据一些分离,进入数组,然后数组相加,看看是否字符大于给定字符,如果是这样的话。返回数组。
作者:刘永法
时间:2007-6-1 21:20:03:)
功能gethtmlcontent(不,txtcontent)
如果Len(txtcontent)<=没有然后
gethtmlcontent = txtcontent
exitfunction
endif

集重=新的正则表达式
re.ignorecase =真
重复全局=真的
patrn =< P |
| <李| <表
patrn =分裂(patrn,| )

在patrn foreach P
模式= P
txtcontent =重新更换(txtcontent,P | | )
下一个

txtcontent =分裂(txtcontent,| | )
在txtcontent foreach E
如果Len(S)>没有thenexitfor
S = s + E
下一个
gethtmlcontent = S
endfunction
%>