最新下载
热门教程
- 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
相关文章
- 武神主宰手游公测时间揭晓 武神主宰手游正式开服日期公布 06-06
- 白银之城内测时间公布 白银之城内测开启日期及参与方式详解 06-06
- icity我的日记如何开启专注模式 06-06
- 今花生app如何搜索商品 06-06
- 咔皮记账如何设置预算 06-06
- 竹马法考如何设置题库 06-06