📄 loginin.asp
字号:
<!--#include file="conn.asp"-->
<table width=140>
<tr><td align=left width=70% >
<%if session("qx")<4 and session("qx")>0 then
response.write "<center><font color=red>"&session("name")&"</font> 登陆成功"
response.write "<center><a href='manager/adminindex.asp'>--进 入 后 台--</a> <br>"
if session("qx")<3 then
response.write "<a href=manager/type.asp target=_blank>组别设定 </a> <a href=manager/userindex.asp target=_blank>人员管理 </a><br>"
response.write "<a href=manager/annouce.asp target=_blank>公告管理 </a> <a href=manager/latter.asp target=_blank>迟到人员</a><br>"
end if
if session("qx")<2 then
response.write "<a href=manager/shenhe.asp target=_blank> 审核人员 </a> <a href=manager/Admin_Database.asp?action=BackupData target=_blank>数据备份 </a><br>"
end if
response.write "<a href=manager/menberjf.asp target=_blank>人员奖罚 </a> <a href='manager/logindo.asp?action=loginout'>退出登陆</a><br>"
end if
if session("qx")=0 then
pid=session("id")
sql2="select * from ct_sql where id="&pid
rs1.open sql2,cn,1,1
qd=rs1("todayqd")
must=rs1("mustqdok")
if qd=0 then
qdcn2="签到"
elseif qd=1 then
qdcn2="注销"
end if
rs1.close
response.write "<center><font color=red>"&session("realname")&"</font> 登陆成功<br> </center>"
response.write " <font color=green>账号类型 </font> <font color=red>组管理者</font> "
response.write "<br><font color=green>工作组 </font> <font color=#661111> "&session("ptypename")&""
if (qd=0 and must=0) then
response.write "<center><font color=#aa3333>尚未签到</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=0 and must=1 then
response.write "<center><font color=#aa3333>再次签到</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=1 and must=1 then
response.write "<center><font color=#ff7777>尚未注销</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=2 then
response.write "<center><font color=#777777>完 成 签 到</font> "
end if
response.write "<Br><a style='cursor:hand' onclick=window.open('qdinfo.asp','','width=450,height=350,top=200,left=300,menubar=no,resizable=no,status=no,scrollbars=yes,location=no'); target=_blank>签到信息</a> <a href='manager/userindex2.asp' target=_blank>本组管理 </a><br>"
response.write "<center><a href='zhinf.asp'>信息中心</a> <a href='userpass.asp?action=xiugai'>修改资料</a> <br> "
response.write " <a href='manager/logindo.asp?action=loginout'>退出登陆</a><br>"
end if
if session("qx")=5 then
pid=session("id")
sql2="select * from ct_sql where id="&pid
rs1.open sql2,cn,1,1
qd=rs1("todayqd")
must=rs1("mustqdok")
if qd=0 then
qdcn2="签到"
elseif qd=1 then
qdcn2="注销"
end if
rs1.close
response.write "<center><font color=red>"&session("realname")&"</font> 登陆成功<br> </center>"
response.write " <font color=green>账号类型 </font> <font color=blue>员工</font> "
response.write "<br><font color=green>工作组 </font> <font color=#661111> "&session("ptypename")&""
if (qd=0 and must=0) then
response.write "<center><font color=#aa3333>尚未签到</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=0 and must=1 then
response.write "<center><font color=#aa3333>再次签到</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=1 and must=1 then
response.write "<center><font color=#ff7777>尚未注销</font> [<a href=qd.asp>"&qdcn2&"</a>] "
elseif qd=2 then
response.write "<center><font color=#777777>完 成 签 到</font> "
end if
response.write "<br><a style='cursor:hand' onclick=window.open('qdinfo.asp','','width=450,height=350,top=200,left=300,toolbar=no,menubar=no,scrollbar=yes'); target=_blank>察看签到设置信息</a>"
response.write "<center><a href='zhinf.asp'>信息中心</a> <a href='userpass.asp?action=xiugai'>修改资料</a> <br> "
response.write " <a href='manager/logindo.asp?action=loginout'>退出登陆</a><br>"
end if
%>
</td></tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -