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

📄 index0.asp

📁 网上电子购物的动态程序,有丰富的后台管理 功能,多种付款方式选择.
💻 ASP
📖 第 1 页 / 共 4 页
字号:
					end if%>
                                  </a> 价格:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)&"元"%></font> 
                                  <font color="#FF0000">折</font>: 
                                  <%response.write "<font color=#FF6600>"&rs("dazhe")*100&"%</font>"%>
                                  <%rs.movenext%>
                                  <%end if%>
                                </td>
                              </tr>
                              <%if i>=4 then exit do
				loop
				end if
				rs.close
				set rs=nothing%>
                            </table>
                            <%end if%>
                          </td>
                        </tr>
                      </table>
                      <table width="100%" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td background="images/bj_x.gif" height="1"></td>
                        </tr>
                        <tr>
                          <td>&nbsp;</td>
                        </tr>
                      </table>
                      <div align="center"><a href="<%=tx1url%>" target=_blank><img src="<%=tx1%>" width="560" height="100" border="0"></a> 
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td background="images/bj_x.gif" height="1"></td>
                          </tr>
                          <tr> 
                            <td>&nbsp;</td>
                          </tr>
                        </table>
                        <br>
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td background="images/bj_x.gif" height="1"></td>
                          </tr>
                          <tr> 
                            <td> 
                              <table cellspacing=0 cellpadding=0 width=100% height="22" align="center">
                                <tr> 
                                  <td width=16>&nbsp;</td>
                                  <td width=61> 
                                    <div align="center"><img src="images/icon2.gif" width="12" height="13"></div>
                                  </td>
                                  <td class=hg12 width="442">&nbsp;<b>特价商品</b></td>
                                  <td width=42>&nbsp;</td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr> 
                            <td background="images/bj_x.gif" height="1"></td>
                          </tr>
                        </table>
                        <table cellspacing=0 cellpadding=0 width="540" border=0>
                          <tbody> 
                          <tr> 
                            <td valign=top width="33%"> 
                              <%set rs=server.CreateObject("adodb.recordset")
	  rs.open "select top 4 bookid,bookcontent,dazhe,shichangjia,huiyuanjia,bookname,bookpic from shop_books where dazhe<=0.6 order by adddate desc",conn,1,1
	  if rs.eof and rs.bof then
	  response.write "<br>目前没有特价商品"
	  else%>
                              <br>
                              <table cellspacing=0 cellpadding=2 width="100%" border=0>
                                <tbody> 
                                <tr> 
                                  <td><br>
                                    <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                    <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a> 
                                    <p style="MARGIN-TOP: -20px" align=right>&nbsp;<br><br> 
                                    </p>
                                    <a href=book.asp?id=<%=rs("bookid")%> target=_blank><font  color=#FF6600><%=trim(rs("bookname"))%></font></a> 
                                    <br>
                                    <%if trim(rs("bookcontent"))<>"" then
					  if len(trim(rs("bookcontent")))> 58 then
response.write left(trim(rs("bookcontent")),56)&"..."
else
response.write trim(rs("bookcontent"))
end if
end if%>
                                    <br>
                                    市场价:<%=formatnumber(rs("shichangjia"),2)%>  
                                    <br>
                                    会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)%> 
                                    </font> 
                                    <table align="center" cellpadding=0 cellspacing=0>
                                      <tbody> 
                                      <tr> 
                                        <td align=middle width=27 height=22> 
                                          <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit233" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                        <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                        <td width=57 height=22> 
                                          <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit2223" src="images/shc.gif" width="46" height="19">
                                          <%rs.movenext%>
                                        </td>
                                      </tr>
                                      </tbody> 
                                    </table>
                                  </td>
                                </tr>
                                </tbody> 
                              </table>
                              <%end if%>
                            </td>
                            <td valign=top width="33%">
                                          <%if rs.eof and rs.bof then
			  response.write "<br>目前没有特价商品"
			  else
			  'if rs.recordcount>=2 then
			  'rs.movenext
			  'else
			  'rs.movefirst
			  'end if
			  %>
                              <br>
                              <table cellspacing=0 cellpadding=2 width="100%" border=0>
                                <tbody> 
                                <tr> 
                                  <td><br>
                                    <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                    <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a> 
                                    <p style="MARGIN-TOP: -20px" align=right>&nbsp;<br>
                                      <br>
                                    </p>
                                    <a href=book.asp?id=<%=rs("bookid")%> target=_blank><font  color=#FF6600><%=trim(rs("bookname"))%></font></a> 
                                    <br>
                                    <%if trim(rs("bookcontent"))<>"" then
					  if len(trim(rs("bookcontent")))> 58 then
response.write left(trim(rs("bookcontent")),56)&"..."
else
response.write trim(rs("bookcontent"))
end if
end if%>
                                    <br>
                                    市场价:<%=formatnumber(rs("shichangjia"),2)%>  
                                    <br>
                                    会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)%> 
                                    </font> 
                                    <table align="center" cellpadding=0 cellspacing=0>
                                      <tbody> 
                                      <tr> 
                                        <td align=middle width=27 height=22> 
                                          <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit2332" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                        <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                        <td width=57 height=22> 
                                          <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit22232" src="images/shc.gif" width="46" height="19">
                                          <%rs.movenext%>
                                        </td>
                                      </tr>
                                      </tbody> 
                                    </table>
                                  </td>
                                </tr>
                                </tbody> 
                              </table>
                              <%end if%>
                            </td>
                            <td valign=top width="33%"> 
                                          <%if rs.eof and rs.bof then
			  response.write "<br>目前没有特价商品"
			  else
			  'if rs.recordcount>=2 then
			  'rs.movenext
			  'else
			  'rs.movefirst
			  'end if
			  %>
                              <br>
                              <table cellspacing=0 cellpadding=2 width="100%" border=0>
                                <tbody> 
                                <tr> 
                                  <td><br>
                                    <img height=115 hspace=5 
                        src="images/bg_book.gif" width=145 vspace=5 border=0> 
                                    <p style="MARGIN-TOP: -130px"><a 
                        href=book.asp?id=<%=rs("bookid")%> target=_blank><img 
                        height=110 alt=商品样品 hspace=5 
                        src=<%if trim(rs("bookpic"))<>"" then
				  response.write trim(rs("bookpic"))
				  else
				  response.write "images/emptybook.gif"
				  end if%> width=135 vspace=3 
                        border=0></a> 
                                    <p style="MARGIN-TOP: -20px" align=right>&nbsp; <br><br>
                                    </p>
                                    <a  
                  href=book.asp?id=<%=rs("bookid")%> target=_blank><font  color=#FF6600><%=trim(rs("bookname"))%></font></a> 
                                    <br>
                                    <%if trim(rs("bookcontent"))<>"" then
					  if len(trim(rs("bookcontent")))> 58 then
response.write left(trim(rs("bookcontent")),56)&"..."
else
response.write trim(rs("bookcontent"))
end if
end if%>
                                    <br>
                                    市场价:<%=formatnumber(rs("shichangjia"),2)%><br>
                                    会员价:<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)%></font> 
                                    <table align="center" cellpadding=0 cellspacing=0>
                                      <tbody> 
                                      <tr> 
                                        <td align=middle width=27 height=22> 
                                          <input onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type="image" border="0" name="submit234" src="images/gm.gif" width="46" height="19">&nbsp; </td>
                                        <td align=middle width=28 height=22><a href="book.asp?id=<%=rs("bookid")%>"><img src="images/yl.gif" width="46" height="19" border="0"></a>&nbsp;</td>
                                        <td width=57 height=22> 
                                          <input onClick="javascript:window.open('shoucang.asp?id=<%=rs("bookid")%>&action=add ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type="image" border="0" name="submit2224" src="images/shc.gif" width="46" height="19">
                                          <%rs.movenext%>
                                        </td>
                                      </tr>
                                      </tbody> 
                                    </table>
                                    <br>
                                  </td>
                                </tr>
                                </tbody> 
                                <%rs.close
				set rs=nothing%>
                              </table>
                              <%end if%>
                            </td>
                          </tr>
                          </tbody> 
                        </table>
                      </div>
                    </td>
                  </tr>
                </table>
              </td>
            </tr>
          </table>
          <!--#include file="service.asp"-->
          <!--#include file="copyright.asp"-->
          <div  id=floater 
            style="Z-INDEX: 20; WIDTH: 130px; POSITION: absolute; TOP: 342px; overflow: visible;; left: 2px"> 
          </div>
          <script language=javascript 
            src="floater.js"></script>
        </td>
      </tr>
    </table>
</body>
</html>

⌨️ 快捷键说明

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