📄 b2b_indexcp1.asp
字号:
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<%
rs.open "select top 15 id,name,pic,price1,price2,adddate,stock,spic from product where stock >= 0 and (recommend<>3 and recommend = 1) order by adddate desc",conn,1,1
if rs.eof and rs.bof then
rs.close
response.write "<table CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH=""100%""><tr><td align=center>对不起，请您先到后台添加商品！</td></tr></table>"
else
%>
<style type="text/css">
<!--
.style1 {color: #999999}
.style2 {color: #000000}
.unnamed1 { text-decoration: none;
}
-->
</style>
<body><TABLE cellSpacing=4 cellPadding=7 width=564 align=center border=0>
<TBODY>
<% dim j
j=0
do while not rs.eof %>
<%if j>=5 then exit do%>
<TD align=center valign="top" border="0">
<TABLE cellSpacing=0 cellPadding=0 width="130" border=0>
<TBODY>
<tr><td height="130" width="130" align="center" background="images/itembg.jpg">
<A HREF=b2b_cpinfo.asp?id=<%=rs("id")%> TARGET=_blank>
<IMG SRC=<%if trim(rs("spic"))="" then %>
images/emptybook.gif
<% else %>
image\<% = trim(rs("spic")) %>
<% end if%> BORDER=0 width="<% = webimg9 %>" height="<% = webimg10 %>"></A></td></tr>
<TR>
<TD align="center"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><%=trim(rs("name"))%></td>
</tr>
</table></TD>
</TR>
<% if rs("stock") > 0 then %><TR height=20>
<TD align=center><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><span class="unnamed1 style1">市场价</span>:<span class="style1"><%=trim(rs("price1"))%>元</span><br>
会员价:<%=trim(rs("price2"))%>元</td>
</tr>
</table></TD>
</TR>
<% else %>
<tr><td align="center"><font color="#FF6600">暂时缺货</font></td></tr>
<% end if %>
</TBODY>
</TABLE></TD>
<% rs.movenext
j=j+1
if rs.eof then
exit do
end if
loop %> </TR>
<%
rs.absoluteposition=6
j=5 %>
<TR>
<%
do while not rs.eof
if j>=10 then exit do
%>
<TD align=center valign="top" border="0">
<TABLE cellSpacing=0 cellPadding=0 width="130" border=0>
<TBODY>
<tr><td height="130" width="130" align="center" background="images/itembg.jpg">
<A HREF=b2b_cpinfo.asp?id=<%=rs("id")%> TARGET=_blank>
<IMG SRC=<%if trim(rs("spic"))="" then %>
images/emptybook.gif
<% else %>
image\<% = trim(rs("spic")) %>
<% end if%> BORDER=0 width="<% = webimg9 %>" height="<% = webimg10 %>"></A></td></tr>
<TR align="center">
<TD><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><%=trim(rs("name"))%></td>
</tr>
</table></TD>
</TR>
<TR height=20>
<TD align=center><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><span class="unnamed1 style1">市场价</span>:<span class="style1"><%=trim(rs("price1"))%>元</span><br>
会员价:<%=trim(rs("price2"))%>元</td>
</tr>
</table></TD>
</TR>
<% if rs("stock") > 0 then %>
<% else %>
<tr><td align="center"><font color="#FF6600">暂时缺货</font></td></tr>
<% end if %>
</TBODY>
</TABLE></TD>
<% rs.movenext
j=j+1
if rs.eof then
exit do
end if
loop %>
</TR>
<%
rs.absoluteposition=11
j=11 %>
<tr>
<%
do while not rs.eof
if j>=16 then exit do
%>
<td align="center" valign="top"><TABLE cellSpacing=0 cellPadding=0 width="130" border=0>
<TBODY>
<tr>
<td height="130" width="130" align="center" background="images/itembg.jpg"><A HREF=b2b_cpinfo.asp?id=<%=rs("id")%> TARGET=_blank> <IMG SRC=<%if trim(rs("spic"))="" then %>
images/emptybook.gif
<% else %>
image\<% = trim(rs("spic")) %>
<% end if%> BORDER=0 width="<% = webimg9 %>" height="<% = webimg10 %>"></A></td>
</tr>
<TR align="center">
<TD><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><%=trim(rs("name"))%></td>
</tr>
</table></TD>
</TR>
<% if rs("stock") > 0 then %>
<TR height=20>
<TD align=center><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td align="center"><span class="unnamed1 style1">市场价</span>:<span class="style1"><%=trim(rs("price1"))%>元</span><br>
会员价:<%=trim(rs("price2"))%>元</td>
</tr>
</table></TD>
</TR>
<% else %>
<tr>
<td align="center"><font color="#FF6600">暂时缺货</font></td>
</tr>
<% end if %>
</TBODY>
</TABLE></td>
<% rs.movenext
j=j+1
if rs.eof then
exit do
end if
loop %>
</tr><%
rs.close
%>
<% end if %>
</TBODY></TABLE>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -