📄 class.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<%dim nclassid
nclassid=request.querystring("nid")%>
<html>
<head>
<title><%=webname%>--商品分类</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE type=text/css>
.pad {
PADDING-LEFT: 2px
}
</style>
<style>
td{font-size:9pt;line-height:120%;color:#353535}
body{font-size:9pt;line-height:120%}
a:link { color: #000000; text-decoration: none }
a:visited { color: #000000; text-decoration: none }
a:active { color: #000000; text-decoration: none }
a:hover { color: #336699; text-decoration: none; position: relative; right: 0px; top: 1px }
</style>
<link href="images/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">
<!--#include file="webtop.asp"-->
<table width="780" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td background="images/bj.gif">
<table width="748" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td background="images/bj_x.gif" height="1"></td>
</tr>
</table>
<table width="748" border="0" cellspacing="0" cellpadding="0" align="center" bordercolor="#6699CC">
<tr>
<td valign="top" width="198">
<div align="center">
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/bj_3.gif" height="28">
<table cellspacing=0 cellpadding=0 width=170 height="20">
<tr>
<td width=5> </td>
<td width=28>
<div align="center"><img src="images/index7.gif" width="14" height="10"></div>
</td>
<td class=hg12 valign=bottom width="123"> <b>最新动态</b></td>
<td width=12> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_4.gif">
<table width="94%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="6%"> </td>
<td width="94%"><marquee direction="up" width="100%" height="106" scrollamount="2" id=info onMouseOver=info.stop() onMouseOut=info.start() ><%=gonggao%></marquee></td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_5.gif" height="19"> </td>
</tr>
</table>
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> <br>
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<!--#include file="userinfo.asp"-->
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6"></td>
</tr>
<tr>
<td valign="top">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="center"><a href=<%=gg3url%> target=_blank><img src=<%=gg3%> border="0"></a></div>
</td>
</tr>
<tr>
<td height="6"></td>
</tr>
<tr>
<td>
<div align="center"><a href=<%=gg4url%> target=_blank><img src=<%=gg4%> border="0"></a></div>
</td>
</tr>
<tr>
<td height="6"> </td>
</tr>
</table>
</div>
</td>
</tr>
</table>
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="77" rowspan="2">
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/bj_0.gif" height="28">
<table cellspacing=0 cellpadding=0 width=170 height="20">
<tr>
<td width=5> </td>
<td width=28>
<div align="center"><img src="images/index7.gif" width="14" height="10"></div>
</td>
<td class=hg12 valign=bottom width="83"> <b><font color="#990000">热点商品</font></b></td>
<td width=52><a href="bookorder.asp"><img src="images/more2.gif" width="42" height="13" border="0"></a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_1.gif">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 bookid,bookname,liulancount from shop_books order by liulancount desc",conn,1,1
if rs.eof and rs.bof then
response.write "对不起，请您先到程序后台添加商品。"
'response.End()
else
dim i
i=1
do while not rs.eof
%>
<table width="92%" border="0" cellspacing="0" cellpadding="0" height="17" align="center">
<tr>
<td width="13%"><%=i%></td>
<td width="87%">
<%response.write "<a href=book.asp?id="&rs("bookid")&" title=此商品已被浏览过"&rs("liulancount")&"次>"&trim(rs("bookname"))&"</a>"%>
</td>
</tr>
</table>
<%if i>9 then exit do
rs.movenext
i=i+1
loop
rs.close
set rs=nothing
end if%>
</td>
</tr>
<tr>
<td background="images/bj_2.gif"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="center"><a href=<%=gg1url%> target="_blank"><img src=<%=gg1%> border="0"></a></div>
</td>
</tr>
<tr>
<td height="6"></td>
</tr>
<tr>
<td>
<div align="center"><a href=<%=gg2url%> target="_blank"><img src=<%=gg2%> border="0"></a></div>
</td>
</tr>
<tr>
<td height="6"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="5"></td>
</tr>
<tr>
<td height="57" valign="top">
<table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/bj_0.gif" height="28">
<table cellspacing=0 cellpadding=0 width=170 height="20">
<tr>
<td width=5> </td>
<td width=28>
<div align="center"><img src="images/index7.gif" width="14" height="10"></div>
</td>
<td class=hg12 valign=bottom width="83"> <b><font color="#990000">销售排行</font></b></td>
<td width=52><a href="bookorder.asp"><img src="images/more2.gif" width="42" height="13" border="0"></a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_1.gif">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 bookid,bookname,chengjiaocount from shop_books order by chengjiaocount desc",conn,1,1
if rs.eof and rs.bof then
response.write "还没有商品"
'response.End()
else
i=1
do while not rs.eof
%>
<table width="92%" border="0" cellspacing="0" cellpadding="0" height="17" align="center">
<tr>
<td width="13%"><%=i%></td>
<td width="87%">
<%response.write "<a href=book.asp?id="&rs("bookid")&" title=此商品已成功销售"&rs("chengjiaocount")&"次>"&trim(rs("bookname"))&"</a>"%>
</td>
</tr>
</table>
<%if i>9 then exit do
rs.movenext
i=i+1
loop
rs.close
set rs=nothing
end if%>
</td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -