<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <%set rs=server.createobject("adodb.recordset")
		rs.open "select Top 6 * from shop_books where shjiaid="&shjiaid&" and shjiabestbook=1 and info=0 order by bookid desc",conn,1,1
		if rs.recordcount=0 then 
		%>
  </tr>
  <%
		else
		while not rs.eof
		%>
  <tr><table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center valign="MIDDLE"><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
        <%rs.movenext%>
</td>
    <td><%if rs.eof then%>
      <%else%>
      <table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
      <%rs.movenext%>
    <%end if%></td>
    <td><%if rs.eof then%>
      <%else%>
      <table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
      <%rs.movenext%>
    <%end if%></td>
    <td><%if rs.eof then%>
      <%else%>
      <table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
      <%rs.movenext%>
    <%end if%></td>
    <td><%if rs.eof then%>
      <%else%>
      <table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
      <%rs.movenext%>
    <%end if%></td>
    <td><%if rs.eof then%>
      <%else%>
      <table width="95%" height="116" border="0" align="center" cellpadding="2" cellspacing="0">
        <tr>
          <td width="40%" ><table height=99 cellspacing=0 cellpadding=0 width=99 border=0 align="center">
              <tbody>
                <tr>
                  <td background=images/xt_bj.gif align=center><%if rs("bookpic")="" then 
response.write "<div align=center><a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a></div>"
else%>
                      <a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("bookpic"))%>"  width=75 border=0 height="75"></a>
                      <%end if%>
                  </td>
                </tr>
              </tbody>
          </table></td>
        </tr>
        <tr>
          <td width="40%" valign="TOP" bgcolor="#FFFFFF" ><div align="CENTER"><font color="#999999">
              <%response.write "<a class=a4 href=list.asp?id="&rs("bookid")&" target=_blank><font color=#000000>"
				if len(trim(rs("bookname")))>22 then
				response.write left(trim(rs("bookname")),20)&"..."
				else
				response.write trim(rs("bookname"))
				end if
				response.write "</font></a>"
				%>
            </font></div>
              <div align="CENTER"></div></td>
        </tr>
      </table>
      <%rs.movenext%>
      <%end if%></td>
  </tr>
    <%
		wend
		end if%>
</table>







