nsort.asp

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

<!--#include file="top.asp"-->
<%If Not(isNumeric(nsort_id)) or nsort_id="" or nsort_id=0 Then
response.write "<script language=javascript>alert('Url处理出错！');history.go(-1);</script>"
response.End
End If%><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="innsort.asp"--><!--#include file="inpinpai.asp"--><script language="javascript" src="inven.asp?ven_id=1"></script>
<!--#include file="inph.asp"--></td><td width="5"> 
　</td><td valign="top" align="center"> 
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<%set rs=server.createobject("adodb.recordset")
sql="select  * from venshop_logo where nsort="&nsort_id&""
rs.open sql,conn,1,1
do while not rs.eof
%><tr><td align="center"><p style="margin: 2px"><a href="<%=rs("url")%>"target="_blank"><img src="<%=rs("banner")%>" width="750" border="0" height="80"></a></td></tr><%rs.movenext
loop
rs.close
set rs=nothing
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 order="time" then
orderx="hw_id desc"
elseif order="hot" then
orderx="hw_buys desc,hw_id desc"
elseif order="price1" then
orderx="trim(hw_price2) asc"
elseif order="price1" then
orderx="trim(hw_price2) desc"
else
orderx="hw_xu desc"
end if
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_hw where hw_kucun>0 and nsort_id="&nsort_id&" 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;<a href="sort.asp?sort_id=<%=sort_id%>"><b><%=sort_name%></b></a> - <font color="#FF0000"><%=Nsort_name%></font>
共<%=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%>?nsort_id=<%=nsort_id%>&order=<%=order%> method=post><tr>
<td class="sortb" height="2"></td></tr>
<tr><td class="sortb"> 
<p style="line-height: 150%; margin: 5px">第<%=page%>页/共<%=totalpage%>页&nbsp;&nbsp;
<%if page-1>0 then%><a href="<%=filename%>?nsort_id=<%=nsort_id%>&page=<%=page-1%>&order=<%=order%>">上一页</a><%else%>上一页<%end if%>&nbsp;&nbsp;
<%if page+1<=totalpage then%> <a href="<%=filename%>?nsort_id=<%=nsort_id%>&page=<%=page+1%>&order=<%=order%>">下一页</a><%else%>下一页<%end if%>&nbsp;&nbsp;
页面跳转：<input type="text" name="page" value="<%=page+1%>" size="1" 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%>&nsort_id=<%=sort_id%>&order=<%=order%>"><%=i%></a>
<%end if
next%></td></tr></form><%end if
rs.close
set rs=nothing%></table>
</td></tr></table></div><!--#include file="copy.asp"-->