VBSCRIPT正则表达式验证用户名函数
来源:互联网 发布:mac关闭访客模式 编辑:程序博客网 时间:2024/05/21 18:49
<%
Function IsValidUserName(UserName)
IsValidUserName = True
'判断用户名长度是否在3-20字符之间
If Len(UserName)<3 or Len(UserName)>20 Then
IsValidUserName=False
Exit Function
End If
'检测是否包含特殊字符,可能造成不安全的SQL注入
For i = 1 To Len(UserName)
c = Lcase(Mid(UserName, i, 1))
If InStr("$!<>?#^%@~`&*();:+='"" ", c) > 0 Then
IsValidUserName = False
Exit Function
End IF
Next
'判断输入的用户名是否是中文字符,英文字符(大小写),数字,下划线,中文字符组合
Dim regEx, Match1, Matches ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern ="[^0-9a-z_/u4e00-/u9fa5]" ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分字符大小写。
regEx.Global = True ' 设置全局可用性。
Set Matches = regEx.Execute(UserName) ' 执行搜索。
For Each Match1 in Matches ' 遍历匹配集合。
RetStr = RetStr & "找到非法字符位置:" & Match1.FirstIndex & " 字符是:"& Match1.Value & "" & vbCRLF
Next
response.Write("<br>"&RetStr)
if RetStr="" then
IsValidUserName = True
else
IsValidUserName = False
end if
RegExpTest = RetStr
End Function
response.Write(IsValidUserName("我是_xqf222"))
response.Write(IsValidUserName("我是_xqf 222"))
%>
- VBSCRIPT正则表达式验证用户名函数
- 用正则表达式验证用户名
- OC正则表达式(用户名验证)
- 正则表达式验证用户名和e-mail
- 正则表达式关于复杂用户名的验证
- Code5 使用正则表达式验证用户名
- jquery 邮箱 手机号码 用户名验证正则表达式
- 用正则表达式验证用户名是否合法
- 用正则表达式验证用户名密码
- 验证用户名长度的正则表达式
- 验证用户名长度的正则表达式
- Android验证手机号、用户名正则表达式
- 验证手机号、用户名的正则表达式
- 正则表达式验证用户名、邮箱、密码
- Java_正则表达式验证用户名长度
- iOS正则表达式验证 手机号,用户名
- 正则表达式验证用户名、密码、手机号码、身份证
- vbscript正则表达式
- DataGrid使用技巧大杂烩
- 集成的故事 - 导言
- php的fckeditor配置详解zz [出自: http://www.phpx.com]
- 【转】点评主流中间件技术平台
- 私たちは頑張れましょうね!
- VBSCRIPT正则表达式验证用户名函数
- 一道简单数学题!10人有11个人算错!!
- 我的第一次
- sql的inner left join 命令详解
- 复合型人才的误区及培养
- 人生絮语
- DirectShow中写render filter的问题
- 网页刷新方法集合
- web service 和 remoting 有什么区别