精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● ASP>>VBScript & JavaScript>>取得字符串真实长度的函数

主题:取得字符串真实长度的函数
发信人: nonepassby(左右無人)
整理人: qcrsoft(2002-05-21 17:43:16), 站内信件
在对表单文本框里文本进行长度检测时,
汉字也被当做一个字的长度,而实际上它占了两个英文字母的长度
有网友也写信问我怎么处理,这只能用字符的ascii码来判断一个字符是否为汉字,因此特编了一个函数,说不定对大家有所启发,编出功能更全面的函数:

大家可以用它来代替vbscript中的len()函数

<script language=vbscript>
function truelen(str) 
dim p_len 
p_len=0 
truelen=0 
if trim(str)<>"" then 
p_len=len(trim(str)) 
for xx=1 to p_len 
if asc(mid(str,xx,1))<0 then
truelen=int(truelen) + 2
else
truelen=int(truelen) + 1
end if
next
end if
end function
</script>



----
網易之左右無人给我留言为了与更多的朋友交流,我已申请脚本技术版版卒 

[关闭][返回]