<%If Session("pig") <> 1 then%>

  

  

Password:

  

  

  

  

  <%   else   if request.QueryString("act")<>"scan" then

  %>

  

  

填入你要检查的路径:

  

  

  * 网站根目录的相对路径,填“\”即检查整个网站;“.”为程序所在目录

  

  你要干什么:

  

  查ASP木马

  

  搜索符合条件之文件

  

  -------------- 如果搜索文件需将以下内容填写完整 ------------------

  

  查找内容:

  

  * 要查找的字符串,不填就只进行日期检查

  修改日期:

  " size="20">

  * 多个日期用;隔开,任意日期填写ALL

  文件类型:

  

  * 类型之间用,隔开,*表示所有类型

  

  

  

  

  <%   else   server.ScriptTimeout = 600   if request.Form("path")="" then   response.Write("No Hack")   response.End()   end if   if request.Form("path")="" then   TmpPath = Server.MapPath("")   elseif request.Form("path")="." then   TmpPath = Server.MapPath(".")   else   TmpPath = Server.MapPath("")&""&request.Form("path")   end if   timer1 = timer   Sun = 0   SumFiles = 0   SumFolders = 1   If request.Form("radiobutton") = "sws" Then   DimFileExt = "asp,cer,asa,cdx"   Call ShowAllFile(TmpPath)   Else   If request.Form("path") = "" or request.Form("Search_Date") = "" or request.Form("Search_FileExt") = "" Then   response.Write("缉捕条件不完全,恕难从命 请返回重新输入")

  response.End()

  End If

  DimFileExt = request.Form("Search_fileExt")

  Call ShowAllFile2(TmpPath)

  End If

  %>

  

  

  

  

  

Scan WebShell -- ASPSecurity For Hacking

  

  

  扫描完毕!一共检查文件夹<%=SumFolders%>个,文件<%=SumFiles%>个,发现可疑点<%=Sun%>

  

  

  

  

  

  

  

  <%If request.Form("radiobutton") = "sws" Then%>

  

  

  

  

  <%else%>

  

  

  

  <%end if%>

  

  

  <%=Report%>

  

  

文件相对路径 特征码 描述 创建/修改时间 文件相对路径 文件创建时间 修改时间

  

  <%   timer2 = timer   thetime=cstr(int(((timer2-timer1)*10000 )+0.5)/10)   response.write "
本页执行共用了"&thetime&"毫秒"

  end if

  end if

  %>

  


  

本程序取自雷客图ASP站长安全助手的ASP木马查找和可疑文件搜索功能

  powered by lake2 ( Build 20060615 )

  

 
目前共有0条评论
  • 暂无Trackback
你目前的身份是游客,评论请输入昵称和电邮!