asp检测是否为中文字符函数

<% ‘****************************** ‘函数:CheckChinese(strng) ‘参数:strng,待验证字符 ‘描述:检测是否为中文字符,返回值:中文为true,否则false ‘示例:<%=CheckChinese(strng)%> ‘****************************** Function CheckChinese(strng) CheckChinese = true Dim regEx, Match Set regEx = New RegExp regEx.Pattern = “\||\#|\&|\