可以使用正则表达试
Function VerifyUserName(UsName)
Dim regEx
Set regEx=New RegExp'建立正则表达式。
regEx.Pattern="([a-zA-Z0-9]){6}"'设置正则表达式
regEx.IgnoreCase=True'设置是否区分字符大小写。
regEx.Global=True'设置全局可用性。
VerifyUserName=regEx.test(UsName)'执行验证
End Function
用法
Dim UsName
UsName=Request.Form("UsName")
IF VerifyUserName(UsName)=False Then
Response.Write "用户名不合法"
End IF
正则表达式参考用法一
http://
正则表达式参考用法二
http://