📄 index.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<!--#include file="conn.asp"-->
<%
Response.Buffer=True
%>
<% '验证用户
if session("Username")="" then
Username=trim(request("Username"))
Password=trim(request("Password"))
sqlstr="select * from 用户表 where 用户名='"&Username&"'"
my_rs.open sqlstr,my_Conn,1,3
if my_rs.eof then
Response.Redirect ("login.asp?err=1")
else
if Password=my_rs("密码") then
session("Username")=Username
session("权限")=my_rs("权限")
my_rs("上站次数")=my_rs("上站次数")+1
my_rs.update
else
Response.Redirect ("login.asp?err=2")
end if
my_rs.close
end if
end if
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>人事管理信息系统</title>
<style type="text/css">
<!--
body,td,th {
font-size: 9pt;
color: #000000;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-image: url();
}
#gonggao {
position:absolute;
left:49%;
top:104px;
width:87px;
height:55;
z-index:1;
background-color: #006666;
visibility: hidden;
}
#sysmanage {
position:absolute;
left:60%;
top:104px;
width:89px;
height:113px;
z-index:2;
background-color: #006666;
visibility: hidden;
}
.STYLE1 {
color: #0000FF;
font-size: 24px;
}
.STYLE2 {color: #FFFF00}
.STYLE3 {color: #FFFFFF}
.STYLE5 {color: #00FF00}
-->
</style>
<script type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_showHideLayers() { //v6.0
var i,p,v,obj,args=MM_showHideLayers.arguments;
for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
obj.visibility=v; }
}
//-->
</script>
</script>
<SCRIPT language=JavaScript>
<!--
<!--
function marquee1()
{
document.write("<marquee behavior=scroll direction=up width=140 height=130 scrollamount=1 scrolldelay=60 onmouseover='this.stop()' onmouseout='this.start()'>")
}
function marquee2()
{
document.write("</marquee>")
}
// -->
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
function MM_callJS(jsStr) { //v2.0
return eval(jsStr)
}
//-->
</SCRIPT>
</head>
<body>
<div id="gonggao" onmouseover="MM_showHideLayers('gonggao','','show')" onmouseout="MM_showHideLayers('gonggao','','hide')">
<table width="87" height="52" border="1" bordercolor="#FF0000">
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('ckgg.asp','','width=500,height=300')"> 查看公告</a></td>
</tr>
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('fbgg.asp','','width=320,height=170')">发布公告</a></td>
</tr>
</table>
</div>
<div id="sysmanage" onmouseover="MM_showHideLayers('sysmanage','','show')" onmouseout="MM_showHideLayers('sysmanage','','hide')">
<table width="87" border="1" bordercolor="#FF0000">
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('userinf.asp','','width=300,height=300')">人员信息</a></td>
</tr>
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('adduserform.asp','','width=350,height=300')">添加人员</a></td>
</tr>
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('cxuser.asp','','scrollbars=yes,width=500,height=200')">人员查询</a></td>
</tr>
<tr>
<td height="26" align="center"> <a href="#" onclick="MM_openBrWindow('show_log.asp','','scrollbars=yes,width=500,height=700')">查看日志</a></td>
</tr>
</table>
</div>
<table width="800" border="0" cellpadding="0" cellspacing="0" align="center">
<!--DWLayoutTable-->
<tr>
<td height="80" colspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="800" height="80" valign="top"><img src="image/HEAD.gif" width="800" height="80" /></td>
</tr>
</table></td>
</tr>
<tr>
<td height="26" colspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC">
<!--DWLayoutTable-->
<tr>
<td width="230" height="26" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="230" height="26" align="left" valign="middle">登录者：<%=session("Username")%><SCRIPT language=javaScript>
<!--
now = new Date(),hour = now.getHours()
if(hour < 6){document.write("凌晨好！")}
else if (hour < 9){document.write("早上好！")}
else if (hour < 12){document.write("上午好！")}
else if (hour < 14){document.write("中午好！")}
else if (hour < 17){document.write("下午好！")}
else if (hour < 19){document.write("傍晚好！")}
else if (hour < 22){document.write("晚上好！")}
else {document.write("深夜了，请注意休息！")}
// -->
</SCRIPT>权限：<%=session("权限")%><a href="login.asp" target="_parent">注销用户</a></td>
</tr>
</table></td>
<td width="570" align="center" valign="middle" ><table width="85%" border="0" cellspacing="0">
<tr>
<td width="100" valign="baseline"><img src="image/home.gif" width="17" height="16" /><a href="#">主 页</a></td>
<td width="100" valign="baseline" onmouseover="MM_showHideLayers('gonggao','','show')" onmouseout="MM_showHideLayers('gonggao','','hide')"><img src="image/eiscuss.gif" width="15" height="15" /><a href="#">公告信息</a></td>
<td width="100" valign="baseline" <% if session("权限")="管理" then%>onmouseover="MM_showHideLayers('sysmanage','','show')" onmouseout="MM_showHideLayers('sysmanage','','hide')" <% end if%>><img src="image/manage.gif" width="14" height="16" /><a href="#" <% if session("权限")<>"管理" then%> onclick="javascript:alert('权限不足！请与管理员联系！')" <%end if%>>系统管理</a></td>
<td width="110" valign="baseline" ><img src="image/modify.gif" width="20" height="18" /><a href="#" <%if session("权限")<>"只读" then%>onclick="MM_openBrWindow('modify.asp','','width=350,height=400')"<%else%>onclick="MM_callJS('alert(\"权限不足！请与管理员联系！\")')" <%end if%>>修改个人信息</a></td>
<td width="100" valign="baseline"><img src="image/email1.gif" width="24" height="11" /><% if session("权限")="管理" then%>
<a href="#" onclick="MM_openBrWindow('email.asp','','width=500,height=250')">发送邮件</a>
<%else%>
<a href="#" onclick="MM_openBrWindow('M_email.asp','','width=500,height=250')">联系管理员</a>
<% end if%></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td width="230" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<!--DWLayoutTable-->
<tr>
<td width="230" height="398" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="230" height="398" align="center" valign="top"><table width="100%" height="100%" border="1" cellspacing="1" bordercolor="#FF0000">
<tr>
<td align="center" valign="middle" bgcolor="#FFFF00"><table width="95%" height="100%" border="1" cellspacing="1" bordercolor="#0000FF" bgcolor="#FFFFFF">
<tr>
<td height="20" align="center" bgcolor="#CCCCCC">公告信息</td>
</tr>
<tr>
<td height="210" bgcolor="#FFFFFF" >
<SCRIPT language=JavaScript>marquee1();</SCRIPT>
<!--这里是滚动内容，可以直接写入asp代码-->
<%sqlstr="select * from 公告信息"
set my_rs=server.createobject("adodb.recordset")
my_rs.open sqlstr,my_Conn,1,1
i=1 '记录条数
if not my_rs.eof then
do while not my_rs.eof%>
<a href="#" onclick="MM_openBrWindow('ggshow.asp?ggid=<%=my_rs("公告编号")%>','','width=300,height=300')"><%=i%>.<%=my_rs("公告主题")%></a><br>
<%i=i+1
my_rs.movenext
loop
else
response.write "对不起,暂无记录"
end if
my_rs.close
%>
<SCRIPT language=JavaScript>marquee2();</SCRIPT> </td>
</tr>
<tr>
<td height="20" align="center" bgcolor="#CCCCCC">系统使用说明</td>
</tr>
<tr>
<td height="120" bgcolor="#FFFFFF"><p> 只有管理员才能够添加、删除人员；每一位职工（经授权）可以修改自己的信息；其他人员只能够浏览信息，能够发布信息(公告信息)，管理员能够给指定的一组人员发送E-mail<br />
</p> </td>
</tr>
</table></td>
</tr>
</table></td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -