goods_list.asp

商业网站/图片管理系统/投票系统/新闻管理系统/

<!--#include file="top1.asp"-->
<%dim db
db=1
%>
<!--#include file="config/db.asp"-->
<!--#include file="config/function.inc.asp"-->
<%
dim sql,rst,sql1,rst1,myErrors,rid,col,i
set rst=server.createobject("adodb.recordset")
'set rst1=server.createobject("adodb.recordset")
rid=request.querystring("id")
%>


<link href="css/mycss.css" rel="stylesheet" type="text/css">
<div align="center"></div>
<div align="center">
	<table width="780" height="341" border="0" cellpadding="0" cellspacing="0">
		<tr>
			<td width="13" height="20" background="images/v_bar_l.gif">&nbsp;</td>
			<td style="background:#FFFFCC;" width="754" height="20" class="bottomcolor">
			<%
			sql="select * from shop_goodsclass where gc_upid<>0"
			rst.open sql,conn,1,1
			do while not rst.eof
				response.write("&nbsp;&nbsp;<a href='goods_list.asp?id="&rst("gc_id")&"'>"&rst("gc_name")&"</a>&nbsp;&nbsp;")
				rst.movenext
			loop
			rst.close
			%>
			</td>
			<td width="13" height="20" background="images/v_bar_r.gif">&nbsp;</td>
		</tr>
		<tr>
			<td width="13" height="266" background="images/v_bar_l.gif">&nbsp;</td>
			<td style="background:#FFFFFF;" width="754" valign="top">
			<% 
			if not isnumeric(rid) or isempty(rid) then
				sql="select * from shop_goods where gds_gcid<>0 order by gds_id desc"
			else
				sql="select * from shop_goods where gds_gcid=" & rid 
			end if
			rst.open sql,conn,1,1
			
			%>
			<table width="752" height="139" border="0" align="left" cellpadding="0" cellspacing="0">
			<%do while not rst.eof
			col=1%>
					<tr>
						<% do while not rst.eof and col<4 %>
						<td width="236" height="137" align="left" valign="middle">
						<table width="234" height="135" border="0" align="left" cellpadding="0" cellspacing="0">
							<tr>
								<td width="13" height="15">&nbsp;</td>
								<td width="97" height="15">&nbsp;</td>
								<td width="124" height="15">&nbsp;</td>
							</tr>
							<tr>
								<td width="13" height="120">&nbsp;</td>
								<td width="97" height="120" bgcolor="#FFFFEE" style="border:1px; border-style:solid; border-color:#999999;"><a href="showgoods.asp?id=<%=rst("gds_id")%>"><Img src="upfile/<%=rst("gds_image")%>" border="0" onload="javascript:if(this.style.width>97);this.style.width=91;" /></a></td>
								<td width="124" height="120" align="left" valign="top">品名：<%=rst("gds_name")%><br>
									价格：￥：元<br>
									VIP：￥：元<br>
									简介：<br>
									&nbsp;&nbsp;&nbsp;&nbsp;<%=cutstr(rst("gds_intro"),20,"...")%></td>
							</tr>
						</table>
						</td>
						<% 
							col=col+1
							rst.movenext
						loop
						'补齐剩余列
						for i=col to 3
							response.write("<td width='236'>&nbsp;</td>")
						next
						 %>
					</tr>
					<%  
				loop
				rst.close
				%>
				</table>
			</td>
			<td width="13" background="images/v_bar_r.gif">&nbsp;</td>
		</tr>
		<tr>
			<td width="13" height="20" background="images/v_bar_l.gif">&nbsp;</td>
			<td width="754" height="20" bgcolor="#FFFFF0" class="bottomcolor">&nbsp;</td>
			<td width="13" height="20" background="images/v_bar_r.gif">&nbsp;</td>
		</tr>
	</table>
</div>
<%
set rst=nothing
conn.close
set conn=nothing
%>
<!--#include file="bottom1.asp"-->