ASP如何验证注册用户为汉字?

[偷麦]

ASP如何验证注册用户为汉字 如果注册用户里文本框传递过来的包括汉字就不让注册了 这个要怎么实现呢 ?

[lzp4881]

'----------------------------------------------------------------'
' isValidName
' 检测用户名，0-9、a-z 和 _ 的组合，不区分大小写
' 参数：
' str 需要被检测的输入字符串
' 返回值：布尔 (如果输入的用户名合法，则返回 True，否则返回 False)
'---------------------------------------------------------'
Function isValidName(str)
Dim re
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "^[a-z0-9A-Z_]+$"
isValidName = re.Test(str)
Set re = Nothing
End Function

[偷麦]

我这样写 怎么还是实现不了啊 总提示 "注册用户名内不能包含汉字"
Function isValidName(str)
Dim re
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "^[a-z0-9A-Z_]+$"
isValidName = re.Test(str)
Set re = Nothing
End Function

if isValidName(str)=false then

response.Write "<script language=javascript>alert('注册用户名内不能包含汉字！');history.go(-1);</script>"


end if

[lzp4881]

<%
str="sdkfjs中国"
Function isValidName(str)
Dim re
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "^[a-z0-9A-Z_]+$"
isValidName = re.Test(str)
Set re = Nothing
End Function

if isValidName(str)=false then
response.Write " <script language=javascript>alert('注册用户名内不能包含汉字！');history.go(-1); </script>"
end if
%>

[偷麦]

哦了 谢谢你