📄 softdown.asp

📁 admin/admin.asp是WAP的后台管理登陆页面
💻 ASP
字号:
<%
if session("admin")="" and session("flag")="" then
  response.redirect "admin.asp"
end if
%>
<!--#include file="conn.asp"-->
<!--#include FILE="md5.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body>
<table align="center" width="70%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#000000">
    <tr>
      <td bgcolor=#999999 colspan="2" align="center"><B>文件下载页面</B></td>
    </tr>
<%
id=request("id")
cad=request("aid")
cbd=request("bid")
page=request("frompage")
sq="select * from article where articleid = "&id
Set Rs = Server.CreateObject("Adodb.Recordset")
rs.open sq,conn,1,2
%>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">名称:</td><td width="80%"><%=rs("title")%></td></tr>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">描述:</td><td width="80%"><%=rs("content")%></td></tr>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">类型:</td><td width="80%"><%
filetype=rs("dataname")
i=InStrRev(filetype,".")
l=Len(filetype)
If i>0 Then
  filetype=Right(filetype,l-i)
End If%>
<%=filetype%>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">大小:</td><td width="80%"><%size=Round(rs("filesize")/1024,2)
If Left(size,1)="." Then size="0"&size
%>
<%=size%>KB</td></tr>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">上传人:</td><td width="80%"><%=rs("writer")%></td></tr>
<tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">上传时间:</td><td width="80%"><%=rs("dateandtime")%></td></tr>
<%RANDOMIZE
downmid=INT((9-0+1)*RND)
downmid=md5(downmid)
session("downmid")=downmid%>
<%if filetype="jpg" Or filetype="gif" Or filetype="jpeg" Or filetype="bmp" Or filetype="png"then%><tr bgcolor=#FFFFFF><td bgcolor=#999999 width="20%">图片:</td><td width="80%"><img src='soft_down.asp?id=<%=rs("articleid")%>&amp;n=<%=rs("dataname")%>&amp;downmid=<%=downmid%>' alt='load..'/></td></tr><%end if%>
<tr bgcolor=#999999><td colspan="2" width="100%" align="center"><B><a href='soft_down.asp?id=<%=rs("articleid")%>&amp;n=<%=rs("dataname")%>&amp;downmid=<%=downmid%>'>点击下载</a>|<a href='updel.asp?id=<%=rs("articleid")%>&amp;aid=<%=cad%>&amp;bid=<%=cbd%>'>删除</a></td></tr></table></body></html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -