annouce_info.asp

校园二手交易系统,具有完备的后台操作以及应用功能!

<!--#include file="top.asp"--><%
'****************************************************
' 多多校园电子商务工作室        Power by ddtaobao.com
' Email:[e-mail]    OICQ:6334278     站长:小羽
' Web: http://www.ddtaobao.com    淘宝旺旺:qq63334278
' Copyright (C) 2006 ddtaobao.com All Rights Reserved
'****************************************************
Dim sql,rs,id
Set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from gonggao where id="&request("id")
rs.open sql,conn,1,3
Dim title,body,date,hitnum
title=Rs("title")
body=Rs("body")
date=Rs("date")
hitnum=Rs("hitnum")
Rs("hitnum")=Rs("hitnum")+1
Rs.Update

Rs.Close

%>
<TABLE width=760 border=0 align=center cellpadding="4">
  <TBODY>
    <TR> 
      <TD align="center" vAlign=top>

         <TABLE cellSpacing=0 cellPadding=0 width="550" border=0>
          <TBODY>
            <TR> 
              <TD height=21 align="center">公告标题:<font color=red><%=title%></font></TD>
            </TR>
               <TR> 
              <TD height=21 align="center"> 
				<hr noshade class=font size="1"> </TD>
            </TR>
            <TR> 
              <TD> <table width="100%" border="0">
                  <tr> 
                    <td align="right">日期：<%=date%> 点击：<%=hitnum%></td>
                  </tr>
                  <tr> 
                    <td><%=body%></td>
                  </tr>
                  <tr> 
                    <td align="center">[<a href="javascript:window.close()"><font class=font>关闭窗口</font></a>]</td>
                  </tr>
                </table></TD>
            </TR>
          </TBODY>
        </TABLE>
        


      </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"-->
</body>
</html>

<%
conn.Close
Set conn=Nothing
%>