ASP 检测字符串是否包括汉字、数字、韩文、日文，以及其他语种字

来源：未知责任编辑：责任编辑发表时间:2015-03-01 01:33　点击:次

ASP PHP JSP JavaScript 网页设计 DIVCSS Ajax技术 HTML5

ASP 检测字符串是否包括汉字、数字、韩文、日文，以及其他语种字符的方法

网页要用utf-8编码方式，用GB2312编码无法检测。

http://blog.csdn.net/aminfo/article/details/19572449

文件内容如下，请存为Test.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>



测试字符属性


<%Response.Charset = "utf-8"%>
<%Dim HasHZ, HasEn, HasNum, KeyWord

KeyWord = Request("KeyWord")
If KeyWord<>"" Then

	HasHZ = 0
	HasEn = 0
	HasNum = 0
	HasJP = 0
	HasKR = 0

	'判断汉字
	If RegExpTest("[\u4e00-\u9fa5]", KeyWord) Then
		HasHZ = 1
	End If

	'判断英文
	If RegExpTest("[a-zA-Z]", KeyWord) Then
		HasEn = 1
	End If
	
	'判断数字
	If RegExpTest("[0-9]", KeyWord) Then
		HasNum = 1
	End If

	'判断日语
	If RegExpTest("[\u0800-\u4e00]", KeyWord) Then
		HasJP = 1
	End If

	'判断韩语
	If RegExpTest("[\u3130-\u318F]", KeyWord) Then
		HasKR = 1
	ElseIf RegExpTest("[\uAC00-\uD7A3]", KeyWord) Then
		HasKR = 2	
	End If

	Response.write  "
关键词：" & KeyWord & "
汉字 = " & HasHZ & "
英文 = " & HasEn & "
数字 = " & HasNum & "
日文 = " & HasJP & "
韩文 = " & HasKR

End If

Function RegExpTest(patrn, strng) 
	Dim regEx, retVal ' 建立变量。 
	Set regEx = New RegExp ' 建立正则表达式。 
	regEx.Pattern = patrn ' 设置模式。 
	regEx.IgnoreCase = False ' 设置是否区分大小写。 
	retVal = regEx.Test(strng) ' 执行搜索测试。 
	If retVal Then 
		RegExpTest = True
	Else 
		RegExpTest = False
	End If 
End Function%>

附上：Unicode编码布局如下，如需判断其它编码字符，只需将正则表达式中的编码范围替换为以下对应的编码范围及可。

Unicode 到目前为止所定义的五个平面中，第0平面(BMP)最为重要，其编码分布如下：
注：中文范围 4E00-9FBF：CJK 统一表意符号 (CJK Unified Ideographs)
0000-007F：C0控制符及基本拉丁文 (C0 Control and Basic Latin)
0080-00FF：C1控制符及拉丁文补充-1 (C1 Control and Latin 1 Supplement)
0100-017F：拉丁文扩展-A (Latin Extended-A)
0180-024F：拉丁文扩展-B (Latin Extended-B)
0250-02AF：国际音标扩展 (IPA Extensions)
02B0-02FF：空白修饰字母 (Spacing Modifiers)
0300-036F：结合用读音符号 (Combining Diacritics Marks)
0370-03FF：希腊文及科普特文 (Greek and Coptic)

Microsoft Word
0400-04FF：西里尔字母(Cyrillic)
0500-052F：西里尔字母补充 (Cyrillic Supplement)
0530-058F：亚美尼亚语 (Armenian)
0590-05FF：希伯来文 (Hebrew)
0600-06FF：阿拉伯文 (Arabic)
0700-074F：叙利亚文 (Syriac)
0750-077F：阿拉伯文补充 (Arabic Supplement)
0780-07BF：马尔代夫语 (Thaana)
07C0-077F：西非书面语言 (N'Ko)
0800-085F：阿维斯塔语及巴列维语(Avestan and Pahlavi)