最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp sql防注入程序与关键词屏蔽程序
时间:2022-07-02 23:11:13 编辑:袖梨 来源:一聚教程网
dim sql_injdata
SQL_injdata = "exec|insert|select|delete|update|count|*|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
If Request.QueryString<>"" Then
For Each SQL_Get In Request.QueryString
For SQL_Data=0 To Ubound(SQL_inj)
if instr(Request(SQL_Get),Sql_Inj(Sql_DATA))>0 Then %>
<%end if
next
Next
End If
function kill_keyword(txt)
execc = "select * from kill_keyword"
set rscc = server.createobject("adodb.recordset")
rscc.open execc,conn,3,3
for ic=1 to rscc.recordcount
headk = ""
killx = ""
kill = rscc("keyword")
if len(kill)>1 then
headk = left(kill,1)
for jc=1 to len(kill)-1
killx = killx + "*"
next
else
headk=""
killx="*"
end if
txt = replace(txt,kill,headk + killx)
rscc.movenext
next
kill_keyword = txt
end function
相关文章
- 王者荣耀侦探能力大测试攻略 王者荣耀侦探能力大测试怎么过 11-22
- 无期迷途主线前瞻兑换码是什么 11-22
- 原神欧洛伦怎么培养 11-22
- 炉石传说网易云音乐联动怎么玩 11-22
- 永劫无间手游确幸转盘怎么样 11-22
- 无期迷途主线前瞻兑换码是什么 无期迷途主线前瞻直播兑换码介绍 11-22