56770_cxtj.asp

能进行网上购物的需求

<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">
<%if request("LAN")="english" then 
response.write("Promote products") 
elseif request("LAN")="fan" then 
 response.write("最新特價商品") 
 else
 response.write("最新特价商品") 
end if%></td></tr>
<tr>
<td>
<TABLE border="0" cellpadding=0 width="100%" align="center">
<%
sql="select top 8 * from 56770_product where cx=true order by id DESC"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql, conn, 1, 1
i=1
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 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?lan=<%=request("lan")%>&id=<%=rs("id")%>"><img border="0" src="pic/<%=rs("pic")%>" width="80" height="80" vspace="2" hspace="2" alt="<%=pp%>"></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?lan=<%=request("lan")%>&id=<%=rs("id")%>" title="<%=pp%>"><%=left(pp,6)%></a>
</TD>
</tr>
</table>
</td>

<%if i mod 4=0 then
response.write"<tr>"
end if
rs.movenext
i=i+1
loop
rs.close
%>
</table>
</td></tr></table>