productlist.asp

国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测试

<%                
sql="select top 6 * from hw where hw_xp=true order by  hw_id  DESC"
rs.open sql,conn,3,3                
if rs.eof then                
%>
暂且没有商品<%end if %>
<%
i=0
do while not rs.eof %>                         
<table width="99%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<table border="0" width="100%"  cellspacing="0" cellpadding="0">
  <tr>
    <td width="5%" rowspan="2"><img border="0" src="images/bottom1.jpg" width="5" height="10"></td>
    <td width="95%" colspan="3" ><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><font color="#FF0000"><%=rs("hw_name")%></font></td>
  </tr>
  <tr>
    <td width="27%" ><font color="#008000">优惠价：</font></td>
    <td width="47%" ><font color="#008000"><s>￥<%=rs("hw_cash")%></s></font>
<%vip=session("user_vip")
select case vip
case "普通会员"
  h2=rs("hw_cash1")
case "VIP会员"
  h2=rs("hw_cash2")
case "经销商会员"
  h2=rs("hw_cash3")     
end select
%>
<%if session("user_name")<>"" then%>
<font color="#FF0000">/￥<%=h2%></font>
<%else%>
<font color="#FF0000">/￥<%=rs("hw_cash1")%></font>
<%end if%>
    </td>
    <td width="17%" ><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><font color="#ff0000">购买</font><a></td>
  </tr>
</table>
<font color=#808080>------------------------------</font>
</td>
</tr>
<%
i=i+1
rs.movenext
loop 
%>
                
<%rs.close
%>
<tr>
<td align="right" colspan="2"><a href="quickbuy.asp">更多&gt;&gt;&gt;</a></td>
</tr>
</table>