返回首页
当前位置: 主页 > 网络编程 > Asp实例教程 >

ASP截取中英文字符串函数

时间:2016-05-30 19:55来源:知行网www.zhixing123.cn 编辑:麦田守望者

ASP做网站的时候经常会碰到要截取字符串的情况。ASP中的Len函数不管是中文字符,还是英文字符,统统按一个单位来计算,由于一个中文字符的宽度是一个英文字符宽度的两倍,在中英文混合的情况下字符串实际占用的宽度就不好计算了,如果按照Len函数计算的长度来截取字符串截出来的效果也会长短不一,下面是按照一个汉字相当于两个英文字符来计算字符串长度和截取字符串的代码。

function getSubString(str,Length)
02.on error resume next
03. dim l,c,i,hz,en
04. l=len(str)
05. if l<length then
06. getSubString=str
07. else
08. hz=0
09. en=0
10. for i=1 to l
11. c=asc(mid(str,i,1))
12. if c>=128 or c<0 then
13. hz=hz+1
14. else
15. en=en+1
16. end if
17.
18. if en/2+hz>=length then
19. exit for
20. end if
21. next
22. getSubString=left(str,i) & "…"
23. end if
24. if err.number<>0 then err.clear
25.end function

顶一下
(0)
0%
踩一下
(0)
0%
标签(Tag):asp
------分隔线----------------------------
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
验证码:点击我更换图片