asp 驗證用戶名是否包含有非常字符的函數

2020-07-27 13:07:11

字體：大中小

來源：轉載

供稿：網友

<%
'******************************
'函數：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("$!<>?#^%@~`&*();:+='"" 主站蜘蛛池模板：湄潭县| 张家川| 二手房| 松阳县| 桐梓县| 青海省| 巴南区| 安阳县| 平塘县| 瓮安县| 泌阳县| 博湖县| 枣庄市| 德昌县| 衡阳县| 镇远县| 新乐市| 池州市| 乳山市| 绥江县| 台湾省| 浦北县| 丽江市| 永泰县| 旬邑县| 耒阳市| 青铜峡市| 威宁| 万源市| 东宁县| 革吉县| 盐山县| 洪江市| 岫岩| 旅游| 攀枝花市| 安丘市| 天长市| 长海县| 阿坝| 厦门市|

国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本