📄 display.asp

📁 网上商城的设计与实现

💻 ASP

字号:

<!--#include file="conn.asp"-->
<%
   if not isEmpty(request.QueryString("id")) then
	id=request.QueryString("id")
   else
	id=1
   end if


Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From pagenews where id="&id, conn,3,3
rs("counter")=rs("counter")+1
rs.update
nCounter=rs("counter")
rs.close
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From pagenews where id="&id, conn,3,3
%>
<html>
<head>
<title><%=rs("title")%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
</head>

<body text="#000000">
      <div align="center">
        <div align="center">
          <center>
          <table border="0" width="590" cellspacing="0" cellpadding="0" bgcolor="#006699">
            <tr>
              <td width="100%"><font color="#FFFFFF"><%=rs("title")%></font></td>
            </tr>
          </table>
          </center>
        </div>
        <center>
      <table width="590" border="0" cellspacing="1" height="103" bgcolor="#006699">
        </center>
        <tr> 
          <td align="center" bgcolor="#FFFFFF" height="106" valign="top" width="100%">
            <p>发布日期：[<%=rs("time")%>]&nbsp;&nbsp;&nbsp; 共阅[<%=rs("counter")%>]次</p>  
      <table width="90%" border="0" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" bordercolorlight="#000000">  
        <center>  
        <tr>   
          <td style="text-indent: 20">  
<%=rs("content")%>  
            <p align="center"> <a href="javascript:window.close()">关闭本窗口 </a></p>  
          </td>  
        </tr>  
      </table>  
            </center></td>  
        </tr>  
      </table>  
      </div>  
  
</body>  
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -