default.asp

来自「功能简介: 1) 首页投票调查系统 2）FLASH导航清新直观（带FLA源文件」· ASP 代码 · 共 214 行

<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<% if session("voted")="" then session("voted")=1 %>
<table width="750" border="0" align="center" cellspacing="0">
  <tr>
    <td width="233"><img src="images/1.gif" width="233" height="115"></td>
    <td width="8" background="images/line1.gif">&nbsp;</td>
    <td width="506"><table width="504" height="116" border="0" align="center" cellspacing="0">
        <tr> 
          <td width="493" height="38"> 
          <table width="505" height="34" border="0" cellpadding="0" cellspacing="0">
            <tr>
              <td width="503" background="images/homedhbg.gif"><img src="images/picnews.gif" width="214" height="34"></td>
            </tr>
          </table></td>
        </tr>
        <tr> 
          <td height="74" valign="top"><ul class=noticesul>
		  <%
	sql="select top 4 *  from diary "
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="shownotice.asp?id=<% =rs("d_id") %>"><% =gottopic(rs("d_content"),56) %>&nbsp;&nbsp;&nbsp;&nbsp;<% =rs("d_date") %></a>
	<% rs.movenext
		loop
		rs.close
	%>
		  </ul></td>
        </tr>
      </table></td>
  </tr>
</table>
<table width="750" height="14" border="0" align="center" cellspacing="0">
  <tr>
    <td height="14" background="images/line.gif">&nbsp;</td>
  </tr>
</table>
<table width="750" height="130" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td background="images/mi.gif"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="750" height="130">
        <param name="movie" value="images/al.swf">
        <param name="quality" value="high">
        <param name="wmode" value="transparent">
        <embed src="images/al.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="776" height="120"></embed>
    </object></td>
  </tr>
</table>
<table width="750" height="608" border="0" align="center" cellspacing="0" style="table-layout:fixed;">
  <tr>
    <td width="106" height="152" valign="top"><a href="morearticle.asp?id=1"><img src="images/xiaoyuanzixun.jpg" width="105" height="150" border="0"></a></td>
	<td valign=top><ul class="ul1">
	<%
	sql="select top 8 *  from art where cat_id=1 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%>
	</ul></td>
    <td width="106"><a href="morearticle.asp?id=2"><img src="images/xiaoyuanwenxue.jpg" width="105" height="150" border="0"></a></td>
	<td valign=top>
	<ul class="ul1">
	<%
	sql="select top 8 * from art where cat_id=2 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%>
	</ul>
	</td>
  </tr>
  <tr>
    <td height="152" width=105 ><a href="morearticle.asp?id=3"><img src="images/kaoyanxianfeng.jpg" width="105" height="150" border="0"></a></td>
	<td><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=3 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
    <td width=105 ><a href="morearticle.asp?id=4"><img src="images/wangluoxueyuan.gif" width="105" height="150" border="0"></a></td>
	<td><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=4 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
  </tr>
  <tr>
    <td height="152" width=105 ><a href="morearticle.asp?id=5"><img src="images/dongmantianxia.gif" width="105" height="150" border="0"></a></td>
	<td><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=5 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
    <td width=105><a href="morearticle.asp?id=6"><img src="images/yingyutequ.gif" width="105" height="150" border="0"></a></td>
	<td><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=6 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
  </tr>
  <tr>
    <td height="152" width=105><a href="morearticle.asp?id=7"><img src="images/xueshengchuangye.gif" width="105" height="150" border="0"></a></td>
	<td ><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=7 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
    <td width=105><a href="morearticle.asp?id=8"><img src="images/gexingnvsheng.gif" width="105" height="150" border="0"></a></td>
	<td ><ul class="ul1"><%
	sql="select top 8 *  from art where cat_id=8 order by art_date desc"
	rs.open sql,conn,1,3
	do while not rs.eof
	%>
	<li class=li1><a href="showarticle.asp?id=<% =rs("art_id") %>"><% =gottopic(rs("art_title"),32) %></a>
	<% rs.movenext
		loop
		rs.close
	%></ul></td>
  </tr>
</table>
<table width="750" border="0" align="center" cellspacing="0">
  <tr>
    <td background="images/line.gif">&nbsp;</td>
  </tr>
</table>
<table width="750" height="174" border="0" align="center" cellspacing="0">
  <tr>
    <td width="175" height="174"><table width="175" height="181" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="173" height="44"><img src="images/zxdc.gif" width="173" height="34"></td>
      </tr>
      <tr>
          <td height="137" valign="top">
		  <% sql="select voteitem.* ,votetopic.vt_name from votetopic,voteitem where votetopic.vt_id=voteitem.vt_id order by votetopic.vt_startdate desc"
		  rs.open sql,conn,1,3
		  response.Write("<div align=center><b>" & rs("vt_name") & "</b></div>")
		  do while not rs.eof
		  %>
		  <div style="cursor:hand" onclick="children[0].checked=true;window.open('showvote.asp?vtid=<% =rs("vt_id") %>&itemid=<% =rs("item_id") %>','','width=500,height=300')"><input type="radio" id=vtr name="vt_item">
		  <% =rs("item_name") %>
		  </div>
		  <% rs.movenext 
		  loop
		  rs.close
		  %>
		  
		  </td>
      </tr>
    </table></td>
    <td width="8" background="images/line1.gif">&nbsp;</td>
    <td width="561"><img src="images/mid.gif" width="560" height="174"></td>
  </tr>
</table>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="13" background="images/line.gif">&nbsp;</td>
  </tr>
</table>
<table width="750" height="175" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="279" height="34" background="images/homedhbg.gif"><img src="images/lmdhs.gif" width="214" height="34"></td>
    <td width="280" background="images/homedhbg.gif">&nbsp;</td>
  </tr>
  <tr>
    <td>『<a href="morearticle.asp?id=1">校园资讯</a>』 <a href="xiaolei.asp?id=1">校园动态</a> <a href="xiaolei.asp?id=2">教育要闻</a> <a href="xiaolei.asp?id=3">校园法制</a> <a href="xiaolei.asp?id=4">政策法规</a></td>
    <td>『<a href="morearticle.asp?id=2">校园文学</a>』 <a href="xiaolei.asp?id=5">男生女生</a> <a href="xiaolei.asp?id=6">我的大学</a> <a href="xiaolei.asp?id=7">青春感悟</a> <a href="xiaolei.asp?id=8">我要乱弹</a> </td>
  </tr>
  <tr>
    <td>『<a href="morearticle.asp?id=3">考研先锋</a>』 <a href="xiaolei.asp?id=9">考研资讯</a> <a href="xiaolei.asp?id=10">明师导航</a> <a href="xiaolei.asp?id=11">院校导航</a> <a href="xiaolei.asp?id=12">考研心路</a></td>
    <td>『<a href="morearticle.asp?id=4">网络学院</a>』 <a href="xiaolei.asp?id=13">网页设计</a> <a href="xiaolei.asp?id=14">网络编程</a> <a href="xiaolei.asp?id=15">建站资源</a> <a href="xiaolei.asp?id=16">网络文学</a></td>
  </tr>
  <tr>
    <td>『<a href="morearticle.asp?id=5">动漫天下</a>』 <a href="xiaolei.asp?id=17">动漫文学</a> <a href="xiaolei.asp?id=18">动漫音乐</a> <a href="xiaolei.asp?id=19">动漫书库</a> <a href="xiaolei.asp?id=20">动漫剧场</a></td>
    <td>『<a href="morearticle.asp?id=6">英语特区</a>』 <a href="xiaolei.asp?id=21">英语考试</a> <a href="xiaolei.asp?id=22">在线阅读</a> <a href="xiaolei.asp?id=23">口语表达</a> <a href="xiaolei.asp?id=24">词汇天地</a></td>
  </tr>
  <tr>
    <td>『<a href="morearticle.asp?id=7">学生创业</a>』 <a href="xiaolei.asp?id=25">创业项目</a> <a href="xiaolei.asp?id=26">创业资金</a> <a href="xiaolei.asp?id=27">创业平台</a> <a href="xiaolei.asp?id=28">创业心情</a></td>
    <td>『<a href="morearticle.asp?id=8">个性女生</a>』 <a href="xiaolei.asp?id=29">健康至美</a> <a href="xiaolei.asp?id=30">处处动人</a> <a href="xiaolei.asp?id=31">情感沙龙</a> <a href="xiaolei.asp?id=32">娱乐八卦</a></td>
  </tr>
</table>
<script>document.title="青春飞杨-首页";</script>
<!--#include file="foot.asp"-->