📄 sales.asp
字号:
<% myself=request.servervariables("path_info")%>
<!--#include file="../inc/conn.asp" -->
<html>
<head>
<title>产品展示台</title>
<meta http-equiv=Content-Type content=text/html; charset=gb2312 charset=gb2312>
<link rel=stylesheet href=../Style.css type=text/css>
<script language="JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<body bgcolor="#339900" text=#000000 leftmargin="0" topmargin="0">
<DIV align=center>
<table width="100%"><tr>
<td width="100%" height="120" background="member/images/topgif.gif"><div align="center">
<OBJECT
codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0
height=172 width=995 align=middle
classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000><PARAM NAME="movie" VALUE="../images/banner.swf"><PARAM NAME="quality" VALUE="High"><PARAM NAME="scale" VALUE="ExactFit">
<embed src="../images/banner.swf" quality="High"
pluginspage="http://www.macromedia.com/go/getflashplayer"
type="application/x-shockwave-flash" width="995" height="172"
scale="ExactFit"></embed>
</OBJECT>
</div></td></tr></table>
<!--#include file="../top.htm" -->
<table width="1000" height="26" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="1" bgcolor="#FFFFFF">
</td>
</tr>
<tr>
<td bgcolor="#3399CC"> <a href="sales.asp"><font color="#FFFFFF">所有类别：</font></a><a href="sales.asp?bigclass=打包带"><font color="#FFFFFF">打包带</font></a>
<a href="sales.asp?bigclass=呢绒草"><font color="#FFFFFF">呢绒草</font></a>
<a href="sales.asp?bigclass=打包机"><font color="#FFFFFF">打包机</font></a>
<a href="sales.asp?bigclass=打包机配件"><font color="#FFFFFF">打包机配件</font></a>
</td>
</tr>
</table>
<table width="1000" border="0" cellspacing="1" cellpadding="5">
<tr>
<td>
<%set rs=Server.CreateObject("Adodb.RecordSet")
If Request("bigclass")="" Then
sql="select * from productinfo order by id desc"
Else
sql="select * from productinfo where bigclass='"&Request("bigclass")&"' order by id desc"
End If
rs.open sql,conn,3,3
if rs.eof then
response.write"没有相关类别产品"
else
rs.Pagesize=6
page=clng(request("page"))
if page<1 or page=empty then page=1
if page>rs.pagecount then page=rs.pagecount
rs.Absolutepage=page
response.write"<table width=760 border=0 cellspacing=0 cellpadding=5>"
response.write"<tr>"
a=0
i=1
do while not rs.eof
i=i+1
response.write"<td width=50% border=0>"
response.write"<table width=100% border=0 cellspacing=0 cellpadding=5>"
response.write"<tr>"
response.write"<td valign=top width=50% border=0>"
response.write"<table width=100% border=0 cellspacing=0 cellpadding=5>"
response.write"<tr>"
response.write"<td align=center><a href=list.asp?id="&rs("id")&" target=_blank><img src=../admin/pic/"&rs("productphoto")&" width=230 height=178 class=img></a></td>"
response.write"</tr>"
response.write"</table>"
response.write"</td>"
response.write"<td>"
response.write"<table width=100% border=0 cellspacing=0 cellpadding=3>"
response.write"<tr>"
response.write"<td width=40 border=0>名称：</td>"
response.write"<td>"&rs("productname")&"</td>"
response.write"</tr>"
response.write"<tr>"
response.write"<td>编号：</td>"
response.write"<td>"&rs("productid")&"</td>"
response.write"</tr>"
response.write"<tr> "
response.write"<td>类别：</td>"
response.write"<td>"&rs("bigclass")&"</td>"
response.write"</tr>"
response.write"<tr>"
response.write"<td>材料：</td>"
response.write"<td>"&rs("cl")&"</td>"
response.write"</tr>"
response.write"<tr>"
response.write"<td>尺寸：</td>"
response.write"<td>"&rs("sizes")&"</td>"
response.write"</tr>"
response.write"<tr>"
response.write"</table>"
response.write"<table width=100% border=0 cellspacing=0 cellpadding=0>"
response.write"<tr>"
response.write"<td height=25 align=center>"
response.write"<img src=../image/cart.gif width=19 height=19> "
response.write"<a href=# onMouseDown=MM_openBrWindow('shopping.asp?productname="&rs("productname")&"&productid="&rs("id")&"&money="&rs("salesmoney")&"','','width=500,height=250')>现在订购</a></td>"
response.write"</tr>"
response.write"</table>"
response.write"</td>"
response.write"</tr>"
response.write"<tr>"
response.write"<td valign=top colspan=2>"
response.write"</td>"
response.write"</tr>"
response.write"</table>"
response.write"</td>"
a=a+1
if a=2 then
response.write"</tr>"
response.write"<tr>"
a=0
end if
if i>6 then exit do
rs.movenext
loop
response.write"</tr>"
response.write"</table>"
end if
%>
<br>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<%
if page<>1 then %>
<a href=<%=myself%>?page=1>第一页</a> <a href=<%=myself%>?page=<%=(page-1)%>>上一页</a>
<%
end if
if page<>rs.pagecount then
%>
<a href=<%=myself%>?page=<%=(page+1)%>>下一页</a> <a href=<%=myself%>?page=<%=rs.pagecount%>>最后一页</a>
<% end if %>
<font style="font-size:9pt"> 页次:</font><font color=red style="font-size:9pt"><%=page%>/<%=rs.pagecount%></font>
共有记录<font color=red style="font-size:9pt"><%=rs.recordcount %></font>条</td>
</tr>
</table>
<%rs.close
set rs=nothing
set conn=nothing%>
</td>
</tr>
</table>
<!--#include file="../bomt.htm" -->
</DIV>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -