目前最为全面的防注入方法及代码是什么?

hbsxnet 2008-03-31 02:15:00
ASP注入问题,很老的问题了,想找一个目前最为全面的防注入方法及代码。

问题解决即结贴,分数给1-2人。
想找最佳的方法,欢迎大家讨论。
如果你对此问题不是很了解,或者说自己没有实际使用过的话,请不要随便到baidu复制一段代码贴在下面。

谢谢!
...全文
133 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
hbsxnet 2008-03-31
  • 打赏
  • 举报
回复
谢谢大家的解答!问题已解决,马上结贴。
muxrwc 2008-03-31
  • 打赏
  • 举报
回复
我一般接管...
Request的Form和QueryString方法
考虑到若是'" & & "'
内做不到任何操作..
所以只需要把引号屏蔽掉即可...
然后就是数值
数值的话
只需要验证它是不是数值即可...
一般用IsNumeric即可.不过顺手直接用正则全做了...

Function YH(t_v)
If IsNull(t_v) Then t_v = ""
YH = Replace(Replace(t_v, """", """), "'", "'")
End Function

Function UN_YH(t_v)
If IsNull(t_v) Then t_v = ""
UN_YH = Replace(Replace(t_v, """, """"), "'", "'")
End Function

Function BUG(a, b)
'SQL BUG
Dim r
Set r = new RegExp
r.Global = True
Select Case b
Case 0 : BUG = YH(a)
Case 1 : r.Pattern = "(?:[^\d\.]|\.(?=[^\.]*\.))" : BUG = r.Replace(a, "")
Case 2
r.Pattern = "^\d+(?:\s*,\s*\d+)*$"
If r.Test(a) Then
BUG = a
Else
BUG = ""
End If
Case 3 : r.Pattern = "\D" : BUG = r.Replace(a, "")
End Select
Close r
End Function

Function RE(a, b, c)
Dim t_val
If b = 0 Then
t_val = Request.Form(a)
Else
t_val = Request.QueryString(a)
End If
RE = BUG(t_val, c)
End Function
gingerkang 2008-03-31
  • 打赏
  • 举报
回复
通用的往往是不适用的
编写程序的时候多加注意,记住所有传递的参数都是不可信任的,校验处理之后再引用就不会有问题的
注入的特点就是构造sql语句,防范这个就好了,常见的如数字就做判断一下,字符就过滤',其他具体情况具体处理
myvicy 2008-03-31
  • 打赏
  • 举报
回复
搜索一下"SQL通用防注入程序 v3.0 正式版"有下载的,这个算是做的比较全面的了。
feyyee 2008-03-31
  • 打赏
  • 举报
回复
dim qs,errc,iii
qs=request.servervariables("query_string")
dim deStr(18)
deStr(0)="net user"
deStr(1)="xp_cmdshell"
deStr(2)="/add"
deStr(3)="exec%20master.dbo.xp_cmdshell"
deStr(4)="net localgroup administrators"
deStr(5)="select"
deStr(6)="count"
deStr(7)="asc"
deStr(8)="char"
deStr(9)="mid"
deStr(10)="'"
deStr(11)=":"
deStr(12)=""""
deStr(13)="insert"
deStr(14)="delete"
deStr(15)="drop"
deStr(16)="truncate"
deStr(17)="from"
deStr(18)="%"
errc=false
for iii= 0 to ubound(deStr)
if instr(qs,deStr(iii))<>0 then
errc=true
end if
next
if errc then
Response.Write("对不起,非法URL地址请求!")
response.end
end if

放在连接文件的上面
Atai-Lu 2008-03-31
  • 打赏
  • 举报
回复
没有什么好的办法,只能在你写代码的时候多多注意
还有服务器的设置等等
内容概要:本文围绕不确定环境下的多式联运路径优化问题展开研究,提出并实现了基于AFO算法、遗传算法(GA)和粒子群优化算法(PSO)的三种智能优化方法,并借助Matlab平台完成算法编程与仿真。研究构建了考虑时间、成本、转运风险等多重不确定因素的路径优化模型,系统比较了AFO、GA、PSO三种算法在收敛速度、全局寻优能力和稳定性方面的表现,同时引入Matlab自带的全局优化搜索器作为基准对照,深入分析各算法在复杂物流网络中的适用边界与性能差异。研究表明,AFO算法在解决此类组合优化问题时展现出更快的收敛效率和更强的局部规避能力。; 适合人群:具备一定Matlab编程基础与运筹优化知识,从事物流工程、交通运输规划、智能算法开发等相关领域的研究生、科研人员及工程技术人员。; 使用场景及目标:①应用于多式联运、综合货运网络中的路径决策支持系统构建;②为不确定性条件下复杂路径规划问题提供智能算法选型依据与技术实现方案;③支持科研人员复现主流优化算法并开展横向性能对比实验,推动算法改进与实际落地。; 阅读建议:建议读者结合提供的Matlab代码逐模块分析算法实现流程,重点理解目标函数设计、约束条件处理及参数敏感性分析部分,可通过调整问题规模与算法参数进行对比实验,进一步拓展至动态路径规划或大规模网络优化等延伸场景。

28,403

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧