| 发表于：2008-01-16 22:26:34 楼主 |
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<title> <%=webname%> </title>
<!--#include file="include/header.asp"-->
<meta name="abstract" content="the website was designed by xiy a.n et">
<meta name="copyright" content="copyright 2005-2008 xiya.cn all rights reserved">
<%
dim strmarkname
strmarkname=trim（formatsql（saferequest（"markname",0)))
set rs=server.createobject（"adodb.recordset")
%>
<table width="864" border="0" cellspacing="0" cellpadding="0" class=table-zuoyou align="center" bgcolor="#ffffff">
<tr> <td height="30" bgcolor=" <% = bgclr1 %> " width="75" class=table-xia> <font color="#000000"> <b> 您的位置： </b> </font> </td>
<td bgcolor="#ffffff" class=table-xia> <a href="index.asp"> <b> <%=webname%> </b> </a> -> <a href="mark.asp?markname= <% = strmarkname %> "> <font color="#ff6600"> <b> <% = strmarkname %> </b> </font> </a>
<%
rs.open "select markid,markname from sia_mark order by marknum",conn,1,1
if rs.eof and rs.bof then
response.write " <tr> <td align=center background=images/bg12.gif> 还没有定义商品品牌 </td> </tr> "
else
do while not rs.eof
response.write " <a href=mark.asp?markname="&rs（"markname")&"> 【"&rs（"markname")&"】 </a> "
rs.movenext
loop
end if
rs.close
%>
</td> </tr> </table>
<table width="864" border="0" cellspacing="0" cellpadding="0" align="center" class=table-zuoyou>
<tr> <td height="200" valign="top">
<%
const maxperpage=10
dim totalput
dim currentpage
dim totalpages
dim j
dim sql
if not isempty（saferequest（"page",1)) then
currentpage=cint（saferequest（"page",1))
else
currentpage=1
end if
rs.open "select id,prename,name,company,intro,introduce,predate,productdate,pretype,type,viewnum,price,price1,price2,other,grade,discount,pic,mark from sia_product where mark like '%"&strmarkname&"%' order by adddate desc",conn,1,1
if err.number <> 0 then
response.write " <p align='center'> 数据库中暂时无数据 </p> "
end if
if rs.eof and rs.bof then
response.write " <p align='center'> 对不起，目前还没有这种商品！ </p> "
else
totalput=rs.recordcount
if currentpage <1 then
currentpage=1
end if
if （currentpage-1)*maxperpage> totalput then
if （totalput mod maxperpage)=0 then
currentpage= totalput \ maxperpage
else
currentpage= totalput \ maxperpage + 1
end if
end if
if currentpage=1 then
showcontent
showpage totalput,maxperpage,"mark.asp"
else
if （currentpage-1)*maxperpage <totalput then
rs.move （currentpage-1)*maxperpage
dim bookmark
bookmark=rs.bookmark
showcontent
showpage totalput,maxperpage,"mark.asp"
else
currentpage=1
showcontent
showpage totalput,maxperpage,"mark.asp"
end if
end if
end if
sub showcontent
dim i
i=0
%>
<%do while not rs.eof%>
<table width="96%" border="0" align="center" cellpadding="1" cellspacing="1">
<tr>
<td width="20%" rowspan="8" align="center"> <table width="100" height="100" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100" bgcolor="#ffffff" align="center"> <a href=product.asp?id= <% = rs（"id") %> target="_blank">
<% if trim（rs（"pic")) <> "" then %>
<img src= <% = trim（rs（"pic"))%> border=0 width=" <% = webimg9 %> " height=" <% = webimg10 %> "> </a>
<% else %>
<img src=images/emptybook.jpg border=0 width=" <% = webimg9 %> " height=" <% = webimg10 %> ">
<% end if %> </td>
</tr>
</table> </td>
<td colspan="4"> <%=trim（rs（"prename"))%> <a href=product.asp?id= <%=rs（"id")%> > <font color="#ff6600"> <%=trim（rs（"name"))%> </font> </a> </td>
</tr>
<tr>
<td colspan="4"> <%=trim（rs（"company"))%> <a href=mark.asp?markname= <% = rs（"mark") %> > <font color="#ff6600"> <% = rs（"mark") %> </font> </a> </td>
</tr>
<tr>
<td colspan="4"> <%=trim（rs（"intro"))%> <%=trim（rs（"introduce"))%> </td>
</tr>
<tr>
<td width="21%"> <%=trim（rs（"predate"))%> <%=trim（rs（"productdate"))%> </td>
<td width="21%"> 浏览次数： <%=trim（rs（"viewnum"))%> </td>
<td width="18%"> <%=trim（rs（"pretype"))%> <%=trim（rs（"type"))%> </td>
<td width="20%"> <%=trim（rs（"other"))%> <%=trim（rs（"grade"))%> </td>
</tr>
<tr>
<td> <%=trim（rs（"price"))%> <%=rs（"price1")%> 元 </td>
<td> 会 员 价： <font color="#ff6600"> <%=rs（"price2")%> 元 </font> </td>
<td> 折 扣： <%=rs（"discount")*100&"%"%> </td>
<td> 节 省： <font color="#ff6600"> <%=rs（"price1")-rs（"price2")%> </font> 元 </td>
</tr>
<tr>
<td> </td>
<td> <a href="cart.asp?id= <%=rs（"id")%> "> <img src=images/skin/default/cart.gif width=65 height=20 align=absmiddle border=0> </a> </td>
<td> <a href=# onclick="javascript:window.open（'addto.asp?id= <% = rs（"id") %> &action=add','','width=630,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"> <img src=images/skin/default/addto.gif width=65 height=20 align=absmiddle border=0> </a> </td>
<td> </td>
</tr>
</table>
<table width="98%" align="center"> <tr>
<td class=table-xia> </td>
</tr> </table>
<%i=i+1
if i> =maxperpage then exit do
rs.movenext
loop
rs.close
set rs=nothing%>
<%
end sub
function showpage（totalnumber,maxperpage,filename)
dim n
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if %>
<form method=post action= <%=filename%> ?&markname= <% = strmarkname %> >
<p align="center">
<%
if currentpage <2 then %>
首 页 上一页
<% else %>
<a href= <% = filename %> ?page=1&markname= <% = strmarkname %> > 首 页 </a>
<a href= <% = filename %> ?page= <% = currentpage-1 %> &markname= <% = strmarkname %> > 上一页 </a>
<% end if
if n-currentpage <1 then %>
下一页 末 页
<% else %>
<a href= <% = filename %> ?page= <% = （currentpage+1) %> &markname= <% = strmarkname %> > 下一页 </a>
<a href= <% = filename %> ?page= <% = n %> &markname= <% = strmarkname %> > 末 页 </a>
<% end if %>
第 <b> <% = currentpage %> </b> 页 共 <b> <% = n %> </b> 页
共 <b> <% = totalnumber %> </b> 件商品 每页 <b> <% = maxperpage %> </b> 件商品
转到第： <input type='text' name='page' size=2 maxlength=10 class=smallinput value= <% = currentpage %> >
页 <input type='submit' class='contents' value='跳转' name='cndok'> </form>
<%
end function
%>
</td>
</tr>
</table>
<!--#include file="include/footer.asp"-->
懂的好心朋友直接帮我改一下好吗》本人是菜鸟不是很懂。谢谢了！！！拜托了》》》》 |
|
|
|
|
