📄 viewpm.asp
字号:
<link href=css.css rel=stylesheet>
<!--#include file="conn.asp"-->
<!--#include file="webinfo.asp"-->
<!--#include file="fun.asp"-->
<!--#include file="check.asp"-->
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权：野马原创 ''''
''''联系：ctplr@163.com ''''
''''说明：需要新功能联系我 ''''
''''QQ:2643148 ''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''获取系统资料''
sql="select username from ct_sql"
rs.open sql,cn,1,1
menbershenhenum=rs.recordcount
rs.close
sql="select username from ct_sql where noshenhe=0"
rs.open sql,cn,1,1
menbernoshenhenum=rs.recordcount
rs.close
sql="select username from ct_sql where mustqdok=1"
rs.open sql,cn,1,1
todaylogin=rs.recordcount
rs.close
sql="select username from ct_sql where todayqd=1"
rs.open sql,cn,1,1
nologinout=rs.recordcount
rs.close
sql="select username from ct_sql where todaylatter=1"
rs.open sql,cn,1,1
latter=rs.recordcount
rs.close
sql="select username from ct_sql where sucnownum=1"
rs.open sql,cn,1,1
noshenhesuc=rs.recordcount
rs.close
sql="select id from artic "
rs.open sql,cn,1,1
wznum=rs.recordcount
rs.close
sql="select id from annouce "
rs.open sql,cn,1,1
ggnum=rs.recordcount
rs.close
%>
<html>
<head>
<title><%=webname%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css" type="text/css">
</head>
<body onkeydown="if(event.keyCode==122){event.keyCode=0;return false}" bgcolor="#CACACA" background="images/index_bj.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<div align=CENTER valign=top>
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr>
<table width="750" border="0" cellpadding="0" cellspacing="0" align="center">
<!--#include file="top.asp"-->
<tr>
<td width="184" height="667" align="center" valign="top" bgcolor="#4D87D6"><table width="86%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" background="images/time.GIF" bgcolor="#FFFFFF"> <strong> <font color="#FFaa00">当前时间</font></strong></td>
</tr>
<tr>
<td height="68" align="center" valign="middle" class=sec_menu><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="140" height="115">
<param name="movie" value="images/Clock.swf">
<param name="quality" value="high">
<embed src="images/Clock.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="140" height="115"></embed></object></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td height="30" background="images/login.GIF"> <strong> <font color="#FFaa00">登陆接口</font></strong></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class=sec_menu><%if (session("name")="" ) then%>
<!--#include file=login.asp-->
<%else %>
<!--#include file=loginin.asp-->
<%end if%> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td height="30" background="images/tj.GIF"> <strong> <font color="#FFaa00">统计数据</font></strong></td>
</tr>
<tr>
<td class=sec_menu> <img src=./images/favorites.gif> 系统文章数量<font color=green><%=wznum%></font>篇<br>
<img src=./images/favorites.gif> 系统公告数量<font color=green><%=ggnum%></font>篇<br>
<img src=./images/favorites.gif> 已审核成员<font color=green><%=menbershenhenum%></font>个<br>
<img src=./images/favorites.gif> 未审核成员<font color=green><%=menbernoshenhenum%></font>个<br>
<img src=./images/favorites.gif> 今天已签到人员<font color=green><%=todaylogin%></font>个<br>
<img src=./images/favorites.gif> 当前未注销人员<font color=green><%=nologinout%></font>个<br>
<img src=./images/favorites.gif> 今天迟到人员<font color=green><%=latter%></font>个<br>
</td>
</tr>
<tr>
<td> </td>
</tr>
</table></td>
<td width="566" bgcolor="#4D87D6" align="center" valign="top"><table width="100%" height="679" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top">
<%
act=request("act")
if act="" then
act="dft"
end if
if act="dft" then
if viewnum=0 then
response.write "<script >alert('该功能未开放');history.back();</script>"
else
%>
<center>
<form action="?act=look" method=post name=frm>
<table border=1 bgcolor=#E4F7FE bordercolor=#3399ff><br>
<tr align="center" >
<td height="23" colspan="4" background="images/NavBG.gif"> <img src="images/checkarticle.gif" > <font color=yellow>查看数据库排名记录</font></td>
</tr>
<tr >
<td height="5" colspan="4" align="center" bordercolor="#FF9900" background="images/loginLine.gif" > </td>
</tr>
<tr> <td colspan="2" align="center" >察看前<input type=text name=nnum value=50 size=4 class=ebox>名<br>
<select name="ptype" class=dbox>
<option value=0>选择工作组</option>
<%
sql="select * from type"
rs1.open sql,cn,1,1
do while not rs1.eof
tname=rs1("typename")
%>
<option value=<%=rs1("type")%> ><%=tname%>
<%
rs1.movenext
loop
rs1.close
%>
</select>
</td> <td rowspan=2>排名<br>项目<Br></td><td rowspan=2 valign=center>
<input type=radio name=ltype value="签到"><font color=blue>月签到数
<input type=radio name=ltype checked value="所有签到">总签到数</font><br>
<input type=radio name=ltype value="迟到"><font color=red>月迟到数
<input type=radio name=ltype value="所有迟到">总迟到数</font><br>
</td></tr>
<tr >
</tr>
<tr >
<td height="5" colspan="4" align="center" bordercolor="#FF9900" background="../images/loginLine.gif" > </td>
</tr>
<tr><td colspan=4 align=center> <input type=submit value=查看排名 class=ibox > </td></tr>
</table>
</form>
<% end if
end if
if act="look" then
num=int(request.form("nnum")-1)
if num=empty or num<1 then
num=9
end if
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''查看'''''''''''''''''''''''''''''''''
if request("ptype")=0 then
response.write "<script>alert('请选择工作组');history.back();</script>"
else
ptype=request("ptype")
ltype= request("ltype")
sql="select * from type where type="&ptype
rs1.open sql,cn,1,1
gamename=rs1("typename")
rs1.close
if ltype="签到" then
sql="select * from ct_sql where type="&ptype&" and monthqdpaiming>0 order by monthqdpaiming "
rs.open sql,cn,1,1
monthqdpmtime=rs("monthqdpmtime")
%>
<center><p align=center><font color=#000000 size=5><br> <font color=yellow><%=gamename%></font><font color=red><%=ltype%></font>排名<font color=blue> </font></font><br>
<font color=#eeeeee>排名时间:<%=monthqdpmtime%></font> | <a href=# onclick="history.back()" class=wiht><-BACK</A></p>
<TABLE border=1 bordercolor=#3399ff bgcolor=#e4f7fe width=60%/><tr><tr><td bgcolor=#eeeeee align=center><b>排名</b></td>
<td bgcolor=#eeeeee align=center><b>职务</b></td><td bgcolor=#eeeeee align=center><b>真实姓名</b></td>
<td bgcolor=#eeeeee align=center><b>本月签到次数</b></td></tr>
<% do while (not rs.eof and n<num+1)
pname=rs("ltype")
realname=rs("realname")
monthqdnum=rs("monthqdnum")
monthqdpaiming=rs("monthqdpaiming")
%>
<tr><td align=center><font color=green><%=monthqdpaiming%> </td>
<td align=center><%=pname%> </td>
<td align=center><%=realname%> </td>
<td align=center><font color=red> <%=monthqdnum%> </td></tr>
<%
rs.movenext
n=n+1
loop
response.write "</TABLE>"
end if
if ltype="所有签到" then
sql="select * from ct_sql where type="&ptype&" and allqdpaiming>0 order by allqdpaiming"
rs.open sql,cn,1,1
allqdpaimingtime=rs("allqdpaimingtime")
%>
<center><p align=center><font color=#000000 size=5><br> <font color=yellow><%=gamename%></font><font color=red><%=ltype%></font>排名<font color=blue> </font></font><br>
<font color=#eeeeee>排名时间:<%=allqdpaimingtime%></font> | <a href=# onclick="history.back()" class=wiht><-BACK</A></p>
<TABLE border=1 bordercolor=#3399ff bgcolor=#e4f7fe width=60%/><tr><tr><td bgcolor=#eeeeee align=center><b>排名</b></td>
<td bgcolor=#eeeeee align=center><b>职务</b></td><td bgcolor=#eeeeee align=center><b>真实姓名</b></td>
<td bgcolor=#eeeeee align=center><b>所有签到次数</b></td></tr>
<% do while (not rs.eof and n<num+1)
pname=rs("ltype")
realname=rs("realname")
allqdnum=rs("allqdnum")
allqdpaiming=rs("allqdpaiming")
%>
<tr><td align=center><font color=green><%=allqdpaiming%> </td>
<td align=center><%=pname%> </td>
<td align=center><%=realname%> </td>
<td align=center><font color=red> <%=allqdnum%> </td> </tr>
<%
rs.movenext
n=n+1
loop
response.write "</TABLE>"
end if
if ltype="迟到" then
sql="select * from ct_sql where type="&ptype&" and monthlatterpaiming>0 order by monthlatterpaiming"
rs.open sql,cn,1,1
monthlatterpmtime=rs("monthlatterpmtime")
%>
<center><p align=center><font color=#000000 size=5><br> <font color=yellow><%=gamename%></font><font color=red><%=ltype%></font>排名<font color=blue> </font></font><br>
<font color=#eeeeee>排名时间:<%=monthlatterpmtime%></font> | <a href=# onclick="history.back()" class=wiht><-BACK</A></p>
<TABLE border=1 bordercolor=#3399ff bgcolor=#e4f7fe width=60%/><tr><tr><td bgcolor=#eeeeee align=center><b>排名</b></td>
<td bgcolor=#eeeeee align=center><b>职务</b></td><td bgcolor=#eeeeee align=center><b>真实姓名</b></td>
<td bgcolor=#eeeeee align=center><b>本月迟到次数</b></td></tr>
<% do while (not rs.eof and n<num+1)
pname=rs("ltype")
realname=rs("realname")
monthlattertime=rs("monthlattertime")
monthlatterpaiming=rs("monthlatterpaiming")
%>
<tr><td align=center><font color=green><%=monthlatterpaiming%> </td>
<td align=center><%=pname%> </td>
<td align=center><%=realname%> </td>
<td align=center><font color=red> <%=monthlattertime%> </td></tr>
<%
rs.movenext
n=n+1
loop
response.write "</TABLE>"
end if
if ltype="所有迟到" then
sql="select * from ct_sql where type="&ptype&" and alllatterpaiming>0 order by alllatterpaiming"
rs.open sql,cn,1,1
alllatterpmtime=rs("alllatterpmtime")
%>
<center><p align=center><font color=#000000 size=5><br> <font color=yellow><%=gamename%></font><font color=red><%=ltype%></font>排名<font color=blue> </font></font><br>
<font color=#eeeeee>排名时间:<%=alllatterpmtime%></font> | <a href=# onclick="history.back()" class=wiht><-BACK</A></p>
<TABLE border=1 bordercolor=#3399ff bgcolor=#e4f7fe width=60%/><tr><tr><td bgcolor=#eeeeee align=center><b>排名</b></td>
<td bgcolor=#eeeeee align=center><b>职务</b></td><td bgcolor=#eeeeee align=center><b>真实姓名</b></td>
<td bgcolor=#eeeeee align=center><b>所有迟到次数</b></td></tr>
<% do while (not rs.eof and n<num+1)
pname=rs("ltype")
realname=rs("realname")
alllattertime=rs("alllattertime")
alllatterpaiming=rs("alllatterpaiming")
%>
<tr><td align=center><font color=green><%=alllatterpaiming%> </td>
<td align=center><%=pname%> </td>
<td align=center><%=realname%> </td>
<td align=center><font color=red> <%=alllattertime%> </td></tr>
<%
rs.movenext
n=n+1
loop
response.write "</TABLE>"
end if
end if
end if
%>
</td>
</tr>
</table>
<p> </p>
</td>
</tr>
<tr >
<td height="46" colspan="2" VALIGN=TOP background="images/bottom_bg.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="15" ALIGN=RIGHT> </td>
</tr>
<tr>
<td height="30" align="center" valign="middle"> <font color="#FF9900">推荐<font color="#FF0000">1024*768</font>分辨率</font>
<font color="green">Copyright © 2005 <font color="#FF0000">野马</font>
All Rights Reserved</font> </td>
</tr>
</table></td>
</tr>
<tr >
<td height="34" colspan="2" > <!--#include file="foot.asp"--></td>
</tr>
</table>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -