infodisplay.asp

来自「程序名称:酷虎网校友录 V1.0 (商业版)*(修改版) * 本软体为商业软件」· ASP 代码 · 共 118 行

ASP
118
字号
<!--#include file="conn.asp"-->
<%
ID=Request("ID")
SQL="Select * From 信息发布 Where ID=" & CInt(ID)
Set DisplayRS=Server.CreateObject("ADODB.Recordset")
DisplayRS.Open SQL,Connstr,3,2
IF DisplayRS.EOF Then
Response.Redirect "error.asp"
Else
DisplayRS("人气")=DisplayRS("人气")+1
DisplayRS.Update
End IF
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<!--#include file="inc/css.asp"-->
<title><%=WebsiteName%></title>
</head>
<body topmargin="0" background="images/bg.gif">
<!--#include file="top.asp"-->
<div align="center">
  <center>
  <table border="0" width="755" cellspacing="0" cellpadding="0">
    <tr>
      <td width="189" style="background-color: #FFFFFF; border-left: 1 solid #000000; border-top: 1 solid #000000; border-bottom: 1 solid #000000" valign="top"> 
		<!--#include file="left.asp"-->
      </td>
      <td width="562" style="background-color: #FFFFFF; border: 1 solid #000000" valign="top">
        <table border="0" width="100%" cellspacing="0" cellpadding="0">
		<!--#include file="navigation.asp"-->
          <tr>
            <td width="27%" valign="top">
              <img border="0" src="images/infoissue.gif" width="150" height="112">
            </td>
            <td width="73%" valign="top">
            <p style="line-height: 150%; margin-left: 50"><br>
            <font color="#990000">曾经多少风风雨雨我陪你走过,如今多少快快乐乐我陪你笑过;<br>
            不能忘记的,我永远记在心中,只怕在有雨的夜里,因景思情的<br>
            泪如潮涌;心中只有一个信念:愿远方的你幸福!<br>
            </font>[ <a href="infoindex.asp">返回信息发布首页</a> ]&nbsp; [ 
            <a href="infoindex.asp?active=myself">查看我已发表的信息</a>               
            ]             
            </td>
          </tr>
          <tr>
            <td width="100%" valign="top" colspan="2" height="10">
            </td>
          </tr>
          <tr>
            <td width="100%" valign="top" colspan="2" height="10"><div align="center">
                <center>
                <table border="0" width="90%" cellspacing="0" cellpadding="0">
                </center>
                  <tr>
                    <td width="500">
                    标&nbsp; 题:<font color="#990000">『 <%=DisplayRS("主题")%> 』</font><br>     
                    <br>
                    作&nbsp; 者: <font color="#990000"><%=DisplayRS("发布者")%></font><br>    
                    <br>
                    时&nbsp; 间: <font color="#990000"><%=DisplayRS("发布日期")%></font>    
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    <hr size="1" color="#545454">
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    前&nbsp; 言:    
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    <p style="line-height: 200%; margin-left: 5"><font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;  
                    </font><font color="#545454"><%=DisplayRS("前言")%></font>
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    <hr size="1" color="#545454">
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    正&nbsp; 文:    
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    <p style="line-height: 150%; margin-left: 5; margin-top: 3">&nbsp;&nbsp;&nbsp;&nbsp;<%=Replace(Server.HTMLEncode(DisplayRS("内容")),VBCrlf,"<BR>&nbsp;&nbsp;&nbsp;&nbsp;")%>
                    </td>                 
                  </tr>
                  <tr>
                    <td width="500">
                    </td>                 
                  </tr>
                </table>
              </div></td>
          </tr>
          <tr>
            <td width="100%" valign="top" colspan="2"></td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</div>
<!--#include file="bottom.asp"-->
</body>

</html>

⌨️ 快捷键说明

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