繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 防sql注入代码
- ASP
- ASP 3.0高级编程（十一）
- ASP 3.0高级编程（十三）
- ASP 3.0高级编程（十四）
- ASP 3.0高级编程（十五）
- ASP 3.0高级编程（十六）
- ASP 3.0高级编程（十七）
- ASP 3.0高级编程（十八）
- ASP 3.0高级编程（十九）
- ASP 3.0高级编程（二十）
- ASP 3.0高级编程（二十一）
- ASP 3.0高级编程（二十二）
- ASP 3.0高级编程（二十三）
- ASP+配置 — ASP+配置概念（二）
- ASP+配置 — ASP+配置概念（三）
- ASP+全新接触（1）
- ASP+全新接触（2）
- ASP+全新接触（3）
- ASP+全新接触（4）
- asp+语法教程(一)前言
- asp+语法教程(二)书写我们的第一个asp+文件
ASP 中的 防sql注入代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-14 浏览: 135 ::
收藏到网摘: n/a
safe.asp，将此文件包含到每页的顶部，下面就正常使用request，或request.querystring来获取传过来的值了，不需要检测了，因为已经检测过了。
<%
Sql_in="and |or |on |in |select |insert |update |delete |exec |declare |'"
'防止GET方法--------------------------------------------------------
'区分出注入字符
Sql=Split(Sql_in,"|")
'如果GET过来的数据不为空
If Request.QueryString<>"" Then
'逐一取出提交过来的参数
For Each Sql_Get In Request.QueryString
For Sql_Data=0 To Ubound(Sql)
'判断是否包含非法字符
IF Instr(Lcase(Request.QueryString(Sql_Get)),Sql(Sql_Data))<>0 Then
'如果有非法字符，弹出对话框提示，并自动返回上一页
Response.Write("<script>alert('系统提示：请不要输入非法字符尝试注入↓，你的IP已记录!');history.go(-1);</script>")
Response.End()
End IF
Next
Next
End If
'防止POST方法---------------------------------------------------
IF Request.Form<>"" Then
For Each Sql_Post In Request.Form
For Sql_Data=0 To Ubound(Sql)
IF Instr(Lcase(Request.Form(Sql_Post)),Sql(Sql_Data))<>0 Then
Response.Write("<script>alert('系统提示：请不要输入非法字符尝试注入↓你的IP已记录!');history.go(-1);</script>")
Response.End()
End IF
Next
Next
End if
'-----------------------------------------------------------
%>
评论 (0) All
