Asp建站程序中通常首页会调用公司简介,如果后台添加的公司简介有图片或是特殊格式会导致首页变成,这个时候我们就需要去掉html格式,调用指定字节数的文字,如何操作呢,我们可以定义一下函数
function StrLeft(Str,StrLen)
dim L,T,I,C
if Str="" then
StrLeft=""
exit function
end if
Str=Replace(Replace(Replace(Replace(Str," "," "),""",Chr(34)),">",">"),"<","<") '过滤字符串中的html格式
L=Len(Str)
T=0
for i=1 to L
C=Abs(AscW(Mid(Str,i,1)))
if C>255 then
T=T+2
else
T=T+1
end if
if T>=StrLen then
StrLeft=Left(Str,i) & "…"
exit for
else
StrLeft=Str
end if
next
StrLeft=Replace(Replace(Replace(replace(StrLeft," "," "),Chr(34),"""),">",">"),"<","<")
end function
然后通过调用strleft函数就可以过滤格式并截取字数了,这样首页的公司简介就不会影响网页布局了
然后通过调用strleft函数就可以过滤格式并截取字数了,这样首页的公司简介就不会影响网页布局了