top.asp

采用ASP+ACCESS+ASPUPJPG组件构成

<table width="790" border="0" align="center" cellpadding="0" cellspacing="0" id="container">
  <tr>
    <td>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0" class="content" style="background:url('images/top_bgline.png') repeat-x; ">
  <tr>
          <td width="174">
			<img src="images/mypoco_logo.png" width="174" height="75"></td>
          <td width="178">
			<img src="images/mypoco_1.png" width="178" height="75"></td>
          <td width="199">
			<img src="images/mypoco_2.png" width="199" height="75"></td>
          <td width="219" align="right" valign="bottom"><span id="top_nav"><a href="../index.asp">网站主页</a> <a href="../aboutme.htm" target="_blank">关于朱朱</a> <a href="../mobiles/" target="_blank">爱好</a> <a href="../gb/index.asp" target="_blank">留言</a> <a href="../blog.htm" target="_blank">杂记</a></span></td>
        </tr>
      </table>
      <table width="770" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#D7DEE6" id="flash" >
        <tr>
          <td align="center" background="images/flash_bg.png"><TABLE align=center background=images/banner.png border=0 cellPadding=0 cellSpacing=0 width=768 frame=vsides rules=none>
<TBODY><TR>
<TD height=60 vAlign=top width=768><span style=position:relative><div id="Layer2" style="position:absolute;left: 0px; top: 0px; width:758px; height:177px; z-index:1"><image src=images/0.gif width="768" height="177"></div></span>
<OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 height=177 width=768><PARAM NAME="movie" VALUE="images/6.swf"><PARAM NAME="quality" VALUE="high"><PARAM NAME="wmode" VALUE="transparent"><embed src="images/6.swf" width="768" height="177" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer"  type="application/x-shockwave-flash" wmode="transparent"></embed></OBJECT>
</TD>
</TR>
</TBODY>
</TABLE></td>
        </tr>
		      </table>
      <table width="770" border="0" align="center" cellpadding="0" cellspacing="1" class="content">
        <tr>
          <td width="770" valign="top">
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td>
		<table width="100%" border="0" cellspacing="0" cellpadding="0" class="pocoer_show">
                    <tr>
                      <td><table width="100%" height="20" border="0" align="center" cellpadding="3" cellspacing="0" >
<tr>
<td bgcolor="" width="461">&nbsp;<a href="index.asp"><b>首 页</b></a> >>
<%
sql = "SELECT * FROM type ORDER BY id ASC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,0,1
if rs.eof and rs.bof then
Response.Write"还没有分类"
else
do while not rs.eof
Response.Write"| <a href='type.asp?typeid="&rs("id")&"'><b>"&rs("name")&"</b></a>"
rs.movenext
loop
end if
rs.close
Set rs=Nothing
Response.Write"| <a href='allzhuanti.ASP'><b>列表形式</b></a>"
%>
</div></td>
<td width="291" align="right"><table border="0" cellspacing="0" cellpadding="3">
<form name="form1" method="get" action="search.asp">
<tr>
<td>搜索文件 </td>
<td align="center">Search</td>
<td align="left"><input type="text" name="key" size="15">
<input type="submit" name="Submit" value="确定">
</td>
</tr>
</form>
</table></td>
</tr>
</table></td>
                    </tr>
                    </table></td>
              </tr>
            </table>