books1.asp

较完善的一个程序

                <td width="16" height="18" rowspan="2"><img src="images/ti_r1_c2.gif" width="16" height="18"></td>
                <td width="274" height="15" align="left" valign="bottom" class="inputfield"><div align="right">·<a href="books3.asp?type=3" class="text">更多新书</a></div></td>
              </tr>
              <tr>
                <td height="2" align="left" valign="bottom" background="images/ti_r2_c3.gif" class="inputfield"><img src="images/spacer.gif" width="1" height="1"></td>
              </tr>
            </table></TD>
          </TR>
          <tr>
            <td height="89" valign="top"><table width="94%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="8" class="text"><img src="images/spacer.gif" width="1" height="1"></td>
              </tr>
              <tr>
                <td class="text">
				<%
     				set mrs=server.createobject("adodb.recordset")   
    				sql= "SELECT top 5 * FROM shop_books where newsbook=1 order by bookid Desc"
    				mrs.open sql,conn,1,1 
       				while not mrs.eof  
				%>
				&middot;<a href="books4.asp?id=<%=mrs("bookid")%>" target="_blank" class="text"><%=mrs("bookname")%> </a> <br>
    			<%
  					mrs.movenext
 					wend
  					mrs.Close 
  					set mrs=nothing
				%> 
				</td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td>&nbsp;</td>
          </tr>
                    </table>      <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <TR>
            <TD height="18" align=left vAlign=top bgColor=#ffffff><table width="384" height="18" border="0" align="left" cellpadding="0" cellspacing="0">
              <tr>
                <td width="19" height="18" rowspan="2"><div align="right"><img src="images/t2_r1_c1.gif" width="4" height="18"></div></td>
                <td width="75" height="18" rowspan="2" valign="bottom" background="images/t2_r1_c2.gif" class="inputfield"><div align="center"><font color="#FFFFFF">推荐图书</font></div></td>
                <td width="16" height="18" rowspan="2"><img src="images/ti_r1_c2.gif" width="16" height="18"></td>
                <td width="274" height="15" align="left" valign="bottom" class="inputfield"><div align="right">·<a href="books3.asp?type=4" class="text">更多推荐</a></div></td>
              </tr>
              <tr>
                <td height="2" align="left" valign="bottom" background="images/ti_r2_c3.gif" class="inputfield"><img src="images/spacer.gif" width="1" height="1"></td>
              </tr>
            </table></TD>
          </TR>
          <tr>
            <td height="89" valign="top"><table width="94%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="8" class="text"><img src="images/spacer.gif" width="1" height="1"></td>
              </tr>
              <tr>
                <td class="text">
                <%
     				set mrs=server.createobject("adodb.recordset")   
    				sql= "SELECT top 5 * FROM shop_books where bestbook=1 order by bookid Desc"
    				mrs.open sql,conn,1,1 
       				while not mrs.eof  
				%>
				&middot;<a href="books4.asp?id=<%=mrs("bookid")%>" target="_blank" class="text"><%=mrs("bookname")%> </a> <br>
      			<%
  					mrs.movenext
 					wend
  					mrs.Close 
  					set mrs=nothing
				%>
                </td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td>&nbsp;</td>
          </tr>
                    </table>      
    </td>
    <td width="189" valign="top" bgcolor="EFF5FC"> 
      <div align="center"> 
        <table width="180"  border="0" align="center" cellpadding="0" cellspacing="0">
          <!--DWLayoutTable-->
          <tr> 
            <th width="100%" valign="top" scope="col"><img src="images/1pixel.gif" width="1" height="8"></th>
          </tr>
          <tr> 
            <th valign="top" scope="col"> <div align="left"> 
                <TABLE cellSpacing=0 cellPadding=0 border=0>
                  <form name="form1" method="post" action="books3.asp?type=5">
                    <TR> 
                      <TD height="1" colspan="3" bgcolor="#BF1B34" ><img src="images/1pixel.gif" width="1" height="1"></TD>
                      <TD width=1 rowSpan=5><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                      <TD width=1><img src="images/1pixel.gif" width="1" height="1"></TD>
                    </TR>
                    <TR> 
                      <TD width="1" rowspan="3" bgcolor="#BF1B34" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                      <TD width="100%" height="0" bgcolor="#FFFFFF" ><img src="images/right-02-4.gif" width="176" height="20"></TD>
                      <TD width="1" rowspan="3" bgcolor="#BF1B34"  ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                      <TD width=1 rowspan="5" background="images/2pixel.gif"><img src="images/1pixel.gif"></TD>
                    </TR>
                    <TR> 
                      <TD height="1" bgcolor="#BF1B34" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"><img src="images/1pixel.gif" width="1" height="1"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                    </TR>
                    <TR> 
                      <TD bordercolor="#D59B9E" bgcolor="#FFFFFF" > <table width="100%"  border="0" cellpadding="0" cellspacing="0" style="FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorStr='#ffffff', endColorStr='#DDDDDD', gradientType='0')">
                          <tr> 
                            <th scope="col"><img src="images/1pixel.gif" width="1" height="5"></th>
                          </tr>
                          <tr> 
                            <th valign="middle" scope="col"><span class="inputfield">关键词:</span> 
                              <input name="text" type="text" class="inputfield" size="9"> 
                              <select name="action" class="inputfield">
                                <option value="1" selected>书名</option>
                                <option value="2">作者</option>
                                <option value="3">书号</option>
                              </select></th>
                          </tr>
                          <tr> 
                            <th scope="col"><img src="images/1pixel.gif" width="1" height="6"></th>
                          </tr>
                          <tr align="center" valign="middle"> 
                            <td> <div align="right"> 
                                <input name="imageField4" type="image" src="images/btn-4.gif" width="94" height="24" border="0">
                              </div></td>
                          </tr>
                          <tr align="center" valign="middle"> 
                            <td><img src="images/1pixel.gif" width="1" height="2"></td>
                          </tr>
                        </table>
					  </TD>
                    </TR>
                    <TR> 
                      <TD colSpan=3 bgcolor="#BF1B34" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                    </TR>
                    <TR> 
                      <TD height="1" colSpan=4 bordercolor="#D4D0C8" background="images/2pixel-90.gif"><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                    </TR>
                    <TR > 
                      <TD height="1"
          colSpan=5 background="images/2pixel-90.gif"><span class="right"><img src="images/1pixel.gif"></span></TD>
                    </TR>
                  </form>
                </TABLE>
              </div></th>
          </tr>
          <tr> 
            <th valign="top" scope="col"><img src="images/1pixel.gif" width="1" height="8"></th>
          </tr>
          <tr> 
            <th valign="top" scope="col"><TABLE cellSpacing=0 cellPadding=0 border=0>
              <TBODY>
                <TR>
                  <TD height="1" colspan="3" bgcolor="#669900" ><img src="images/1pixel.gif" width="1" height="1"></TD>
                  <TD width=1 rowSpan=5><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                  <TD width=1><img src="images/1pixel.gif" width="1" height="1"></TD>
                </TR>
                <TR>
                  <TD width="1" rowspan="3" bgcolor="#669900" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                  <TD width="196" height="0" bgcolor="#FFFFFF" ><img src="images/right-02-5.gif" width="176" height="20"></TD>
                  <TD width="1" rowspan="3" bgcolor="#669900"  ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                  <TD width=1 rowspan="5" background="images/2pixel.gif"><img src="images/1pixel.gif"></TD>
                </TR>
                <TR>
                  <TD height="1" bgcolor="#669900" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"><img src="images/1pixel.gif" width="1" height="1"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                </TR>
                <TR>
                  <TD bgcolor="#FFFFFF" ><table width="100%"  border="0" cellpadding="0" cellspacing="0" style="FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorStr='#ffffff', endColorStr='#DDDDDD', gradientType='0')">
                      <tr>
                        <th scope="col"><img src="images/1pixel.gif" width="1" height="３"></th>
                      </tr>
                      <tr align="center" valign="middle">
                        <td height="103" align="left" valign="top">
                          <p><span class="text">
						  <%
     						set mrs=server.createobject("adodb.recordset")   
    						sql= "SELECT top 5 * FROM shop_news order by newsid Desc"
    						mrs.open sql,conn,1,1 
       						while not mrs.eof  
						  %>
            				&middot;<a href="books2.asp?id=<%=mrs("newsid")%>" target="_blank"  class="text"><%=mrs("newsname")%> </a> <br>
                          <%
  							mrs.movenext
  							wend
  							mrs.Close 
  							set mrs=nothing
						  %>
						   </span></p></td>
                      </tr>
                      <tr>
                        <td height="31" class="eng001"><div align="right"><a href="xinxi.asp?tp=wt" class="text">&middot;</a><a href="books5.asp" class="text style7"><span class="text">更多消息</span></a></div></td>
                      </tr>
                  </table></TD>
                </TR>
                <TR>
                  <TD colSpan=3 bgcolor="#669900" ><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                </TR>
                <TR>
                  <TD height="1" colSpan=4 background="images/2pixel-90-b.gif"><span class="right"><img src="images/1pixel.gif" width="1" height="1"></span></TD>
                </TR>
                <TR >
                  <TD height="1"
          colSpan=5 background="images/2pixel-90.gif"><span class="right"><img src="images/1pixel.gif"></span></TD>
                </TR>
              </TBODY>
            </TABLE></th>
          </tr>
          <tr> 
            <th valign="top" scope="col"><img src="images/1pixel.gif" width="1" height="8"></th>
          </tr>
        </table>
      </div></td>
  </tr>
  <tr> 
    <TD height=40 colspan="6" 
          style="FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorStr='#FFFFFF', endColorStr='#4A91D9', gradientType='1')"> 
      <DIV align=right><span class="text">2004 北京前沿公司.前沿图书工作室.保留所有权利。</span></DIV></TD>
  </tr>
</table>
<div align="center"></div>
</body>
</html>