您正在使用IPV4(18.207.129.133)访问本站 您本次共访问本站 1 次
用户名: 用QQ登录本站
密 码:
验证码:
首页 软件 编程 笑话 知识 公告 台风 日历 计算器 行情 简化版
文明驾车我带头,文明行路我带头,礼貌让座我带头      

[公益] 节省一分零钱 献出一份爱心 温暖世间真情       【腾讯云】618云上GO!云服务器限时秒杀,1核2G首年95元!      
广告位招租中
2021年 建军节 8
2021年 七夕节 21
2022年 元 旦 161
2022年 春 节 192
 
  • 本类新增
    本类热门文章
    您现在的位置:首页 >> ASP >> 内容
    ASP违法字符检测函数
    内容摘要: Function IsValidStr(ByVal str)IsValidStr = FalseOn Error Resume NextIf IsNull(str) Then Exit FunctionIf Trim(str) = Empty Then Exit FunctionDim ForbidStr, iForbidStr='and|AND|CHAR|......
    Function IsValidStr(ByVal str)

    IsValidStr = False

    On Error Resume Next

    If IsNull(str) Then Exit Function

    If Trim(str) = Empty Then Exit Function

    Dim ForbidStr, i

    ForbidStr

    =

    "and|AND|CHAR|OR|IF|\|script|alert|chr|!|/|(|)|:|=|%|&|$|#|@|+|-|*|/|\|<|>|;|,|^|"

    & Chr(34) & "|" & Chr(39)

    ForbidStr = Split(ForbidStr, "|")

    For i = 0 To UBound(ForbidStr)

    If InStr(1,str, ForbidStr(i),1) > 0 Then

    IsValidStr = False

    Exit Function

    End If

    Next

    IsValidStr = True

    End Function

    版权声明:本内容来源于互联网,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。
    上一篇:一个获取内容中所有图片地址的ASP函数 下一篇:ASP判断目录是否存在
    发布日期:2021/7/2
    手机扫二维码直达本页
    发布时间:17:07:28
    点击:280
    录入:齐天大圣
    相关文章
    Baidu

    YiJiaCMS V5.9 Build 21.7.20(MSSQL) 闽ICP备05000814号-1
    本空间由景安网络提供,百度云加速提供加速防护
    ©2000-2021