asp 验证用户名是否包含有非常字符的函数

% ''****************************** ''函数:IsValidUserName(byValUserName) ''参数:UserName,用户名称 ''作者:阿里西西 ''日期:2007/7/15 ''描述:验证用户名是否包含有非法字符,不含非法字符返回:true ''示例:IsValidUserName(byValUserName) ''****************************** FunctionIsValidUserName(byValUse

作者: 来源: 时间: 17-11-23 15:26:15

<%
''******************************
''函数:IsValidUserName(byVal UserName)
''参数:UserName,用户名称
''作者:阿里西西
''日期:2007/7/15
''描述:验证用户名是否包含有非法字符,不含非法字符返回:true
''示例:IsValidUserName(byVal UserName)
''******************************
Function IsValidUserName(byVal UserName)
 Dim i,c
 IsValidUserName = True
 For i = 1 To Len(UserName)
  c = Lcase(Mid(UserName, i, 1))
  If InStr("$!<>?#^%@~`&*();:+=''""?  ", c) > 0 Then
    IsValidUserName = False
    Exit Function
  End IF
 Next
End Function
%>
11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们