📄 shopnewsinfor.asp

📁 本源代码为大学生购物网的源代码,欢迎大家的下载,学习与交流

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>《<%=Conn.ExeCute("select name from new where id="&Request("id")&"")(0)%>》</title>
<LINK href="style.css" type=text/css rel=stylesheet>
</head>
<body>
<TABLE width="760" class=page border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR> 
      <TD>
<!--#include file="top.asp"-->
<TABLE width=760 border=0 align=center cellpadding="4">
  <TBODY>
    <TR> 
      <TD align="center" vAlign=top>
        <%
set rs=server.createobject("adodb.recordset")
sql="select * from new where id="&request("id")&""
rs.open sql,conn,1,3
%>
              <%
conn.execute("update new set hits=hits+1 where id="&request("id")&"")
%>
        <TABLE cellSpacing=0 cellPadding=0 width="650" border=0 class=page>
          <TBODY>
            <TR> 
              <TD bgColor=#EFEFEF height=21> <TABLE width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD align=middle width=25>
						<img border="0" src="images/news.gif" width="15" height="15"></TD>
                      <TD>新闻名:<%=Conn.ExeCute("select name from new where id="&Request("id")&"")(0)%></TD>
                      <TD align="right"> 该新闻已被浏览 <font color="#FF0000"><%=rs("hits")%></font> 次</TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD align="center"> <table width="98%" border="0" cellpadding="4">
                  <tr> 
                    <td><img src="images/goods.gif" width="16" height="15"> 
                      <font color="#009933">新闻描述：</font><%=rs("content")%></td>
                  </tr>
                  <tr align="right"> 
                    <td>[<a href="shop_info.asp?user_id=<%=rs("user_id")%>"><font color="#FF0000">浏览该店铺</font></a>]</td>
                  </tr>
                </table>
                </TD>
            </TR>
          </TBODY>
        </TABLE>
        </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"--> </TD>
    </TR>
  </TBODY>
</TABLE>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -