ASP开发中字符串截取的函数操作

来源:爱站网时间:2020-11-13编辑:网友分享
asp CutStrX字符串截取函数(过滤全部HTML标记),比较不错,需要的朋友可以参考下。

 在使用ASP开发网站的时候,可能会遇到截取字符串的情况,而ASP中的函数都是按单位计算的,今天爱站技术频道小编就为大家解读ASP开发中字符串截取的函数操作吧!

复制代码 代码如下:

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 c255 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

其实ASP在开发的各个方面都很成熟,但是开发都是各位程序员自行选择的,在这个互联网的大环境时代,我们要有不断开创的能力,才能在激流勇进中拔得头筹。

上一篇:ASP开发中调用XML数据的操作

下一篇:ASP开发之CHR检测扩展名的方法

您可能感兴趣的文章

相关阅读

热门软件源码

最新软件源码下载