hot.asp

凡人网络购物系统 v8.0 中文版

<!--#include file="top.asp"-->
<div align="center"><table width=980 border=0 cellpadding=0 cellspacing=0 bgcolor="#FFFFFF">
<tr><td width=181 align="center" valign="top"><!--#include file="log.asp"--><!--#include file="insort.asp"--><!--#include file="inph.asp"--></td>
<td valign="top" align="center" width="5"> </td>
<td valign="top" align="center"> 
<table width="100%" height="5" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<%page=request("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
if request("order")<>"" then 
order=request("order")
end if
if request("stype")="tjindex" then
tjindex=1
elseif request("stype")="tejia" then
tejia=1
elseif request("stype")="tjsort" then
tjsort=1
elseif request("stype")="hot" then
order="hot"
end if
if order="time" then
orderx="hw_id desc"
elseif order="hot" then
orderx="hw_buys desc,hw_id desc"
elseif order="price1" then
orderx="hw_price2 asc"
elseif order="price1" then
orderx="hw_price2 desc"
else
orderx="hw_xu desc"
end if
if sort_id<>"" then sera=" and sort_id=" & sort_id & ""
if nsort_id<>"" then serb=" and nsort_id=" & nsort_id & ""
if pinpai_id<>"" then serc=" and pinpai_id=" & pinpai_id & ""
if tjindex=1 then serd=" and tjindex=1"
if tejia=1 then sere=" and tejia=1"
if tjsort=1 then serf=" and tjsort=1"
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_hw where hw_kucun>0 " &sera&serb&serc&serd&sere&serf&"  order by "&orderx&""
rs.open sql,conn,1,1
if rs.eof then%><tr><td align="center" height="30">你所选的类别没有商品</td></tr>
<%else
rs.pagesize=lookpage
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
rs.cachesize=rs.pagesize%>
<tr><td class="sort" height="23">
&nbsp;共<%=totalrec%>件商品，这是第<%=(page-1)*rs.pagesize+1%>-<%if page+1<=totalpage then%><%=page*rs.pagesize%><%else%><%=totalrec%><%end if%>件
</td></tr>
<tr><td width="100%" align="center"> 
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<%if lookt="image" then
i=0
do while not rs.eof and (i<rs.pagesize)
i=i+1%>
<tr><td width="25%" height="30" align="center"><!--#include file="insimage.asp"--></td></tr>
<%rs.movenext
loop
else%>
<tr><%i=0
do while not rs.eof and (i<rs.pagesize)
i=i+1%>
<td width="25%" height="30" align="center"><!--#include file="ins.asp"--></td>
<%if (i mod lookhang=0) and i>=lookhang then%></tr><tr><%end if
rs.movenext
loop%></tr><%end if%></table></td></tr>
<form action=<%=filename%>?order=<%=order%> method=post><tr><td height="5"></td></tr>
<tr><td height="50" class="sortb"> 
<p style="line-height: 150%; margin: 5px">第<%=page%>页/共<%=totalpage%>页&nbsp;&nbsp;
<%if page-1>0 then%><a href="<%=filename%>?page=<%=page-1%>&order=<%=order%>&stype=<%=request("stype")%>">上一页</a><%else%>上一页<%end if%>&nbsp;&nbsp;
<%if page+1<=totalpage then%> <a href="<%=filename%>?page=<%=page+1%>&order=<%=order%>&stype=<%=request("stype")%>">下一页</a><%else%>下一页<%end if%>&nbsp;&nbsp;
页面跳转：<input type="text" name="page" value="<%=page+1%>" size="2" style="text-align: center" class=input> <input type="submit" value="GO" class=input><br>
选择页数：<%for i=1 to totalpage
if i=page then%>
<font color="#FF0000"><b><%=i%></b></font>
<%else%><a href="<%=filename%>?page=<%=i%>&order=<%=order%>&stype=<%=request("stype")%>"><%=i%></a>
<%end if
next%>
</td></tr></form><%end if
rs.close
set rs=nothing%></table>
</td></tr></table></div>
<!--#include file="copy.asp"-->