400-1100-266

9:00-24:00（工作日）
主页 > 知识库 > asp 实现对SQL注入危险字符进行重编码处理的函数

asp 实现对SQL注入危险字符进行重编码处理的函数
热门标签：科大讯飞语音识别系统 Linux服务器 银行业务 电子围栏 阿里云 服务器配置 Mysql连接数设置 团购网站
%
'******************************
'函数：CheckStr(byVal ChkStr)
'参数：ChkStr,待验证的字符
'作者：阿里西西
'日期：2007/7/15
'描述：对SQL注入危险字符进行重编码处理
'示例：CheckStr("and 1=1 or select * from")
'******************************
Function CheckStr(byVal ChkStr)
 Dim Str:Str=ChkStr
 Str=Trim(Str)
 If IsNull(Str) Then
  CheckStr = ""
  Exit Function 
 End If
 Dim re
 Set re=new RegExp
 re.IgnoreCase =True
 re.Global=True
 re.Pattern="(\r\n){3,}"
 Str=re.Replace(Str,"$1$1$1")
 Set re=Nothing
 Str = Replace(Str,"'","''")
 Str = Replace(Str, "select", "sel#101;ct")
 Str = Replace(Str, "join", "jo#105;n")
 Str = Replace(Str, "union", "un#105;on")
 Str = Replace(Str, "where", "wh#101;re")
 Str = Replace(Str, "insert", "ins#101;rt")
 Str = Replace(Str, "delete", "del#101;te")
 Str = Replace(Str, "update", "up#100;ate")
 Str = Replace(Str, "like", "lik#101;")
 Str = Replace(Str, "drop", "dro#112;")
 Str = Replace(Str, "create", "cr#101;ate")
 Str = Replace(Str, "modify", "mod#105;fy")
 Str = Replace(Str, "rename", "ren#097;me")
 Str = Replace(Str, "alter", "alt#101;r")
 Str = Replace(Str, "cast", "ca#115;t")
 CheckStr=Str
End Function

'反编上面函数处理过的字符串

Function UnCheckStr(Str)
  Str = Replace(Str, "sel#101;ct", "select")
  Str = Replace(Str, "jo#105;n", "join")
  Str = Replace(Str, "un#105;on", "union")
  Str = Replace(Str, "wh#101;re", "where")
  Str = Replace(Str, "ins#101;rt", "insert")
  Str = Replace(Str, "del#101;te", "delete")
  Str = Replace(Str, "up#100;ate", "update")
  Str = Replace(Str, "lik#101;", "like")
  Str = Replace(Str, "dro#112;", "drop")
  Str = Replace(Str, "cr#101;ate", "create")
  Str = Replace(Str, "mod#105;fy", "modify")
  Str = Replace(Str, "ren#097;me", "rename")
  Str = Replace(Str, "alt#101;r", "alter")
  Str = Replace(Str, "ca#115;t", "cast")
  UnCheckStr=Str
End Function
%>

标签：萍乡 枣庄 广元 蚌埠 衢州 江苏 衡水 大理

巨人网络通讯声明：本文标题《asp 实现对SQL注入危险字符进行重编码处理的函数》，本文关键词  ；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。
  • 相关文章
  • 推荐文章

    上一篇：asp通过JMAIL实现通用发送函数

    下一篇：asp下实现对HTML代码进行转换的函数

     
    微信咨询办理
    在线QQ客服
    ( 客服小王 )
    ( 客服小李 )
    ( 客服小刘 )
    ( 客服小张 )
    关于我们 | 荣誉资质 | 呼叫中心 | 代理加盟 | 客户案例 | 服务支持 | 产品介绍 | 行业资讯

    Copyright © 1999-2012 诚信 合法 规范的巨人网络 www.1330.cn 始建于2005年

    全国网站建设网站开发咨询热线：400-1100-266   0514-86177077

    江苏扬州巨人网络科技有限公司   总部地址：江苏省扬州信息产业基地11号楼4层

    《增值电信业务经营许可证》苏B2-20120278    苏ICP备15040257号 网站地图
    全国咨询热线
    400-1100-266
    在线客服( QQ：340506921 )
    版权所有：巨人网络(扬州)科技有限公司——拥有网站建设十年经验，具备独立网站开发能力，能够提供完善的网站设计及相关的网站制作服务！     全国统一服务热线：400-1100-266
    收缩
    • 微信客服
    • 微信二维码

    • 电话咨询

    • 400-1100-266