📄 showfile.asp

📁 asp程序,自动投稿系统,也可以用来学生交作业,原创程序.

💻 ASP

字号:

<%response.expires=0%>
<!--#include file="conn.asp"-->

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css">
<script language="javascript1.2" src="js/openwin.js"></script>
<title>稿件信息</title>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="expires" content="no-cache">


</head>
<body bgcolor="#ffffff">

<div align="left">
  <%


ID=Request.querystring("ID")

if id="" then
	response.Write "<script langurage=javascript> alert('对不起, 您没有访问权限！')</script>"
	response.End
end if

sql="select * from file where id="&id
rs.open sql,conn,1,1
	

%>
</div>

  <table width="650" border="0" cellpadding="0" cellspacing="1" bgcolor=#c0c0c0>
    <tr bgcolor="#ffffff">
      <td height="34" align="center">文章题目</td>
      <td height="34" colspan="3"><%=rs("title")%></td>
      <td height="34" align="center">投稿时间</td>
      <td height="34"> <div align="center"><%=rs("date")%> </div></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td width="90" height="34" align="center">文章编号</td>
      <td width="131" height="34"> 
        <div align="center"><%=rs("id")%>
        </div></td>
      <td width="90" height="34" align="center">联系人</td>
      <td width="118" height="34"> 
         
        <div align="center"><%=rs("username")%>
        </div></td>
      <td width="90" height="34" align="center">第一作者</td> 
      <td width="118" height="34"> <div align="center"><%=rs("authorname")%> </div></td>
    </tr>
    <tr bgcolor="#ffffff">
      <td align="center" height="80">其他作者</td>
      <td colspan="5" align="left" valign="top"><%=rs("other")%></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td align="center" height="80">文章说明</td> 
      <td colspan="5" align="left" valign="top"><%=rs("shuoming")%></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td height="46" align="center" colspan="6"> 
<img 

src="images/an_fanhui.jpg" border=0 align="absmiddle" 

style="cursor:hand" onclick="history.go(-1);">          &nbsp;&nbsp;&nbsp;</td>
    </tr>
</table>

<%
Conn.Close
set Conn=Nothing

%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -