注入漏洞的话 在数据库文件中添加 如下代码
'--------SQL防注入定义部份------------------
Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh
Fy_In = "or|注入的关键字 以竖线|隔开..么办法 CSDN屏蔽了 我也发不了"
Fy_Inf = split(Fy_In,"|")
'--------POST部份------------------
If Request.Form<>"" Then
For Each Fy_Post In Request.Form
For Fy_Xh=0 To Ubound(Fy_Inf)
If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh))<>0 Then
Response.Write "<Script Language=JavaScript>alert('QQ群90316079:本此操作失败了!↓\n\n您提交的有非法字!');history.back();</Script>"
Response.End
End If
Next
Next
End If