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

📄 index2.asp

📁 电子商务购物系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
          <tr> 
            <td align="center"> 
              <%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select Top 12 * from shop_books where bestbook=1 order by bookid,bookname desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "<center><br><font color=red size=2>对不起,请您先到后台添加商品!</font></font>"
		  'response.End
		  else
		  %>
              <table cellspacing=0 cellpadding=0 border=0 width="95%">
                <%
							  dim i_1,i_count
							  i_1=int((rs.recordcount+1)/2)
							  if i_1>5 then 
							  	i_1=5
							  end if
							  'response.write i_1
							  for i_count=1 to i_1%>
                <tr> 
                  <td valign=top width="300"> 
                    <table cellspacing=0 cellpadding=0 width="100%" class="table-xia">
                      <tr> 
                        <td valign=top width="50%" style="PADDING-LEFT: 6px"><br>
                          <%if rs("bookpic")="" then 
	response.write "<div align=center><a href=list.asp?id="&rs("bookid")&"><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
	else%>
                          <div align="center">
                            <table width="99" border="0" cellspacing="0" cellpadding="0" height="99">
                              <tr> 
                                <td background="images/xt_bj.gif"> 
                                  <div align="center"><a href=list.asp?id=<%=rs("bookid")%>><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a></div>
                                </td>
                              </tr>
                            </table>
                            <%end if%>
                          </div>
                        </td>
                        <td valign=top width="50%"><a class=a4 
                        href=list.asp?id=<%=rs("bookid")%>><font color=#FF6600><br>
                          <%=trim(rs("bookname"))%></font></a><br>
                          市场价:<s><%=formatnumber(rs("shichangjia"),2)&"元"%></s><br>
                          会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
                          VIP 价:<font color=#FF0000><%=formatnumber(rs("Vipjia"),2)&"元"%></font><br>
                          <font color="#999999"> </font> 
                          <table cellpadding=0 cellspacing=0 width="100%">
                            <tbody> 
                            <tr> 
                              <td><a href="gouwu.asp?id=<%=rs("bookid")%>&action=add"><img src="images/goumai.gif" width="50" height="19" border=0></a>&nbsp;&nbsp;<a href="shoucang.asp?id=<%=rs("bookid")%>&action=add"><img src="images/shoucang1.gif" width="50" height="19" border=0></a> 
                              </td>
                            </tr>
                            </tbody> 
                          </table>
                        </td>
                      </tr>
                      <tr align="right"> 
                        <td valign=top colspan="2" style="PADDING-LEFT: 6px"><font color="#999999"> 
                          </font> 
                          <table width="95%" border="0" cellspacing="0" cellpadding="0">
                            <tr> 
                              <td><font color="#999999"> 
                                <%if len(trim(rs("bookcontent")))>50 then
	response.write left(trim(rs("bookcontent")),50)&"...."
	else
	response.write trim(rs("bookcontent"))
	end if%>
                                </font></td>
                            </tr>
                          </table>
                          <font color="#999999"> 
                          <%rs.movenext%>
                          </font></td>
                      </tr>
                    </table>
                  </td>
                  <td valign=top width="300" class="table-zuo"> 
                    <%if rs.eof then%>
                    &nbsp; 
                    <%else%>
                    <table cellspacing=0 cellpadding=0 width="100%" class="table-xia">
                      <tr> 
                        <td valign=top width="50%" style="PADDING-LEFT: 6px"><br>
                          <%if rs("bookpic")="" then 
	response.write "<div align=center><a href=list.asp?id="&rs("bookid")&"><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
	else%>
                          <div align="center">
                            <table width="99" border="0" cellspacing="0" cellpadding="0" height="99">
                              <tr> 
                                <td background="images/xt_bj.gif"> 
                                  <div align="center"><a href=list.asp?id=<%=rs("bookid")%>><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a></div>
                                </td>
                              </tr>
                            </table>
                            <%end if%>
                          </div>
                        </td>
                        <td valign=top width="50%"><a class=a4 
                        href=list.asp?id=<%=rs("bookid")%>><font color=#FF6600><br>
                          <%=trim(rs("bookname"))%></font></a><br>
                          市场价:<s><%=formatnumber(rs("shichangjia"),2)&"元"%></s><br>
                          会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font><br>
                          VIP 价:<font color=#FF0000><%=formatnumber(rs("Vipjia"),2)&"元"%></font><br>
                          <font color="#999999"> </font> 
                          <table cellpadding=0 cellspacing=0 width="100%">
                            <tbody> 
                            <tr> 
                              <td><a href="gouwu.asp?id=<%=rs("bookid")%>&action=add"><img src="images/goumai.gif" width="50" height="19" border=0></a>&nbsp;&nbsp;<a href="shoucang.asp?id=<%=rs("bookid")%>&action=add"><img src="images/shoucang1.gif" width="50" height="19" border=0></a> 
                              </td>
                            </tr>
                            </tbody> 
                          </table>
                        </td>
                      </tr>
                      <tr> 
                        <td valign=top colspan="2" style="PADDING-LEFT: 6px"><font color="#999999"> 
                          </font> 
                          <table width="95%" border="0" cellspacing="0" cellpadding="0">
                            <tr> 
                              <td><font color="#999999"> 
                                <%if len(trim(rs("bookcontent")))>50 then
	response.write left(trim(rs("bookcontent")),50)&"...."
	else
	response.write trim(rs("bookcontent"))
	end if%>
                                </font></td>
                            </tr>
                          </table>
                          <%rs.movenext%>
                        </td>
                      </tr>
                    </table>
                    <%end if%>
                  </td>
                </tr>
                <tr> 
                </tr>
                <%next%>
                <%
				rs.close
				set rs=nothing%>
              </table>
              
            </td>
          </tr>
        </table>
        <%end if%>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td height="35"> 
              <div align="center"> 
                <table width="100%" border="0" cellspacing="0" cellpadding="3">
                  <tr> </tr>
                  <tr> 
                    <td align=center width="50%" valign="top"> 
                      <!--#include file="newsinfo.asp"-->
                    </td>
                    <td align=center width="50%"> 
                      <%
		set rs=server.createobject("adodb.recordset")
		rs.open "select Top 6 * from zhuanti  order by newsid desc",conn,1,1
		if rs.recordcount=0 then 
		%>
                      <table width="100%" border="0" cellspacing="0" cellpadding="5" align="center">
                        <tr> 
                          <td align=center>暂无商品专题</td>
                        </tr>
                      </table>
                      <%else%>
                      <table width="100%" class="table-shangxia" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td height="23" bgcolor="f1f1f1"> <font color="#000000">商品专题</font></td>
                        </tr>
                      </table>
                      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
                        <%
			while not rs.eof
			%>
                        <tr> 
                          <td align=center height=22 width="5%" class="table-xia"></td>
                          <td align=left height=22 width="168"  class="table-xia"><a href=listzt.asp?id=<%=rs("newsid")%>> 
                            <%if len(trim(rs("title")))>12 then
	response.write left(trim(rs("title")),12)&"...."
	else
	response.write trim(rs("title"))
	end if%>
                            </a></td>
                          <td align=left height=22 width="15%" class="table-xia"><%=year(rs("updatetime"))&"."&month(rs("updatetime"))&"."&day(rs("updatetime"))%></td>
                        </tr>
                        <%
			rs.movenext
		    wend
			%>
                      </table>
                      <%
		end if
		rs.close
		set rs=nothing
		%>
                    </td>
                  </tr>
                </table>
              </div>
            </td>
          </tr>
          <tr> 
            <td height="80" class="table-shangxia"> 
              <div align="center"><a href="<%=tx3url%>" target=_blank><img src="<%=tx3%>" width="166" height="55" border="0"></a>&nbsp;&nbsp;<a href="<%=tx1url%>" target=_blank><img src="<%=tx1%>" border="0" width="166" height="55"></a> 
                &nbsp;&nbsp;<a href="<%=tx2url%>" target=_blank><img src="<%=tx2%>" width="166" height="55" border="0"></a> 
              </div>
            </td>
          </tr>
        </table>
      </div>
    </td>
  </tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
        
    <td> 
      <div align="center"></div>
          
      <!--#include file="service1.asp"-->
      <!--#include file="copyright.asp"-->
    </td>
      </tr>
    </table>
</body>
</html>

⌨️ 快捷键说明

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