📄 shenhe.asp
字号:
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权：野马原创 ''''
''''联系：ctplr@163.com ''''
''''说明：需要新功能联系我 ''''
''''QQ:2643148 ''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<!--#include file="check.asp"-->
<!--#include file="MD5.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="../webinfo.asp"-->
<link href=left.css rel=stylesheet>
<script language=javascript>
<!--
function tjsh(){
alert("提交");
}
function checkAll(){
for(i=0;i<document.shenhetable.chknum.length;i++){
document.shenhetable.chknum[i].checked=true;
}
}
function uncheckAll(){
for(i=0;i<document.shenhetable.chknum.length;i++){
document.shenhetable.chknum[i].checked=false;
}
}
function switchAll()
{
var num=document.shenhetable.chknum.length;
if(num>1)
{
for(var i=0;i<num;i++)
{
if(document.shenhetable.chknum[i].checked==false)
{
document.shenhetable.chknum[i].checked=true;
}
else
{
document.shenhetable.chknum[i].checked=false;
}
}
}
else
{
if(document.shenhetable.chknum.checked==false)
{
document.shenhetable.chknum.checked=true;
}
else
{
document.shenhetable.chknum.checked=false;
}
}
}
//-->
</script>
<title><%=webname%>-asoft网游管理系统后台 by 野马</title>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
if session("qx")>4 or session("qx")=0 then
response.write "对不起，您没有操作权限！"
else
%><center>
<table background=../images/loginIn2.gif width=100%><tr>
<td align=center><img src=images/allnoshenhe.GIF><br><b>
[点击该人员名字察看资料 ，系统默认审核通过人员密码为123456，修改请直接输入]<br>
</td></tr></table>
<table width=100% >
<tr>
<td width="1%"> </td>
<td width="99%" align="center"><table width="100%" height="94" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align=center>
<%
rs.PageSize=shenhenum
if Request.QueryString("page")<>"" then
curpage=cint(Request.QueryString("page"))
else
curpage=1
end if
sql="select * from ct_sql where noshenhe=0"
rs.Open sql,cn,1,1
pagenum=rs.PageCount
if curpage>pagenum then
curpage=pagenum
end if
rs.AbsolutePage =curpage
if (rs.eof and rs.bof) then
response.write "<br><br><font color=red size=5>没有记录<br><br></font>"
else
%>
<form method="post" action="shenhe_do.asp?act=allpassordel" name="shenhetable">
<table border=1 width=100% >
<tr>
<td align=center class=tdhead >账 号</td>
<td align=center class=tdhead >真实姓名</td>
<td align=center class=tdhead >工 作 组</td>
<td align=center class=tdhead >细 分</td>
<td align=center class=tdhead >审核状态</td>
<td class=tdhead align=center >输入通过密码</td>
<td class=tdhead align=center >操 作</td>
</tr>
<% do while not rs.eof and shenhenum>0
name=rs("username")
rname=rs("realname")
ptype=rs("type")
if ptype=0 then
gname="没有分配"
else
sqlgm="select typename from type where type="&ptype
rsa.open sqlgm,cn,1,1
gname=rsa("typename")
rsa.close
end if
ltype=rs("ltype")
jw=rs("mycomputer")
id=rs("id")
uncerten=rs("uncerten")
ucbk=rs("uncertenback")
%>
<tr>
<td align=center class=td1 >
<a href=viewmenber.asp?id=<%=id%>&name=<%=name%> target=_blank><%=name%></a>
</td>
<td align=center class=td2 >
<a href=viewmenber.asp?id=<%=id%>&name=<%=name%> target=_blank><%=rname%></a>
</td>
<td align=center class=td1 >
<%=gname%>
</td>
<td align=center class=td2 >
<%=ltype%>
</td>
<td align=center class=td1><% if uncerten=1 then %><font color=blue>站长审核</font><%elseif noshenhe=0 then%>
<font color=red>等待审核</font></a>
<%end if%>
</td>
<td class=td2 align=center >
<input type=text size=8 name=pass <% if (session("qx") <>1 and uncerten=1) then %> disabled <%end if%>value=123456></td>
<td align=center valign=middle class=td2>
<% if session("qx") <>1 and uncerten=1 then %>已经提交给站长进一步审核！<%elseif session("qx") =1 then %>
<input type=checkbox value=<%=id%> name=chknum>选择
<% if session("qx") <3 then %>
<a href="shenhe_do.asp?act=del&aid=<%=id%>" onclick="{if(confirm('想清楚了吗？\n\n真的删除吗?')){return true;}return false;}" >删除</a> <%end if%>
<%else%>
<input type=checkbox value=<%=id%> name=chknum>选择
<% if session("qx")>1 then %> <a href="shenhe_do.asp?act=submit&aid=<%=id%>" onclick="{if(confirm('确认提交')){return true;}return false;}" >提交到上级</a><%end if%>
<% if session("qx") < 3 then %>
<a href="shenhe_do.asp?act=del&aid=<%=id%>" onclick="{if(confirm('想清楚了吗？\n\n真的删除吗?')){return true;}return false;}" >删除</a>
<%
end if
end if
%>
</td>
</tr>
<% rs.movenext
shenhenum=shenhenum-1
loop
%>
<tr><td colspan=8 align=right class=td3>
<a href=shenhe_do.asp?act=allpass onclick="{if(confirm('确定全部通过审核?')){return true;}return false;}">[全部审核通过，密码为123456]</a>
<input type=button value="全选" onClick="checkAll()" class=bbox>
<input type=button value="全否" onClick="uncheckAll()" class=bbox>
<input type=button value="反选" onClick="switchAll()" class=bbox>
<input type=submit value="通过所选" class=ibox onclick="{if(confirm('确定要审核通过所选人员吗?')){return true;}return false;}" name=chuliall>
<% if session("qx")<3 then%>
<input type=submit value="删除所选" class=ibox onclick="{if(confirm('确定要删除所选项目吗?')){return true;}return false;}" name=chuliall>
<%end if%>
</td>
</tr>
</table>
</form>
<%
end if
rs.close
set rs=nothing
Response.Write "<center>一共有[<font color=red>"&pagenum&"</font>]页 | "
Response.Write "[<a href=shenhe.asp?page=1>首 页</a>] "
if curpage>1 then
Response.Write "[<b><a name=up href=shenhe.asp?page=" & (curpage-1) & " >上一页</a></b> ] "
end if
if curpage<pagenum then
Response.Write "[<b><a name=down href=shenhe.asp?page=" & (curpage+1) & " >下一页</a></b>] "
end if
Response.Write " [<a href=shenhe.asp?page="&pagenum&">尾 页</a>]"
Response.Write " 当前是第[<font color=red>"&curpage&"</font>]页</center>"
rs.Close
set rs=nothing
cn.close
set cn=nothing
end if
%>
<br>
<br>
<br>
<br>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -