ASP取得字符串长度的自定义函数

ASP取得字符串长度的自定义函数：

' getStrLen

' 获取字符长度，一个中文字符长度算 2

' 参数：

' str 需要获取长度的字符串

' 返回值：整数 (字符串的长度)

以下为引用的内容：

Function GetStrLen(str)

If IsNull(str) Or str = "" Then

getStrLen = 0

Else

Dim i, n, k, chrA

k = 0

n = Len(str)

For i = 1 To n

chrA = Mid(str, i, 1)

If Asc(chrA) >= 0 And Asc(chrA) <= 255 Then

k = k 1

Else

k = k 2

End If

Next

getStrLen = k

End If

End Function

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!