shangping_j.asp

网络商店源码 实现商品浏览 购物车 后台管理等

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%if fll=1 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
  <tr> 
    <td rowspan="4" valign="top" class="table-xia"> 
      <%if rs("shoppic")="" then %>
      <table width="100" height="100" border="1" align="center" cellpadding="0" cellspacing="5" bordercolor="#FFFFFF">
        <tr> 
            
          <td bordercolor="<%=flshpbj%>"> 
            <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src=images/emptyshop1.gif width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
          </tr>
        </table>
	<%else%>
      <div align="center">
        <table width="110" height="110" border="1" align="center" cellpadding="0" cellspacing="5" bordercolor="#FFFFFF">
          <tr> 
            <td bordercolor="<%=flshpbj%>"> 
              <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src="<%=trim(rs("shoppic"))%>"  width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
          </tr>
        </table>
        <%end if%>
      </div>
    </td>
    <td><a href=list.asp?id=<%=rs("shopid")%>><%=trim(rs("shopname"))%></a></td>
  </tr>
  <tr> 
    <td>市场价：<s><%=trim(rs("shichangjia"))%>元</s> 会员价：<%=trim(rs("huiyuanjia"))%>元 
      VIP价：<%=trim(rs("vipjia"))%>元 </td>
  </tr>
  <tr> 
    <td><a href="gouwu.asp?id=<%=rs("shopid")%>&action=add"><img src="images//gm.gif" border="0"></a><a href="shoucang.asp?id=<%=rs("shopid")%>&action=add"><img src="images//shc.gif" border="0"></a></td>
  </tr>
  <tr> 
    <td class="table-xia"> <font color="<%=flzhzt%>"> 
      <%if len(trim(rs("shopcontent")))>50 then
	response.write left(trim(rs("shopcontent")),50)&"...."
	else
	response.write trim(rs("shopcontent"))
	end if%>
      </font></td>
  </tr>
</table>
<%end if%><% if fll=2 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
  <tr> 
    <td valign="top" class="table-xia"> 
      <%if rs("shoppic")="" then %>
      <table width="100" height="100" border="1" align="center" cellpadding="0" cellspacing="5" bordercolor="#FFFFFF">
        <tr> 
          <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src=images/emptyshop1.gif width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
        </tr>
      </table>
      <%else%>
      <div align="center"> 
        <table width="110" height="110" border="1" align="center" cellpadding="0" cellspacing="5" bordercolor="#FFFFFF">
          <tr> 
            <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src="<%=trim(rs("shoppic"))%>"  width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
          </tr>
        </table>
        <%end if%>
      </div></td>
    <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="19"><a href=list.asp?id=<%=rs("shopid")%>><%=trim(rs("shopname"))%></a></td>
        </tr>
        <tr> 
          <td>市场价：<s><%=trim(rs("shichangjia"))%>元</s> 会员价：
            <%if Request.Cookies("snsn")("reglx")=2 then
				response.write "<font color=red>"&rs("vipjia")&" 元</font>"
				else
				response.write "<font color=red>"&rs("huiyuanjia")&" 元</font>"
				end if%>
          </td>
        </tr>
        <tr> 
          <td><a href="gouwu.asp?id=<%=rs("shopid")%>&action=add"><img src="images//gm.gif" border="0"></a><a href="shoucang.asp?id=<%=rs("shopid")%>&action=add"><img src="images//shc.gif" border="0"></a> 
          </td>
        </tr>
      </table></td>
  </tr>
</table>
<%end if%>
<% if fll=3 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
  <tr> 
    <td valign="top" class="table-xia"> 
      <%if rs("shoppic")="" then %>
      <table width="100" height="100" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
        <tr> 
          <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src=images/emptyshop1.gif width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
        </tr>
      </table>
      <%else%>
      <div align="center"> 
        <table width="100" height="100" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
          <tr> 
            <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src="<%=trim(rs("shoppic"))%>"  width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
          </tr>
        </table>
        <%end if%>
      </div></td>
    <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td>市场价：<s><%=trim(rs("shichangjia"))%>元</s> </td>
        </tr>
        <tr> 
          <td>
            <%if Request.Cookies("snsn")("reglx")=2 then
				response.write "会员价：<font color=red>"&rs("vipjia")&"元</font>"
				else
				response.write "会员价：<font color=red>"&rs("huiyuanjia")&"元</font>"
				end if%>
            </td>
        </tr>
        <tr> 
          <td><a href="gouwu.asp?id=<%=rs("shopid")%>&action=add"><img src="images//gm.gif" border="0"></a></td>
        </tr>
        <tr> 
          <td><a href="shoucang.asp?id=<%=rs("shopid")%>&action=add"><img src="images//shc.gif" border="0"></a> 
          </td>
        </tr>
      </table></td>
  </tr>
</table>
<%end if%>
<% if fll>3 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td valign="top" class="table-xia"> 
      <%if rs("shoppic")="" then %>
      <table width="95" height="95" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
        <tr> 
          <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src=images/emptyshop1.gif width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
        </tr>
      </table>
      <%else%>
      <div align="center"> 
        <table width="95" height="95" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
          <tr> 
            <td bordercolor="<%=flshpbj%>"> <div align="center"><a href=list.asp?id=<%=rs("shopid")%> <%if rs("sftc")="" then%><%else%> target=<%=rs("sftc")%><%end if%>><img src="<%=trim(rs("shoppic"))%>"  width=85 border=0 alt=<%=trim(rs("shopname"))%>></a></div></td>
          </tr>
        </table>
        <%end if%>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td align="center">市场价：<s><%=trim(rs("shichangjia"))%>元</s> </td>
          </tr>
          <tr> 
            <td align="center"> 
              <%if Request.Cookies("snsn")("reglx")=2 then
				response.write "会员价：<font color=red>"&rs("vipjia")&"元</font>"
				else
				response.write "会员价：<font color=red>"&rs("huiyuanjia")&"元</font>"
				end if%>
            </td>
          </tr>
          <tr> 
            <td align="center"><a href="gouwu.asp?id=<%=rs("shopid")%>&action=add"><img src="images//gm.gif" border="0"></a></td>
          </tr>
          <tr> 
            <td align="center"><a href="shoucang.asp?id=<%=rs("shopid")%>&action=add"><img src="images//shc.gif" border="0"></a> 
            </td>
          </tr>
        </table>
      </div></td>
  </tr>
</table>
<%end if%>