asp 实现检测字符串是否为纯字母和数字组合的函数

答案：<% 
'****************************** 
'函数：CheckString(strng) 
'参数：strng,待验证字符串 
'作者：阿里西西 
'日期：2007/7/13 
'描述：检测字符串是否为纯字母和数字组合 
'示例：<%=CheckString(strng)%> 
'****************************** 
Function CheckString(strng) 
    CheckString = true 
    Dim regEx, Match 
    Set regEx = New RegExp 
    regEx.Pattern = "^[A-Za-z0-9]+$" 
    regEx.IgnoreCase = True 
    Set Match = regEx.Execute(strng) 
    if match.count then CheckString= false 
End Function 
%>
检测是否为中文字符
<% 
'****************************** 
'函数：CheckChinese(strng) 
'参数：strng,待验证字符 
'作者：阿里西西 
'日期：2007/7/13 
'描述：检测是否为中文字符，返回值：中文为true，否则false 
'示例：<%=CheckChinese(strng)%> 
'****************************** 
Function CheckChinese(strng) 
    CheckChinese = true 
    Dim regEx, Match 
    Set regEx = New RegExp 
    regEx.Pattern = "\||\#|\&|\?|\@|\%|\*|\/|\.|\,|\;|\'|\:|\-|\_|\+|\^|\""|\=|\<|\>|\ " 
    regEx.IgnoreCase = True 
    Set Match = regEx.Execute(strng) 
    if match.count then CheckChinese= false 
End Function 
%>

上一个：asp代码实现检测组件是否安装的函数
下一个：asp 下用正则表达式检测邮箱格式的函数