productlist11.asp

来自「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 135 行

<table width="520" border="0" cellspacing="0" cellpadding="3" align="center">                 
<tr>
<td height="10"></td>
</tr>
<%                
sql="select  hw_id,hw_name,hw_cash,hw_cash1,hw_cash2,hw_cash3,hw_pic from hw where hw_jp=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 %>                       
<tr>                
<td width="90" valign="top">                 
<table width="89" border="0" cellspacing="0" cellpadding="0" height="107"  background="images/prup.gif" >

<td><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><p align="center"><img border="0" src="picture/<%=rs("hw_pic")%>" width="65" height="65" align="center"></a></td>
</tr>


</table>                 
</td>                 
<td valign="top" width="157">                 
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="93">                 
<tr>                 
<td><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><font color="#FF0000">
<p style="line-height: 150%"><%=rs("hw_name")%></font></a><br>
<%typp=rs("hw_cz")
select case typp
    case 0
      hh="在线取卡"
    case 1
      hh="充值商品"    
   end select
%>                
<font color="#008000">卡类型：</font><font color="#FF0000"><%=hh%></font><br>                 
<font color="#008000">市场价：</font><s>￥<%=rs("hw_cash")%></s><br>
<%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="#008000"><%=session("user_vip")%>价：</font><font color="#FF0000"><b>￥<%=h2%></b></font>  
<%else%>
<font color="#008000">普通会员价：</font><font color="#FF0000"><b>￥<%=rs("hw_cash1")%></b></font> 
<%end if%>        
</td>                      
</tr>
<tr>
		<td height="25"><table width="75"  border="0" cellspacing="0" cellpadding="0">
				<tr>
					<td width="75" height="25" background="./images/shouye.gif" align="center"><a href=basket.asp?hw_id=<%=rs("hw_id")%>><font color="#FF0000">立刻购买</a></a></td>
				</tr>
		</table></td>
</tr>
</table>
</td>





                
<% rs.movenext %>
<%if not rs.eof then%>               
<td width="62" height="100" valign="top"> 
<table width="89" border="0" cellspacing="0" cellpadding="0" height="107"  background="images/prup.gif" >
<tr>
<td><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><p align="center"><img border="0" src="picture/<%=rs("hw_pic")%>" width="65" height="65" align="center"></a></td>
</tr>


</table>              
</td>                 
<td valign="top" width="157">                 
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="91">                 
<tr>                 
<td><a href="basket.asp?hw_id=<%=rs("hw_id")%>"><font color="#FF0000">
<p style="line-height: 150%"><%=rs("hw_name")%></font></a><br>
<%typp=rs("hw_cz")
select case typp
    case 0
      hh="在线取卡"
    case 1
      hh="充值商品"    
   end select
%>                
<font color="#008000">卡类型：</font><font color="#FF0000"><%=hh%></font><br>                 
<font color="#008000">市场价：</font><s>￥<%=rs("hw_cash")%></s><br>
<%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="#008000"><%=session("user_vip")%>价：</font><font color="#FF0000"><b>￥<%=h2%></b></font>  
<%else%>
<font color="#008000">普通会员价：</font><font color="#FF0000"><b>￥<%=rs("hw_cash1")%></b></font> 
<%end if%>
</td>                  
</tr>                  
<tr>
		<td height="25"><table width="75"  border="0" cellspacing="0" cellpadding="0">
				<tr>
					<td width="75" height="25" background="./images/shouye.gif" align="center"><a href=basket.asp?hw_id=<%=rs("hw_id")%>><font color="#FF0000">立刻购买</a></a></td>
				</tr>
		</table></td>
</tr>                 
</table>                 
</td>                
</tr><%
i=i+1
rs.movenext                 
else
%> 
<td width="81" valign="top"> </td>
<td width="125" valign="top"> </td>
<%
end if
loop %>       
                
<%rs.close
%>
</table>