56770_tjcsort.asp

来自「能进行网上购物的需求」· ASP 代码 · 共 52 行

<table cellspacing=0 cellpadding=0 width="100%">
<tr>
		<td colspan="3"><img src="images/top/softwareupper.gif" border="0"></td>
	</tr>
</table>
<table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td width="1" bgcolor="#CCCCCC"><img src="images/space.gif" width="1" height="1" border="0"></td>
<td>
<table width="576" border="0" cellpadding="0" cellspacing="0" align="center">
<tr>
<%
set rs=server.CreateObject("adodb.recordset")
if request("cysort_id")<>"" then
sql="select top 6 * from 56770_product where sort_name="&request("sort_id")&" and csort_name="&request("csort_id")&" and cxsort_name="&request("cxsort_id")&" and cysort_name="&request("cysort_id")&" and ytj=true order by id DESC"
else
sql="select top 6 * from 56770_product where sort_name="&request("sort_id")&" and csort_name="&request("csort_id")&" and  cxsort_name="&request("cxsort_id")&" and ytj=true order by id DESC"
rs.open sql, conn, 1, 1
if rs.eof then
        response.write "目前没有推荐商品"
else
        do while not rs.eof
if request("LAN")="english" then 
pp=rs("product_ename")
elseif request("LAN")="fan" then 
pp=rs("product_fname")
else
pp=rs("product_name")
end if
%>
<td align="center">

<table border="0" cellspacing="1" cellpadding="0"  align="left" width="94">
<tr>
<td align="center" width="94"><a href="showproduct.asp?lan=<%=request("lan")%>&id=<%=rs("id")%>"><img border=0 height=96 src="pic/<%=rs("pic")%>" alt="<%=rs("pp")%>" width=94></a></td>
</tr>
</table>
</td>
<%
rs.movenext
loop
end if
end if
rs.close
set rs=nothing%></tr>
</table>
</td><td width="1" bgcolor="#CCCCCC"><img src="images/space.gif" width="1" height="1" border="0"></td>
</tr><tr>
		<td colspan="3"><img src="images/top/storelower.gif" height="9" border="0"></td>
	</tr>
</table>