ASP 版 GetByteLen

作者:vkvi 来源:ITPOW(原创) 日期:2007-4-5

在前面,chilleen 介绍过 JavaScript 中的 GetByteLength,用以计算字符串字节长度(ANSI 存储方式),这里介绍一下 ASP(以 VBScript 为语言)中的 GetByteLen。

注意拼写,为什么这里是 GetByteLen,而不是 GetByteLength 呢?这是为了和各自的语言保持一致,JavaScript 中用 length 表示长度,而 VBScript 中用 Len 表示长度。

'以字节为单位返回字符串长度
'ANSI 字符代码大于等于 0 的,字节长度为 1;
'ANSI 字符代码小于 0 的,字节长度为 2。
function GetByteLen(str)
    GetByteLen = Len(str)
   
    dim i
    for i=1 to Len(str)
        if Asc(Mid(str,i,1)) < 0 then
            GetByteLen = GetByteLen + 1
        end if
    next
end function
alert(GetByteLen("中国china"))

相关阅读:

  • Asc、AscB、AscW
  • JavaScript 版 GetByteLength
  • 相关文章