56770_sytj.asp111.txt

来自「能进行网上购物的需求」· 文本 代码 · 共 92 行

<TABLE class="bg_l" border="0" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC" cellpadding=0 width="100%" align="center">
<TR><td height="25" CLASS="navtablehead"  colspan="2" style="BORDER-bottom: #999999 1px dotted">精品推荐</td></tr>
<tr>
<td>
<TABLE border="0" cellpadding=0 width="100%" align="center">
<%
sql="select top 8 * from 56770_product where stj=true order by id DESC"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql, conn, 1, 1
do while not rs.eof
%>

<tr>
<td width="25%" align=middle>
<table width="100%">
<tr>
<TD align=middle colSpan=2 height=80 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>"><img border="0" src="pic/<%=rs("pic")%>" width="80" height="80" vspace="2" hspace="2" alt="<%=rs("product_name")%>"></a>
</TD>
</tr>
<tr>
<TD align=middle colSpan=2 height=20 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>" title="<%=rs("product_name")%>"><%=left(rs("product_name"),6)%></a>
</TD>
</tr>
</table>
</td>
<%
rs.movenext
if rs.eof or rs.bof then
        response.write "<td width='210'></td>"
exit do
end if
%>
<td width="25%" align=middle>
<table width="100%">
<tr>
<TD align=middle colSpan=2 height=80 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>"><img border="0" src="pic/<%=rs("pic")%>" width="80" height="80" vspace="2" hspace="2" alt="<%=rs("product_name")%>"></a>
</TD>
</tr>
<tr>
<TD align=middle colSpan=2 height=20 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>" title="<%=rs("product_name")%>"><%=left(rs("product_name"),6)%></a>
</TD>
</tr>
</table>
</td>
<%
rs.movenext
if rs.eof or rs.bof then
        response.write "<td width='210'></td>"
exit do
end if
%>
<td width="25%" align=middle>
<table width="100%">
<tr>
<TD align=middle colSpan=2 height=80 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>"><img border="0" src="pic/<%=rs("pic")%>" width="80" height="80" vspace="2" hspace="2" alt="<%=rs("product_name")%>"></a>
</TD>
</tr>
<tr>
<TD align=middle colSpan=2 height=20 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>" title="<%=rs("product_name")%>"><%=left(rs("product_name"),6)%></a>
</TD>
</tr>
</table>
</td>
<%
rs.movenext
if rs.eof or rs.bof then
        response.write "<td width='210'></td>"
exit do
end if
%>
<td width="25%" align=middle>
<table width="100%">
<tr>
<TD align=middle colSpan=2 height=80 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>"><img border="0" src="pic/<%=rs("pic")%>" width="80" height="80" vspace="2" hspace="2" alt="<%=rs("product_name")%>"></a>
</TD>
</tr>
<tr>
<TD align=middle colSpan=2 height=20 width="100%" style="border-collapse: collapse;border:dotted 1px" bordercolor="#CCCCCC"><a href="showproduct.asp?id=<%=rs("id")%>" title="<%=rs("product_name")%>"><%=left(rs("product_name"),6)%></a>
</TD>
</tr>
</table>
</td>
</tr>
<%
rs.movenext

loop
rs.close
%>
</table>
</td></tr></table>