index.asp

学校网站管理系统

<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/dll.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="inc/indexvar.asp"-->
<!--#include file="sqlx.asp"-->
<%
title=""
call pass()
call top()
'第一大表格开始
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width' valign='top'>")
YCMS("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
call br()
'会员登陆口开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><td  class=lefttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;会员登陆</td><td  class=lefttopright></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=170>")
call login()
YCMS("</td><td class=leftcenterright></td></tr></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
YCMS("</td><td  width='5'></td><td valign='top' align=right>")
call br()
'新闻、公告开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;新闻动态<span style='width=400px'></span><img border=0 src='img/more.gif' align=absmiddle>&nbsp;<a href=news.asp title='更多新闻……'><font color=#007100>更多……</font></a></td></tr></table>")
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter valign='top' height=170>")
call YC_news()
YCMS("</TD></TR></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft ></td><td class=rightfootcenter></td></tr></table>")
call br()
YCMS("</td></tr></table></td><td class=right></td></tr></table>")
'第一大表格结束
'第二大表格开始
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width'>")
YCMS("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
'统计信息开始
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><td class='lefttopcenter'>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;统计信息</td><td class='lefttopright'></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class='leftcentercenter'  height=200>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' rules=rows frame=void width='100%' bordercolor="&border&"><tr><td height=19>&nbsp;<img src=img/title2.gif border='0'>&nbsp;新进会员：<font color=red>")
sql="select top 1 * from [YC_user] where pass=true order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
YCMS(YC_Kill_Word(rs("user_name"),15))
rs.close
set rs=nothing
YCMS("</font></td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;会员注册：")
call mytable("YC_user")
YCMS("&nbsp;人</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;新闻动态：")
call mytable("YC_news")
YCMS("&nbsp;条</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;文章作品：")
call mytable("YC_art")
YCMS("&nbsp;篇</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;精品图片：")
call mytable("YC_pic")
YCMS("&nbsp;张</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;娱乐欣赏：")
call mytable("YC_dj")
YCMS("&nbsp;个</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;软件下载：")
call mytable("YC_down")
YCMS("&nbsp;个</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;本站频道：")
call mytable("YC_other")
YCMS("&nbsp;个</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;友情连接：")
call mytable("YC_link")
YCMS("&nbsp;个</td></tr>")
YCMS("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;访客留言：")
call mytable("YC_book")
YCMS("&nbsp;条</td></tr></table>")
YCMS("</td><td class=leftcenterright></td></tr></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
'会员排行开始
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;会员排行</td><td class='lefttopright'></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=115 align='center'>")
call br()
call YC_user()
call br()
YCMS("</td><td class=leftcenterright></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
YCMS("</td><td  width='5'></td><td valign='top' align=right>")
'图片开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;图片欣赏<span style='width=380px'></span><img border=0 src='img/more.gif' align=absmiddle>&nbsp;<a href=pic.asp title='更多图片……'><font color=#007100>更多……</font></a></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter  valign='top'>")
%>
<table border="0"   cellspacing="0" cellpadding="0"><tr>
<td class=rightcenterleft></td>
<td  class=rightcentercenter  valign=top>
<table border=0 cellspacing="0" cellpadding="0" width=100%>
<tr><td style="border-bottom:1px dotted #007100;"> 
<%call br()
response.Write"&nbsp;<img src=img/newday.gif border=0 align=absmiddle>&nbsp;本栏目共有图片&nbsp;<font color=red>"
call mytable("YC_pic")
response.Write"</font>&nbsp;张，其中"
set rspic=server.CreateObject("adodb.recordset")
sqlpic="select date from YC_pic where date=#"&date()&"#"
rspic.open sqlpic,conn,1,3
response.Write"今日更新&nbsp;<font color=red>"
if not rspic.eof and not rspic.bof then
response.Write rspic.recordcount
else
response.Write"<font color=red>0</font>"
end if
response.Write"</font>&nbsp;张，等待审核&nbsp;<font color=red>"&picnopass&"</font>&nbsp;张。"
call br()
%>
</td></tr><tr><td>
<div  id=demo class=gopic>
<table align=center cellpadding=0 cellspace=0 border=0><tr><td id=demo1 valign=top><%call YC_pic()%>
</td><td id=demo2 valign=top ></td></tr></table></div>
<script>var Picspeed=1
demo2.innerHTML=demo1.innerHTML
function Marquee1(){if(demo2.offsetWidth-demo.scrollLeft<=0)
demo.scrollLeft-=demo1.offsetWidth
else{
demo.scrollLeft++
}}var MyMar1=setInterval(Marquee1,Picspeed)
demo.onmouseover=function() {clearInterval(MyMar1)}
demo.onmouseout=function() {MyMar1=setInterval(Marquee1,Picspeed)}</script></td></TR></table>   
</TD></TR></table>
<%
YCMS("</TD></TR></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
'娱乐开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;影音娱乐<span style='width=400px'></span><img border=0 src='img/more.gif' align=absmiddle>&nbsp;<a href=dj.asp title='更多娱乐……'><font color=#007100>更多……</font></a></td></tr></table>")
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td class=rightcentercenter valign='top' height=170>")
call YC_dj()
YCMS("</TD></TR></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
YCMS("</td></tr></table></td><td class=right></td></tr></table>")
'信箱开始
YCMS("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width'>")
YCMS("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;信箱登陆</td><td class='lefttopright'></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=120>")
call br
%>
<script language="javascript">
function chkinput(f){var tmp=f.name.value;if(!tmp){alert("请填写您要查询的内容!");return false;}var tmp2=f.tiaojian.value;if(!tmp2){alert("请选择您要查询的条件!");return false;}return true;}function chkinput2(f){var tmp=f.user.value;if(!tmp){alert("帐号不能为空!");return false;}var tmp2=f.pass.value;if(!tmp2){alert("密码不能为空!");return false;}var tmp3=f.site.value;if(!tmp3){alert("您没有选择信箱!");return false;}return true;}function MM_openBrWindow(theURL,winName,features){window.open(theURL,winName,features);}</script>
<form name=loginmail onsubmit="return chkinput2(this);" target="nnn" action=http://www.hao123.com/sendmail.php method=post>
<center>帐号：<input class=yecao tabIndex=1 style="width:100px" size=14 name=user>
<table><td height=5></td></table>
信箱：<select tabIndex=2 size=1 name=site class="yecao" style="width:100px">
<option value selected>选择信箱</option>
<option value=21cn.com>@21cn.com</option>
<option value=163.net>@163.net</option>
<option value=tom.com>@tom.com</option>
<option value="163.com">@163.com</option>
<option value=sohu.com>@sohu.com</option>
<option value=263.net>@263.net</option>
<option value=sina.com>@sina.com</option>
<option value=126.com>@126.com</option>
<option value="cn.yahoo.com">雅虎</option>
<option value="xinhuanet.com">新华网</option>
<option value="hotmail.com">@hotmail.com</option>
<option value="56.com">@56.com</option>
<option value="gmail.com">@gmail.com</option>
</select>
<table><td height=5></td></table>
密码：<input style="width:100px" tabIndex=3 class=yecao type=password size=13
name=pass> <table><td height=5></td></table>
<input style=FONT-SIZE:12px tabIndex=4 type=submit value="登 录"
name=Submit2 onclick=setTimeout('clearpass()',1000) class=put>
<input style=FONT-SIZE:12px tabIndex=4 type=reset value="清 空"
name=Submit1 class=put>
</form>
<%
call br
YCMS("</td><td class=leftcenterright></td></tr></table>")
'第二大表格结束
'第三大表格开始
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br
'连接开始
YCMS("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;友情连接<span style='width=50px'></span></td><td class='lefttopright'></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=222 align='center'>")
YCMS("<DIV id=oRollV style='MARGIN:0px;OVERFLOW:hidden; HEIGHT: 195px'><DIV id=oRollV1>")
call YC_link()
YCMS("</DIV><DIV id=oRollV2></DIV></DIV>")
call YC_link2()
call br()
YCMS("</td><td class=leftcenterright></td></tr></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
YCMS("<td width='5'></td><td valign='top' align=right>")
'文章开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;文学天地<span style='width=400px'></span><img border=0 src='img/more.gif' align=absmiddle>&nbsp;<a href=art.asp title='更多文章……'><font color=#007100>更多……</font></a></td></tr></table><table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter  valign='top' height=170>")
call YC_art()
YCMS("</TD></TR></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
'下载开始
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;<img border=0 src='img/mor.gif' align=absmiddle>&nbsp;下载中心<span style='width=400px'></span><img border=0 src='img/more.gif' align=absmiddle>&nbsp;<a href=down.asp title='更多软件下载……'><font color=#007100>更多……</font></a></td></tr></table>")
YCMS("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter valign='top' height=170>")
call YC_down()
YCMS("</TD></TR></table>")
YCMS("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
YCMS("</td></tr></table></td><td class=right></td></tr></table>")
'第三大表格结束

YCMS("<SCRIPT>StartRollV();StartRollH();</SCRIPT>")

call foot()%>