index.asp

soft.studa.com大家一起加油啊,好痛苦啊,呵呵

          <TBODY>
            <TR> 
              <TD width=11 height=16><IMG height=16 src="images/kuai17.gif" 
            width=11></TD>
              <TD background=images/kuai19.gif><IMG height=16 
            src="images/kuai19.gif" width=1></TD>
              <TD width=11 height=16><IMG height=16 src="images/kuai18.gif" 
            width=11></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD bgColor=#d3e1fd height=21> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD align=middle width=25><IMG height=15 
                  src="images/y1.gif" width=13></TD>
                      <TD>新开张店铺</TD>
                      <TD width=90>| <a href="shop_list.asp">查看更多</a>...</TD>
                    </TR>
                  </TBODY>
                </TABLE>
               </TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD> <table width="100%" border="0" cellspacing="4" style="border-collapse: collapse">
 <% 
Set rs= conn.execute("select * from user_info order by user_id desc" ) 
do while not rs.eof
%>
                  <tr> 
                    <td height=18 >&nbsp; ·<a href="shop_info.asp?user_id=<%=rs("user_id")%>"><%=rs("shop_name")%></a> 
                      <font color="#999999">(<%=rs("user_date")%>)</font></td>
                    <% d=d+1 
if d>=8 then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
                  </tr>
                </table>
               </TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD width=11 height=16><IMG height=16 src="images/kuai17.gif" 
            width=11></TD>
              <TD background=images/kuai19.gif><IMG height=16 
            src="images/kuai19.gif" width=1></TD>
              <TD width=11 height=16><IMG height=16 src="images/kuai18.gif" 
            width=11></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD bgColor=#d3e1fd height=21> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD align=middle width=25><IMG height=15 
                  src="images/y1.gif" width=13></TD>
                      <TD>本站新闻</TD>
                      <TD width=90>| <a href="news_list.asp">查看更多</a>...</TD>
                    </TR>
                  </TBODY>
                </TABLE>
               </TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD> <table width="100%" border="0" cellpadding="2" style="border-collapse: collapse">
                  <% 
Set rs= conn.execute("select * from news order by news_id desc" ) 
do while not rs.eof
%>
                  <tr> 
                    <td height=18 >&nbsp; ·<a href="news_info.asp?news_id=<%=rs("news_id")%>" target="_blank"><%=rs("news_title")%></a><font color="#999999"> (<%=rs("news_date")%>)</font></td>
                    <% i=i+1 
if i>=6 then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
                  </tr>
                </table>
              </TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD width=11 height=11><IMG height=11 src="images/kuai08.gif" 
            width=11></TD>
              <TD background=images/kuai13.gif><IMG height=11 
            src="images/kuai10.gif" width=1></TD>
              <TD width=11 height=11><IMG height=11 src="images/kuai09.gif" 
            width=11></TD>
            </TR>
          </TBODY>
        </TABLE>
      </TD>
      <TD width=180 vAlign=top> 
<%
Set tj=Conn.Execute("select * from tj_info where tj_id=1")
Set tjshop=Conn.Execute("select * from user_info where user_id="&tj("tj_info_id")&"")
%>
        <TABLE cellSpacing=0 cellPadding=0 align=center border=0>
          <TBODY>
            <TR> 
              <TD width=779 vAlign=top> 
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD><IMG height=11 src="images/kuai20.gif" 
        width=190></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <TABLE width=100% border=0 cellPadding=0 cellSpacing=0>
                  <TBODY>
                    <TR> 
                      <TD width="8" rowspan="2" background=images/kuai12.gif></TD>
                      <TD bgColor=#fff3d0 height=21> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                          <TBODY>
                            <TR> 
                              <TD align=middle width=25><IMG height=15 
                  src="images/y2.gif" width=13></TD>
                              <TD>本周推荐店铺</TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                      <TD width=8 rowspan="2" background=images/kuai11.gif>&nbsp;</TD>
                    </TR>
                    <TR> 
                      <TD ><table width="100%" border="0">
                          <tr> 
                            <td align="center"><a href="shop_info.asp?user_id=<%=tjshop("user_id")%>" target="_blank"><img src="<%=tjshop("shop_img")%>" width="160" height="120" border="1"></a></td>
                          </tr>
                          <tr> 
                            <td>店铺名称：<a href="shop_info.asp?user_id=<%=tjshop("user_id")%>" target="_blank"><%=tjshop("shop_name")%></a></td>
                          </tr>
                          <tr> 
                            <td>店长：<%=tjshop("user_realname")%></td>
                          </tr>
                          <tr> 
                            <td>店铺简介：<%=left(tjshop("shop_content"),30)%>……</td>
                          </tr>
                        </table></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD><IMG height=11 src="images/kuai21.gif" 
        width=190></TD>
                    </TR>
                  </TBODY>
                </TABLE>
              </TD>
            </TR>
          </TBODY>
        </TABLE>
<%
tj.close
set tj=nothing
tjshop.close
set tjshop=nothing
%>
       <br>
<%
set tj=server.createobject("adodb.recordset")
sql="select * from tj_info where tj_id<>1"
tj.open sql,conn,1,3
%>
        <TABLE cellSpacing=0 cellPadding=0 align=center border=0>
          <TBODY>
            <TR> 
              <TD width=779 vAlign=top> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD><IMG height=11 src="images/kuai20.gif" 
        width=190></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <TABLE width=100% border=0 cellPadding=0 cellSpacing=0>
                  <TBODY>
                    <TR> 
                      <TD width="8" rowspan="2" background=images/kuai12.gif>&nbsp;</TD>
                      <TD bgColor=#fff3d0 height=21> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                          <TBODY>
                            <TR> 
                              <TD align=middle width=25><IMG height=15 
                  src="images/y2.gif" width=13></TD>
                              <TD>本周推荐商品</TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                      <TD width="8" rowspan="2" background=images/kuai11.gif>&nbsp;</TD>
                    </TR>
                    <TR> 
                      <TD> <%do while not tj.eof %> <TABLE width="100%" border=0 cellPadding=4 cellSpacing=2 >
                          <TR> 
                            <TD width="75" rowspan="2" align="center"> <%Set tjgoods=Conn.Execute("select * from goods_info where goods_id="&tj("tj_info_id")&"")%>
                              <a href="goods_info.asp?goods_id=<%=tjgoods("goods_id")%>" target="_blank"><IMG src="<%=tjgoods("goods_pic")%>" width="70" height="70" border="1"></a></TD>
                            <TD><a href="goods_info.asp?goods_id=<%=tjgoods("goods_id")%>" target="_blank"><%=tjgoods("goods_name")%></a></TD>
                          </TR>
                          <TR> 
                            <TD valign="top"><%=left(tjgoods("goods_content"),20)%> ……</TD>
                          </TR>
                          <TBODY>
                          </TBODY>
                        </TABLE>
                        <%
tj.movenext
loop

%> </TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD><IMG height=11 src="images/kuai21.gif" 
        width=190></TD>
                    </TR>
                  </TBODY>
                </TABLE>
            </TD>
            </TR>
          </TBODY>
        </TABLE>
      </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"-->