www.gusucode.com > 凡人网络购物系统 2008源码程序 > viewzp.asp
<!--#include file="conn.asp"--> <% zp_id=request("zp_id") chkid(zp_id) set rs=conn.execute("select zp_name,zp_price from venshop_zp where zp_id="&zp_id&"") if not rs.eof then zp_name=rs("zp_name") zp_price=rs("zp_price") szp_id=1 else szp_id=0 end if rs.close set rs=nothing %> <!--#include file="IncAsp/venshop_top.asp"--> <div align="center"> <table width=980 border=0 cellpadding=0 cellspacing=0 bgcolor="#FFFFFF"> <tr><td width=197 align="center" valign="top"> <!--#include file="IncAsp/venshop_log.asp"--><div class="d5"></div></td> <td valign="top" align="center"> <%Set rs= Server.CreateObject("ADODB.Recordset") sql="select * from venshop_zp where zp_id="&zp_id&"" rs.open sql,conn,1,3 if rs.eof then%> <TABLE width="99%" border=0 cellPadding=0 cellSpacing=0><tr><td height="200" colspan="3" align="center"> 没有找到你要查看的商品,您可以<a href="search.asp"><font color="#FF0000">点击这里进行详细搜索</font></a>!</td></tr></table> <%else rs("zp_views")=rs("zp_views")+1 rs.update%> <TABLE width="99%" border=0 cellPadding=0 cellSpacing=0> <tr><td class="sort"> <IMG src="Skin/<%=venshop_skin%>/home.gif" border=0 align="absmiddle"> 您的位置: <a href="index.asp">首页</a> >> <a href="zp.asp">赠品</a> >> <%=rs("zp_name")%></td> </tr></table> <table width="99%" cellspacing="0" cellpadding="0"> <tr><td align="center" height="2"></td></tr> <tr><td align="center"> <table cellspacing="0" cellpadding="5" width="100%"><tr> <td align="center" style="border-right: 1px dotted #C0C0C0"> <img style="CURSOR: hand" src="<%=rs("zp_pic")%>" onerror="this.src='img/noimage.jpg';" onclick="javascript:window.open('<%=rs("zp_pic")%>','','')" border="0"<%=view_wh%>> </td> <td valign="top" width="300"> <table border="0" cellpadding="3" cellspacing="0" id="table1" width="280"> <tr><td class="vtitle"><%=rs("zp_name")%></td></tr> <tr><td height=1 style="background-color:#C2C2C2;"></td></tr> <tr><td height=5></td></tr> <tr><td><b>市场价格:</b><s><%=fuhao%> <%=trim(rs("zp_price"))%> <%=danwei%></s></td></tr> <tr><td><b>赠送条件:</b>单个订单<span style="font-size: 13px; color: #FF0000; font-weight: bold"> 满<%=fuhao%> <%=trim(rs("zp_full"))%> <%=danwei%> </span>即可获赠!</td></tr> <tr><td><b>剩余数量:</b><%=trim(rs("zp_kucun"))%> (送完即止!)</td></tr> <tr><td><b>浏览次数:</b><%=trim(rs("zp_views"))%></td></tr> <tr><td height=5></td></tr> <tr><td height=1 style="background-color:#C2C2C2;"></td></tr> <tr><td height=5></td></tr> <tr> <td><table border="0" cellpadding="0" cellspacing="0" width="98%" height="50"><tr> <td valign="top" style="line-height: 200%"><%=rs("zp_content")%></td></tr></table></td></tr> <tr><td height=5></td></tr> <tr><td height=1 style="background-color:#C2C2C2;"></td></tr> <tr><td height=5></td></tr> <tr><td height=20><a href="cash.asp">去结算中心选择赠品>></a></td></tr> <tr> <td><%Set rs2=Server.CreateObject("ADODB.Recordset") rs2.open "select top 1 zp_id,zp_name from venshop_zp where zp_id>"&zp_id&" order by zp_id asc",conn,1,1 if rs2.eof and rs2.bof then response.write "" else%> <p style="margin-top: 3px; margin-bottom: 3px"><b>上一个商品:</b><a href=viewzp.asp?zp_id=<%=rs2("zp_id")%>><%=rs2("zp_name")%></a> <%end if rs2.close set rs2=nothing%> <%Set rs2=Server.CreateObject("ADODB.Recordset") rs2.open "select top 1 zp_id,zp_name from venshop_zp where zp_id<"&zp_id&" order by zp_id desc",conn,1,1 if rs2.eof and rs2.bof then response.write "" else%> <p style="margin-top: 3px; margin-bottom: 3px"><b>下一个商品:</b><a href=viewzp.asp?zp_id=<%=rs2("zp_id")%>><%=rs2("zp_name")%></a> <%end if rs2.close set rs2=nothing%></td></tr> </table> </td></tr> </table> </td> </tr></table><%end if rs.close%> </td></tr></table></div><!--#include file="IncAsp/venshop_copy.asp"-->