index.asp

一套设计精美的学校网站全站系统

      </tr>
      <tr>
        <td colspan="2"><table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td class="1"><!--#include file=daodu.asp --></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td width="59"><img src="img/line_2h_1.gif" width="59" height="40"></td>
        <td width="239" height="40" background="img/line_2h_2.gif"><!--#include file=search1.asp--></td>
      </tr>
    </table></td>
  </tr>
  <tr>
    <td height="15" valign="top" background="img/line_2.gif"><img name="" src="" width="1" height="15" alt=""></td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#f4f4f4" style="border-left: 1px solid #cccccc; border-right: 1px solid #cccccc">
  <tr>
    <td width="180" rowspan="2" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="95%" height="120" align="center" cellpadding="0" cellspacing="6" bgcolor="#FFFFFF" style="border: 1px solid #cccccc">
          <tr>
		          <%
set rs=server.CreateObject("ADODB.RecordSet") 
rs.Source="select * from board where inuse=1"
rs.Open rs.Source,conn,1,1
if not rs.EOF then
%>
            <td align="center"><img src="img/left_notice.gif" width="160" height="30"></td>
          </tr>
          <tr>
            <td align="center"><script language=JavaScript>marquee1();</script>              <%=rs("content")%>
              <script language=JavaScript>marquee2();</script>
              <a href="board.asp" target="_blank">以前公告</a></td>
          </tr>
        </table>
        <%else
     rs.close
      set rs=nothing
      end if%>
		</td>
      </tr>
      <tr>
        <td><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
    </table>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><table width="95%"  align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #cccccc">
            <tr>
              <td><a href="bbs/" target="_blank"><img src="img/left_bbs.jpg" alt="欢迎进入新世纪论坛" width="170" height="49" border="0"></a></td>
            </tr>
          </table>
            <table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td><img name="" src="" width="1" height="8" alt=""></td>
              </tr>
            </table>
            <table width="95%"  align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #cccccc">
              <tr>
                <td><a href="chat/" target="_blank"><img src="img/left_chat.jpg" alt="欢迎进入新世纪聊天室" width="170" height="49" border="0"></a></td>
              </tr>
            </table>
            <table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td><img name="" src="" width="1" height="8" alt=""></td>
              </tr>
            </table>
            <table width="95%"  align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #cccccc">
              <tr>
                <td><a href="stu/" target="_blank"><img src="img/left_txr.jpg" alt="欢迎进入新世纪同学录" width="170" height="49" border="0"></a></td>
              </tr>
            </table>
            <table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td><img name="" src="" width="1" height="8" alt=""></td>
              </tr>
            </table>
            <table width="95%"  align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #cccccc">
              <tr>
                <td><img src="img/left_zsrx.jpg" alt="TLE:0573-4184415" width="170" height="49"></td>
              </tr>
            </table>
            <table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td><img name="" src="" width="1" height="8" alt=""></td>
              </tr>
            </table>
            <table width="95%"  align="center" cellpadding="0" cellspacing="6" bgcolor="#FFFFFF" style="border: 1px solid #cccccc">
            <tr>
              <td class="5"><img src="img/left_hot.gif" width="160" height="30"></td>
            </tr>
            <tr>
              <td class="5"><script src=new.asp?order=click&shu=8></script></td>
            </tr>
          </table></td>
        </tr>
        <tr>
          <td><img name="" src="" width="1" height="8" alt=""></td>
        </tr>
      </table>
      <table width="95%" align="center" bgcolor="#FFFFFF" style="border: 1px solid #cccccc">
        <tr>
          <td><img src="img/left_links.gif" width="160" height="30"></td>
        </tr>
        <tr>
          <td><%if showlinkmap=1 then%>
            <script language=JavaScript>marquee5();</script>
            <!--#include file=link_map.asp -->
            <script language=JavaScript>marquee6();</script>
            <%end if%>
            <%if showlink=1 then%>
          <%end if%></td>
        </tr>
        <tr>
          <td><div align="center">
              <select name="select" onChange="window.open(this.options[this.selectedIndex].value,'_blank')" size="1">
                <option value="">友情文字链接站点</option>
                <%
set rs10=server.CreateObject("ADODB.RecordSet") 
rs10.Source="select * from link where linktype=0 and pass=1 order by ID DESC "
rs10.Open rs10.Source,conn,1,1
if not rs10.EOF then
while not rs10.EOF
%>
                <option value="<%=rs10("weburl")%>"><%=rs10("webname")%></option>
                <%
rs10.MoveNext
wend
%>
                <%
else
Response.Write "<option value=''>目前还没有</option>"
end if
rs10.Close
set rs10=nothing
%>
              </select>
          </div></td>
        </tr>
        <tr>
          <td><div align="center">
              <input type=button style="cursor:hand" name=link value="申请" onClick="javascript:linkreg()">
              <input type=button style="cursor:hand" name=link value="更多" onClick="javascript:morelink()">
          </div></td>
        </tr>
      </table>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><img name="" src="" width="1" height="8" alt=""></td>
        </tr>
        <tr>
          <td><table width="95%" align="center" cellpadding="0" cellspacing="6" bgcolor="#FFFFFF" style="border: 1px solid #cccccc">
            <tr>
              <td><img src="img/left_site.gif" width="160" height="30"></td>
            </tr>
            <tr>
              <td><table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td><%								
function gettipnum()
dim tmprs
tmprs=conn.execute("Select Count(NewsID) from News where checkked=1")
gettipnum=tmprs(0)
set tmprs=nothing
if isnull(gettipnum) then gettipnum=0
end function

function todays()
dim tmprs
tmprs=conn.execute("Select count(NewsID) from News Where checkked=1 and year(updatetime)=year(date()) and month(updatetime)=month(date()) and day(updatetime)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function

function getusernum()
dim rs
rs=conn.execute("Select Count(ID) from admin")
getusernum=rs(0)
set rs=nothing
if isnull(getusernum) then getusernum=0
end function

function getgg()
dim rs
rs=conn.execute("Select Count(ID) from admin where sex='先生'")
getgg=rs(0)
set rs=nothing
if isnull(getgg) then getgg=0
end function

function getmm()
dim rs
rs=conn.execute("Select Count(ID) from admin where sex='女士'")
getmm=rs(0)
set rs=nothing
if isnull(getmm) then getmm=0
end function

function getother()
dim rs
rs=conn.execute("Select Count(ID) from admin where sex='保密'")
getother=rs(0)
set rs=nothing
if isnull(getother) then getother=0
end function
%>
                    ○- 今日文章：<font color=red><%=todays()%></font><br> 
                    ○- 文章总数：<font color=red><%=gettipnum()%></font><br>
				    ○- 会员总数：<font color=red><%=getusernum()%></font><br> 
                  <!--#include file=lastmember.asp --><br>
                  <%if showcount=1 then%>
                  <script src=include/cnt.asp></script>
				  <!--#include file=include/zx.asp -->
				  <br>   ○- 当前在线：<font color=red><%=i%></font><br> <br>
				  <%end if%></td>
                </tr>
              </table></td>
            </tr>
          </table></td>
        </tr>
      </table>
      </td>
    <td rowspan="2" valign="top" bgcolor="#f4f4f4"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="8"><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="96%" style="border: 1px solid #cccccc" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
          <tr>
            <td><img src="img/m_school.gif" width="360" height="30" border="0" usemap="#Map"></td>
          </tr>
          <tr>
            <td><table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="100"><div align="center"><img src="img/m_1.gif" width="80" height="80"></div></td>
                  <td background="img/line1.gif"><script src=news.asp?typeid=10&shu=8></script></td>
                </tr>
            </table></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td height="8"><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="96%" style="border: 1px solid #cccccc" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
          <tr>
            <td><img src="img/m_schoolnews.gif" width="360" height="30" border="0" usemap="#Map2"></td>
          </tr>
          <tr>
            <td><table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="100"><div align="center"><img src="img/m_2.gif" width="80" height="80"></div></td>
                  <td background="img/line1.gif"><script src=news.asp?typeid=7&shu=8></script></td>
                </tr>
            </table></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td height="8"><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="96%" style="border: 1px solid #cccccc" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
          <tr>
            <td><img src="img/m_jxkn.gif" width="360" height="30" border="0" usemap="#Map3"></td>
          </tr>
          <tr>
            <td><table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="100"><div align="center"><img src="img/m_3.gif" width="80" height="80"></div></td>
                  <td background="img/line1.gif"><script src=news.asp?typeid=4&shu=8></script></td>
                </tr>
            </table></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td height="8"><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="96%" style="border: 1px solid #cccccc" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
          <tr>
            <td><img src="img/m_dyjy.gif" width="360" height="30" border="0" usemap="#Map4"></td>
          </tr>
          <tr>
            <td><table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="100"><div align="center"><img src="img/m_4.gif" width="80" height="80"></div></td>
                  <td background="img/line1.gif"><script src=news.asp?typeid=5&shu=8></script></td>
                </tr>
            </table></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td height="8"><img name="" src="" width="1" height="8" alt=""></td>
      </tr>
      <tr>
        <td><table width="96%" style="border: 1px solid #cccccc" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
          <tr>
            <td><img src="img/m_stu.gif" width="360" height="30" border="0" usemap="#Map5"></td>
          </tr>