加入收藏 | 设为首页 | 会员中心 | 我要投稿 汽车网 (https://www.0577qiche.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

asp ajax注册验证之 防止用户名有空格

发布时间:2023-10-28 09:54:27 所属栏目:Asp教程 来源:
导读:check.asp
复制代码 代码如下:
<%
&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;&#39;
check.asp
复制代码 代码如下:
<%
''''''''''''''''''''''''''''''''''''
Function ReplaceText(fString,patrn,replStr)
    Set regEx = New RegExp     ' 建立正则表达式。
        regEx.Pattern = patrn ' 设置模式。
        regEx.IgnoreCase = True ' 设置是否区分大小写。
        regEx.Global = True ' 设置全局可用性。
        ReplaceText = regEx.Replace(""&fString&"",""&replStr&"") ' 作替换。
    Set regEx=nothing
End Function
''''''''''''''''''''''''''''''''''''
''''''''''''''''''''''''''''''''''''
Function HTMLEncode(fString)
    fString=Trim(fString)
    fString=Replace(fString,CHR(9),"")
    fString=Replace(fString,CHR(13),"")
    fString=Replace(fString,CHR(22),"")
    fString=Replace(fString,CHR(38),"&")    '“&”
    fString=Replace(fString,CHR(32)," ")    '“ ”
    fString=Replace(fString,CHR(34),""")    '“"”
    fString=Replace(fString,CHR(37),"%")    '“%”
    fString=Replace(fString,CHR(39),"'")    '“'”
    fString=Replace(fString,CHR(42),"*")    '“*”
    fString=Replace(fString,CHR(43),"+")    '“+”
    fString=Replace(fString,CHR(44),",")    '“,”
    fString=Replace(fString,CHR(45)&CHR(45),"--")    '“--”
    fString=Replace(fString,CHR(92),"\")    '“/”
    'fString=Replace(fString,CHR(95),"_")    '“_”
    fString=Replace(fString,CHR(40),"(")    '“(”
    fString=Replace(fString,CHR(41),")")    '“)”
    fString=Replace(fString,CHR(60),"<")    '“<”
    fString=Replace(fString,CHR(62),">")    '“>”
    fString=Replace(fString,CHR(123),"{")    '“{”
    fString=Replace(fString,CHR(125),"}")    '“}”
    fString=Replace(fString,CHR(59),";")    '“;”
    fString=Replace(fString,CHR(10),"<br>")
    fString=ReplaceText(fString,"([&#])([a-z0-9]*);","$1$2;")

(编辑:汽车网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章