index.asp

学校网站源码fdfdffdfdfdfdfdfdfdf

<!--#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()
'第一大表格开始
Huaihi("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width' valign='top'>")
Huaihi("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
call br()
'会员登陆口开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><td  class=lefttopcenter>&emsp;※&nbsp;会员登陆</td><td  class=lefttopright></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=170>")
call login()
Huaihi("</td><td class=leftcenterright></td></tr></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
Huaihi("</td><td  width='5'></td><td valign='top' align=right>")
call br()
'新闻、公告开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;※&nbsp;新闻动态<span style='width=400px'></span><a href=news.asp title='更多新闻……'>更多……</a></td></tr></table>")
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter valign='top' height=170>")
call Huaihi_news()
Huaihi("</TD></TR></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft ></td><td class=rightfootcenter></td></tr></table>")
call br()
Huaihi("</td></tr></table></td><td class=right></td></tr></table>")
'第一大表格结束


'第二大表格开始
Huaihi("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width'>")
Huaihi("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
'统计信息开始
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><td class='lefttopcenter'>&emsp;※&nbsp;统计信息</td><td class='lefttopright'></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class='leftcentercenter'  height=200>")
Huaihi("<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 [Huaihi_user] where pass=true order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
Huaihi(Huaihi_Kill_Word(rs("user_name"),15))
rs.close
set rs=nothing
Huaihi("</font></td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;会员注册：")
call mytable("Huaihi_user")
Huaihi("&nbsp;人</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;新闻动态：")
call mytable("Huaihi_news")
Huaihi("&nbsp;条</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;文章作品：")
call mytable("Huaihi_art")
Huaihi("&nbsp;篇</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;精品图片：")
call mytable("Huaihi_pic")
Huaihi("&nbsp;张</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;娱乐欣赏：")
call mytable("Huaihi_dj")
Huaihi("&nbsp;个</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;软件下载：")
call mytable("Huaihi_down")
Huaihi("&nbsp;个</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;本站频道：")
call mytable("Huaihi_other")
Huaihi("&nbsp;个</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;友情连接：")
call mytable("Huaihi_link")
Huaihi("&nbsp;个</td></tr>")
Huaihi("<tr><td height=19>&nbsp;<img src=img/title2.gif border='0' width=10 height=10>&nbsp;访客留言：")
call mytable("Huaihi_book")
Huaihi("&nbsp;条</td></tr></table>")
Huaihi("</td><td class=leftcenterright></td></tr></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
'会员排行开始
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;※&nbsp;会员排行</td><td class='lefttopright'></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=115 align='center'>")
call br()
call Huaihi_user()
call br()
Huaihi("</td><td class=leftcenterright></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
Huaihi("</td><td  width='5'></td><td valign='top' align=right>")
'图片开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;※&nbsp;图片频道<span style='width=400px'></span><a href='pic.asp' title='更多图片……'>更多……</a></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter  valign='top'>")
call Huaihi_pic()	
Huaihi("</TD></TR></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
'娱乐开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;※&nbsp;影音娱乐<span style='width=400px'></span><a href='dj.asp' title='更多影音娱乐……'>更多……</a></td></tr></table>")
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td class=rightcentercenter valign='top' height=170>")
call Huaihi_dj()
Huaihi("</TD></TR></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td  class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
Huaihi("</td></tr></table></td><td class=right></td></tr></table>")
'交流开始
Huaihi("<table border='0'  cellspacing='0' cellpadding='0' align='center' class='bgcolor'><tr><td class='left'></td><td class='width'>")
Huaihi("<table width='100%' border='0'  cellspacing='0' cellpadding='0'><tr><td valign='top'>")
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;※&nbsp;信箱登陆</td><td class='lefttopright'></td></tr></table>")
Huaihi("<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=web58818 tabIndex=1 style="width:100px" size=14 name=user>
<table><td height=5></td></table>
信箱：<select tabIndex=2 size=1 name=site class="web58818" 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=web58818 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
Huaihi("</td><td class=leftcenterright></td></tr></table>")
'第二大表格结束


'第三大表格开始
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br
'连接开始
Huaihi("<table border='0'   cellspacing='0' cellpadding='0'><td  class='lefttopcenter'>&emsp;※&nbsp;友情连接<span style='width=50px'></span><a href=link.asp title='更多友情连接……'>更多……</a></td><td class='lefttopright'></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td valign='top' class='leftcentercenter'  height=222 align='center'>")
Huaihi("<DIV id=oRollV style='MARGIN:0px;OVERFLOW:hidden; HEIGHT: 195px'><DIV id=oRollV1>")
call Huaihi_link()
Huaihi("</DIV><DIV id=oRollV2></DIV></DIV>")
call Huaihi_link2()
call br()
Huaihi("</td><td class=leftcenterright></td></tr></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class='leftfootcenter'></td><td class='leftfootright'></td></tr></table>")
call br()
Huaihi("<td width='5'></td><td valign='top' align=right>")
'文章开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;※&nbsp;文章作品<span style='width=400px'></span><a href=art.asp title='更多文章……'>更多……</a></td></tr></table><table border='0'   cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter  valign='top' height=170>")
call Huaihi_art()
Huaihi("</TD></TR></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
'下载开始
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=righttopleft></td><td class=righttopcenter>&emsp;※&nbsp;下载中心<span style='width=400px'></span><a href=down.asp title='更多软件下载……'>更多……</a></td></tr></table>")
Huaihi("<table border='0' cellspacing='0' cellpadding='0'><tr><td class=rightcenterleft></td><td  class=rightcentercenter valign='top' height=170>")
call Huaihi_down()
Huaihi("</TD></TR></table>")
Huaihi("<table border='0'  cellspacing='0' cellpadding='0'><tr><td class=rightfootleft></td><td class=rightfootcenter></td></tr></table>")
call br()
Huaihi("</td></tr></table></td><td class=right></td></tr></table>")
'第三大表格结束
Huaihi("<SCRIPT>StartRollV();StartRollH();</SCRIPT>")
call foot()
%>