index_zhuanti.asp

asp的网上卖东西的..看看还可以的吧

<TABLE cellSpacing=0 cellPadding=0 width=230 border=0>
        <TBODY>
          <TR>
            <TD>
              <TABLE cellSpacing=0 cellPadding=0 width=230 
                              border=0>
                <TBODY>
                  <TR>
                    <TD><IMG height=6 
                                src="images/mydata_right_top.gif" 
                                width=230></TD>
                  </TR>
                  <TR>
                    <TD align=middle 
                                background=images/mydata_right_bg.gif>
                      <TABLE cellSpacing=0 cellPadding=0 width=212 
                                border=0>
                        <TBODY>
                          <TR>
                            <TD align=middle>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=206 border=0>
                                <TBODY>
                                  <TR>
                                    <TD height=24><IMG height=14 
                                src="images/sub_review_icon.gif" width=21 
                                align=absMiddle>商品专题</TD>
                                    <TD vAlign=bottom width=19>&nbsp;</TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD><IMG height=2 
                                src="images/downrank_sun.gif" 
                                width=212></TD>
                          </TR>
                          <TR>
                            <TD height=5></TD>
                          </TR>
                          <TR>
                            <TD align=middle>
							<%set rs=server.createobject("adodb.recordset")
		rs.open "select * FROM BJX_zhuanti  order by newsid desc",conn,1,1
		if rs.recordcount=0 then 
		%>
              <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td align=center>暂无专题</td>
                </tr>
              </table>
              <%
		else
		x=6
		%>
                                <TABLE width="100%"  border=0 
                                cellPadding=0 cellSpacing=0 class=sub_basic>
                                <TBODY>
								<%
			do while not rs.eof
			%>
                                <TR>
                                <TD height=20><IMG height=2 
                                src="images/jum_bullet.gif" width=12 
                                align=absMiddle><a href=listzt.asp?id=<%=rs("newsid")%> title=时间：<%=year(rs("updatetime"))&"."&month(rs("updatetime"))&"."&day(rs("updatetime"))%>><%=replace(trim(rs("title")),"<br>","")%></a></TD>
                               
                               
                          </tr>
						  <%
		rs.movenext
		loop
		rs.close
		set rs=nothing
			end if
			%>
                            </TBODY></TABLE>							</TD>
                          </TR>
                          <TR>
                            <TD 
                                height=5></TD>
                          </TR>
                        </TBODY>
                    </TABLE></TD>
                  </TR>
                  <TR>
                    <TD><IMG height=4 
                                src="images/mydata_right_bottom.gif" 
                                width=230></TD>
                  </TR>
                </TBODY>
            </TABLE></TD>
          </TR>
          <TR>
            <TD 
                    height=10></TD>
          </TR>
        </TBODY>
    </TABLE>