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

📄 index.asp

📁 电子商务网络购物系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<title><%=webname%>--首页</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<!--#include file="include/header.asp"--> 
<TABLE WIDTH="760" BORDER="0" CELLSPACING="0" CELLPADDING="0" ALIGN="CENTER" background="images/langbg.gif">
  <TR>
    <TD VALIGN="TOP" WIDTH="175"> 
	<TABLE WIDTH="175" BORDER="0" CELLSPACING="0" CELLPADDING="0">
        <TR> 
          <TD><!--#include file="status.asp"--></TD>
        </TR>
        <TR> 
          <TD><!--#include file="include/newscast.asp"--></TD>
        </TR>
        <tr> 
          <td align="center"><A HREF=<%=left1url%> TARGET="_blank"><IMG SRC=<%=left1%> BORDER="0" width="165"></A></td>
        </tr>
        <TR> 
          <TD><!--#include file="include/sold.asp"--></TD>
        </TR>
        <TR> 
          <TD><!--#include file="include/hot.asp"--></TD>
        </TR>
        <tr> 
          <td align="center"><A HREF=<%=left2url%> TARGET="_blank"><IMG SRC=<%=left2%> BORDER="0" WIDTH="165"></A></td>
        </tr>
        <TR> 
          <TD><!--#include file="include/newarrival.asp"--></TD>
        </TR>
        <tr> 
          <td align="center"><A HREF=<%=left3url%> TARGET="_blank"><IMG SRC=<%=left3%> BORDER="0" WIDTH="165"></A></td>
        </tr>
      </TABLE></TD>
    <TD WIDTH="420" VALIGN="TOP"> <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0" ALIGN="center">
        <TR> 
          <TD valign="top"> <table width="420" border="0" cellspacing="1" cellpadding="1" align="center">
              <tr> 
                <td align="center"><a href=<%=topurl%> target="_blank"><img src=<%=top%>  border="0" width="400"></a></td>
              </tr>
            </table>
            <%Dim mark
						set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 10 prename,intro,name,id,introduce,pic,price1,price2,discount,makein,mark from product  order by adddate desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<center><font color=red size=4>对不起,请您先到后台添加商品!</font></font>"
		  response.End
		  end if
		  i=0
		  do while not rs.eof
		  %> <TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH="100%">
              <tr> 
                <td colspan="3" background="images/hor.gif" border="0"></td>
              </tr>
              <TR> 
                <TD  WIDTH="210"><TABLE CELLSPACING=0 CELLPADDING=0 WIDTH="100%">
                    <TR> 
                      <TD width="75" align="center" VALIGN=middle STYLE="PADDING-LEFT: 6px"> 
                        <A  HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><IMG ALT=<%=trim(rs("name"))%> SRC=<%if trim(rs("pic"))="" then
				  response.write "images/emptybook.gif"
				  else
				  response.write trim(rs("pic"))
				  end if%> BORDER=0></A> </TD>
                      <TD width="135" VALIGN=middle STYLE="PADDING-LEFT: 6px"><A CLASS=a4 
                        HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><FONT COLOR=#FF6600><%=trim(rs("name"))%></FONT></A><br>
                        市场价:<%=rs("price1") %>元<BR>
                        会员价:<FONT COLOR=#FF6600><%=rs("price2")%>元</FONT><br>
                        节 省:<%=rs("price1")-rs("price2")%>元<BR> <%response.write "<a href=# onClick=""javascript:window.open('cart.asp?id="&rs("id")&"','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/cart.gif width=50 height=19 align=absmiddle border=0></a> "
response.write "<a href=# onClick=""javascript:window.open('addto.asp?id="&rs("id")&"&action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/addto.gif width=50 height=19 align=absmiddle border=0></a> "%> <%rs.movenext%> </TD>
                    </TR>
                  </TABLE></TD>
                <td width="1" background="images/ver.gif" border="0"></td>
                <TD width="210" VALIGN=middle><TABLE WIDTH="100%" height="100" CELLPADDING=0 CELLSPACING=0>
                    <TR> 
                      <TD width="75" align="center" VALIGN=middle STYLE="PADDING-LEFT: 6px"> 
                        <A HREF=product.asp?id=<%=rs("id")%> TARGET=_blank> 
                        <IMG ALT=<%=trim(rs("name"))%> SRC=<%if trim(rs("pic"))="" then
				  response.write "images/emptybook.gif"
				  else
				  response.write trim(rs("pic"))
				  end if%> BORDER=0></A></TD>
                      <TD width="135" VALIGN=middle STYLE="PADDING-LEFT: 6px"><A CLASS=a4 
                        HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><FONT COLOR=#FF6600><%=trim(rs("name"))%></FONT></A><br>
                        市场价:<%=rs("price1")%>元<BR>
                        会员价:<FONT COLOR=#FF6600><%=rs("price2")%>元</FONT><br>
                        节 省:<%=rs("price1")-rs("price2")%>元<BR> <%response.write "<a href=# onClick=""javascript:window.open('cart.asp?id="&rs("id")&"','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/cart.gif width=50 height=19 align=absmiddle border=0></a> "
response.write "<a href=# onClick=""javascript:window.open('addto.asp?id="&rs("id")&"&action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/addto.gif width=50 height=19 align=absmiddle border=0></a> "%> </TD>
                    </TR>
                  </TABLE></TD>
              </TR>
              <%i=i+1
			  if i>=5 then exit do
			  rs.movenext
			  loop
			  rs.close
			  set rs=nothing
				%>
            </TABLE></TD>
        </TR>
        <tr> 
          <td colspan="3" background="images/hor.gif" border="0"></td>
        </tr>
      </TABLE>
      <table width="420" border="0" cellspacing="1" cellpadding="1" align="center">
        <tr> 
          <td align="center"><a href=<%=middleurl%> target="_blank"><img src=<%=middle%>  border="0" width="400" height="60"></a></td>
        </tr>
      </table>
      <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
        <TR> 
          <TD VALIGN=top WIDTH="50%"> <%set rs=server.CreateObject("adodb.recordset")
	  rs.open "select top 6 id,detail,discount,price1,price2,name,pic,mark from product order by discount asc",conn,1,1
	  if rs.eof and rs.bof then
		  response.write "<center><font color=red size=4>对不起,请您先到后台添加商品!</font></font>"
		  response.End
		  end if
		  i=0
		  do while not rs.eof
		  %> <TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH="100%">
              <tr> 
                <td colspan="3" background="images/hor.gif" border="0"></td>
              </tr>
              <TR> 
                <TD  WIDTH="210"> <TABLE CELLSPACING=0 CELLPADDING=0 WIDTH="100%">
                    <TD width="75" height="108" align="center" VALIGN=middle STYLE="PADDING-LEFT: 6px"> 
                      <A  HREF=product.asp?id=<%=rs("id")%> TARGET=_blank> 
                      <IMG ALT=<%=trim(rs("name"))%> SRC=<%if trim(rs("pic"))="" then
				  response.write "images/emptybook.jpg"
				  else
				  response.write trim(rs("pic"))
				  end if%> BORDER=0></A> </TD>
                    <TD width="135" VALIGN=top STYLE="PADDING-LEFT: 6px"><A CLASS=a4 
                        HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><FONT COLOR=#FF6600><%=trim(rs("name"))%></FONT></A><br>
                      品 牌: 
                      <% = rs("mark") %> <BR>
                      市场价:<%=rs("price1")%>元<BR>
                      会员价:<FONT COLOR=#FF6600><%=rs("price2")%>元</FONT><br>
                      折 扣:<%=rs("discount")*100&"%"%><BR> <%response.write "<a href=# onClick=""javascript:window.open('cart.asp?id="&rs("id")&"','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/cart.gif width=50 height=19 align=absmiddle border=0></a> "
response.write "<a href=# onClick=""javascript:window.open('addto.asp?id="&rs("id")&"&action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/addto.gif width=50 height=19 align=absmiddle border=0></a> "%> <%rs.movenext%> </TD>
                  </TABLE></TD>
                <td width="1" background="images/ver.gif" border="0"></td>
                <TD VALIGN=top width=210> <TABLE CELLSPACING=0 CELLPADDING=0 WIDTH="100%">
                    <TR> 
                      <TD width="75" align="center" VALIGN=middle STYLE="PADDING-LEFT: 6px"> 
                        <A 
                        HREF=product.asp?id=<%=rs("id")%> TARGET=_blank> <IMG ALT=<%=trim(rs("name"))%> SRC=<%if trim(rs("pic"))="" then
				  response.write "images/emptybook.jpg"
				  else
				  response.write trim(rs("pic"))
				  end if%> BORDER=0></A></TD>
                      <TD width="135" VALIGN=top STYLE="PADDING-LEFT: 6px"><A CLASS=a4 
                        HREF=product.asp?id=<%=rs("id")%> TARGET=_blank><FONT COLOR=#FF6600><%=trim(rs("name"))%></FONT></A><br>
                        品 牌: 
                        <% = rs("mark") %> <BR>
                        市场价:<%=rs("price1")%>元<BR>
                        会员价:<FONT COLOR=#FF6600><%=rs("price2")%>元</FONT><br>
                        折 扣:<%=rs("discount")*100&"%"%><BR> <%response.write "<a href=# onClick=""javascript:window.open('cart.asp?id="&rs("id")&"','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/cart.gif width=50 height=19 align=absmiddle border=0></a> "
response.write "<a href=# onClick=""javascript:window.open('addto.asp?id="&rs("id")&"&action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/addto.gif width=50 height=19 align=absmiddle border=0></a> "%> </TD>
                    </TR>
                  </TABLE></TD>
              </TR>
              <%i=i+1
			  if i>=3 then exit do
			  rs.movenext
			  loop
			  rs.close
			  set rs=nothing
				%>
            </TABLE></TD>
        </TR>
        <tr> 
          <td colspan="3" background="images/hor.gif" border="0"></td>
        </tr>
      </TABLE>
      <table width="420" border="0" cellspacing="1" cellpadding="1" align="center">
        <tr> 
          <td align="center"><a href=<%=bottomurl%> target="_blank"><img src=<%=bottom%>  border="0" width="400" height="60"></a></td>
        </tr>
      </table></TD>
    <TD WIDTH="175" valign="top"> 
	<table cellspacing=0 cellpadding=0 width=100% align="center">
        <tr> 
          <td><!-- #include file="include/cast.asp"--></td>
        </tr>
        <tr> 
          <td align="right"><A HREF=<%=right1url%> TARGET="_blank"><IMG SRC=<%=right1%> BORDER="0" WIDTH="165"></A></td>
        </tr>
        <tr> 
          <td height="5"></td>
        </tr>
        <tr> 
          <td align="center"><!--#include file="include/mosthot.asp"--></td>
        </tr>
        <tr> 
          <td height="5"></td>
        </tr>
        <tr> 
          <td align="center"><!--#include file="include/mostsold.asp"--></td>
        </tr>
        <tr> 
          <td height="5"></td>
        </tr>
        <tr> 
          <td align="right"><A HREF=<%=right2url%> TARGET="_blank"><IMG SRC=<%=right2%> BORDER="0" WIDTH="165"></A></td>
        </tr>
        <tr> 
          <td><!-- #include file="include/recommend.asp"--></td>
        </tr>
        <tr> 
          <td><!-- #include file="include/discount.asp"--></td>
        </tr>
        <tr> 
          <td align="right"><A HREF=<%=right3url%> TARGET="_blank"><IMG SRC=<%=right3%> BORDER="0" WIDTH="170"></A></td>
        </tr>
      </table></TD>
    <TD WIDTH="5" valign="top"></TD>
  </TR>
</TABLE>
<!--#include file="include/footer.asp"--> 

⌨️ 快捷键说明

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