ASP 判断是否有中文的代码

　　在 ASP（VBScript 为语言）中，Asc 函数的返回值小于 0 的，可以被判断为中文字符。Asc 函数返回与字符串的第一个字母对应的 ANSI 字符代码。

复制代码代码如下:

　　'判断字符串中是否有中文字符

　　'有－返回 true

　　'无－返回 false

　　'这里的中文字符可能还包括日文、韩文等东方文字

　　function HasChinese(str)

　　HasChinese = false

　　dim i

　　for i=1 to Len(str)

　　if Asc(Mid(str,i,1)) < 0 then

　　HasChinese = true

　　exit for

　　end if