shopssme.asp

来自「NT80购物系统1.0 系统说明： 1 界面美观大方」· ASP 代码 · 共 54 行

<!--#include file="nt80.inc"--><!--#include file="conn.asp"-->

<title><%=name%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><LINK href="style.css" rel=Stylesheet type=text/css>

<table width="361" border="0" cellspacing="0" cellpadding="0" height="29" bgcolor="#F3F3F3">
  <tr> 
    <td height="30" width="62">购买人</td>
    <td height="30" width="44">总价</td>
    <td height="30" width="38">数量</td>
    <td height="30" width="83">支付方式</td>
    <td height="30" width="66">时间</td>
    <td height="30" width="68">&nbsp;</td>
  </tr>
  <tr> 
    <td height="1" bgcolor="#CCCCCC" width="62"></td>
    <td height="1" bgcolor="#CCCCCC" width="44"></td>
    <td height="1" bgcolor="#CCCCCC" width="38"></td>
    <td height="1" bgcolor="#CCCCCC" width="83"></td>
    <td height="1" bgcolor="#CCCCCC" width="66"></td>
    <td height="1" bgcolor="#CCCCCC" width="68"></td>
  </tr>
  <% set rs=server.createobject("adodb.recordset")
	  sql="SELECT * from shop where sname='"&request("sname")&"' order by time desc"
	  
      rs.open sql,conn,1,3 
	  for x=1 to int(rs.recordcount)
	  %>
  <tr> 
    <td width="62" height="10"><%=rs("name")%> </td>
    <td width="44" height="10"><font color="#990000"><%=rs("jiage")%>/元</font></td>
    <td width="38" height="10"><%=rs("shu")%></td>
    <td width="83" height="10"> 
      <% if rs("zhifu")=1 then %>
      <font color="#990000">定单购买</font> 
      <% else %>
      在线支付 
      <% end if %>
    </td>
    <td width="66" height="10"><%=rs("time")%></td>
    <td width="68" height="10"> 
      <% if rs("ding")=0 then %>
      正处理 
      <% else %>
      <font color="#990000">已完成</font> 
      <% end if %>
    </td>
    <% rs.movenext
	next %>
  </tr>
</table>
</body>
</html>