⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 网络购物
💻 ASP
字号:
<%
'=========================================
'
'         凡人网络购物系统V4.0免费版
'    FreeDown.Net info@freedown.net 
'            www.freedown.net
'     版权所有·免费版仅供研究测试只用
'            商业使用请购买正版
'
'=========================================
%>
<!--#include file="top.asp"-->
<div align="center">
  <center>
<table width="778" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
  <tr> 
    <td width="181"  valign="top"> 
<!--#include file="log.asp"-->
<!--#include file="gg.asp"-->   
<!--#include file="insearch.asp"-->  
<!--#include file="insort.asp"-->        
    </td>
    <td valign="top">

<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
    <tr><td align="center" height="5"></td></tr>
    <tr>
      <td width="100%" align="center"><%set ad=server.CreateObject("adodb.recordset")
          sql="select  * from logo  "
            ad.open sql,conn,1,1
            if ad.eof or ad.bof then
			        
                    response.write "暂且没有广告"         
                end if
            %><a href="<%=ad("url")%>"target="_blank"><img src="<%=ad("banner")%>" width="395" height="118" border="0"></a></td>
    </tr>
  </table>
  </center>
</div>
<table width="95%" border="0" cellspacing="0" cellpadding="0" height="60"  align="center">
        <tr><td align="center" height="5"></td></tr>
        <tr> 
          <td><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="151" id="AutoNumber1" height="20" background="img/fu.gif">
                  <tr>
                    <td align="center" width="82"><b>精品推荐</b></td>
                    <td align="center"> </td>
                  </tr>
                </table>
                </td></tr>
        <tr> 
          <%
            sql="select top 10 * from hw where tuijian=-1 order by hw_id DESC"
            rs.open sql,conn,3,3
            if rs.eof then
            %>
          <td valign="top" align="left" bgcolor="#FFFFFF"><div align="center">
            暂且没有推荐商品<br>
            </div></td>
          <%end if
		    i=0
            do while not rs.eof
			i=i+1
			%>
          <td align="left" bgcolor="#FFFFFF"> 
                    <table width="200" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
                      <tr> 
                        <td valign="bottom" align="center" height="20"><b><%=rs("hw_name")%></b></td>
                      </tr>
                      <tr> 
                        <td align="center">
                        <a target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>">
                        <img border="0" src="<%=rs("hw_pic")%>" width="114" height="83" vspace="6"></a></td>
                      </tr>
                      <tr> 
                        <td align="center">会员价:<%=rs("hw_cash")%>元</td>
                      </tr>
                      <tr> 
                        <td valign="top" align="center">
                        <a target="_blank" href="views.asp?hw_id=<%=rs("hw_id")%>">详情</a> 
                        <a href='javascript:openbag(<%=rs("hw_id")%>)'>定购<img border="0" src="img/order.gif"></a></td>
                      </tr>
                      </table>
          </td>
          <%
		if (i mod 2=0) and i>=2 then
%>
        </tr>
        <tr> 
          <%
	end if
	if i>=10 then exit do end if
rs.movenext
loop
rs.close
%>
        </tr>
      </table>
</td>
    <td  width="180"  valign="top">
<!--#include file="innews.asp"-->                   
<!--#include file="ph.asp"-->
<!--#include file="link.asp"-->
<div align="center">
 <center>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
    <tr>
      <td width="100%" align="center"> </td>
    </tr>
    <tr>
      <td width="100%" align="center" height="120" bgcolor="#F5EFE7"><SCRIPT LANGUAGE="JavaScript1.1" SRC="http://duduad2.kisswin.com/main/adview.php?user=24|159&border=0&db=dudukisswin&log=yes"></SCRIPT></td>
    </tr>
   </table>
  </center>
</div>
    </td>
  </tr>
</table>
  </center>
</div>
<!--#include file="copy.asp"-->

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -