知识大全 ASP数据库被挂马的编程处理方法

Posted 2022-07-17 数据库

篇首语：欲穷千里目，更上一层楼。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 ASP数据库被挂马的编程处理方法相关的知识，希望对你有一定的参考价值。

ASP数据库被挂马的编程处理方法 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　数据库被挂马我相信很多人都碰到过在这里我讲下我处理的方法

　　第一步为现有数据库做好备份

　　第二步执行如下ASP文件这样就可以去掉数据库当中的JS木马

　　注 conn asp自己去写了

　　这里放入JS木马内容请记得改为自己数据库中的JS木马内容

　　<! #include file="conn asp" >

　　Server ScriptTimeOut= Set rstSchema = conn OpenSchema( )

　　Do Until rstSchema EOF 遍历数据库表

　　If rstSchema("TABLE_TYPE")="TABLE" Then

　　response write K&" <font color=red><b>"&rstSchema("TABLE_NAME") & "</b></font>:" 显示表名Set rs=Server CreateObject("ADODB Recordset")

　　sql="select * from [" & rstSchema("TABLE_NAME")&"]"

　　rs open sql conn For i= to rs fields count 遍历表中字段If int(rs(i) Type)= or int(rs(i) Type)= or int(rs(i) Type)= or int(rs(i) Type)= or int(rs(i) Type)= or int(rs(i) Type)= Then 只处理字段类型为字符型的字段

　　conn execute("update ["&rstSchema("TABLE_NAME")&"] set "&rs(i) name&" =replace(cast("&rs(i) name&" as varchar( )) 这里放入JS木马内容 )") response write rs(i) name &" "&rs(i) Type &" " 显示执行过的字段名

　　End If

　　response write "<br>"

　　End If

　　rstSchema MoveNext

　　k=k+

　　Loop

　　response Write "执行成功"

　　如果数据库表很多的话上面的遍历数据库结构未执行完就被IIS给停止了在这时候可以在

　　If rstSchema("TABLE_TYPE")="TABLE" Then

　　当中适当加入k值的范围如

　　If rstSchema("TABLE_TYPE")="TABLE" k> and k< Then

　　这样的话就一次只操作个表

　　第三步

　　根据数据库JS注入的特性(会包括<script </script>和//这样的字符) 在conn asp里面放入如下代码

　　Function Cheack_Sqljs() 防止数据库外链JS注入:true为发现外链JS注入

　　Dim F_Post F_Get

　　Cheack_Sqljs=False

　　If Request Form<>"" Then 表单提交时的检测For Each F_Post In Request Form If (Instr(LCase(Request Form(F_Post)) "<script")<> or Instr(LCase(Request Form(F_Post)) "</script>")<> ) and Instr(LCase(Request Form(F_Post)) "//")<> Then

　　Cheack_Sqljs=True

　　Exit For

　　End If

　　If Request QueryString<>"" Then QueryString提交时的检测For Each F_Get In Request QueryString If (Instr(LCase(Request Form(F_Get)) "<script")<> or Instr(LCase(Request Form(F_Get)) "</script>")<> ) and Instr(LCase(Request Form(F_Get)) "//")<> Then

　　Cheack_Sqljs=True

　　Exit For

　　End If

　　End Function

　　Function CheckDataFrom() 检查提交数据来源 True为数据从站外提交过来的

　　CheckDataFrom=True

　　server_v =Cstr(Request ServerVariables("HTTP_REFERER")) server_v =Cstr(Request ServerVariables("SERVER_NAME")) if mid(server_v len(server_v ))<>server_v then

　　CheckDataFrom=False

　　end if

　　End Function

　　If Cheack_Sqljs or CheckDataFrom Then

　　Response Write "<Script Language=JavaScript>alert( 禁止执行非法操作 );</Script>" Response End()

　　End If

cha138/Article/program/net/201311/14256