📄 settime.asp
字号:
<%response.expires=0%>
<!--#include file="conn.asp"-->
<!--#include file="../asp/bgsub.asp"-->
<%
'session.abandon
'Server.ScriptTimeOut=500
function opendb(DBPath,sessionname,dbsort)
dim conn
'if not isobject(session(sessionname)) then
Set conn=Server.CreateObject("ADODB.Connection")
'if dbsort="accessdsn" then conn.Open "DSN=" & DBPath
'if dbsort="access" then conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
'if dbsort="sqlserver" then conn.Open "DSN=" & DBPath & ";uid=wsw;pwd=wsw"
DBPath1=server.mappath("../db/jzud-oa.asa")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath1
set session(sessionname)=conn
'end if
set opendb=session(sessionname)
end function
%>
<%
oabusyname=request.cookies("oabusyname")
oabusyuserid=request.cookies("oabusyuserid")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusyusername="" or oabusyuserid="" then
response.write("<script language=""javascript"">")
response.write("window.top.location.href='../default.asp';")
response.write("</script>")
response.end
end if
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from userinf where username='"&oabusyusername&"'"
rs.open sql,conn,1
if not rs.eof and not rs.bof then
allow_edit_work_time=rs("allow_edit_work_time")
if allow_edit_work_time="no" then
response.write("<script language=""javascript"">")
response.write("alert(""对不起，您不能设置考勤时间！"");")
response.write("</script>")
response.end
end if
else
if allow_edit_work_time="no" then
response.write("<script language=""javascript"">")
response.write("alert(""对不起，没有的找到对应的用户！"");")
response.write("</script>")
response.end
end if
end if
conn.close
set conn=nothing
set rs=nothing
%>
<html>
<head>
<meta http-equiv="expires" content="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/css.css">
<script language="javascript">
function checkform()
{
var time1,time2,value1,value2;
time1=document.form1.amgohour.value;
time2=document.form1.pmcomehour.value;
value1=document.form1.amgominute.value;
value2=document.form1.pmcomeminute.value;
if (time1==time2)
{
if ((value1==value2) || (value1=="30" && value2=="0"))
{
alert("上午下班时间与下午上班时间冲突！");
return (false);
}
}
return (true);
}
</script>
<title>Crackgo办公系统</title>
</head>
<body topmargin="5" leftmargin="5">
<br>
<center>
<%
if request("submit")="确定" then
amcomehour=request.form("amcomehour")
amcomeminute=request.form("amcomeminute")
amgohour=request.form("amgohour")
amgominute=request.form("amgominute")
pmcomehour=request.form("pmcomehour")
pmcomeminute=request.form("pmcomeminute")
pmgohour=request.form("pmgohour")
pmgominute=request.form("pmgominute")
comedelaytime=request.form("comedelaytime")
goaheadtime=request.form("goaheadtime")
kqtimephase=request.form("kqtimephase")
'checkvalue=request.form("check")
amgonokq=request.form("amgonokq")
if amgonokq="" then amgonokq="0"
pmcomenokq=request.form("pmcomenokq")
if pmcomenokq="" then pmcomenokq="0"
pmgonokq=request.form("pmgonokq")
if pmgonokq="" then pmgonokq="0"
set conn=openconn("kqconn")
amcometime=timeserial(cint(amcomehour),cint(amcomeminute),0)
amgotime=timeserial(cint(amgohour),cint(amgominute),0)
pmcometime=timeserial(cint(pmcomehour),cint(pmcomeminute),0)
pmgotime=timeserial(cint(pmgohour),cint(pmgominute),0)
sql="update inittime set amondutytime=#"&amcometime&"#,amoffdutytime=#"&amgotime&"#,pmondutytime=#"&pmcometime&"#,pmoffdutytime=#"&pmgotime&"#,ondutydelaytime="&comedelaytime&",offdutyaheadtime="&goaheadtime&",kqtimephase="&kqtimephase&",amgonokq="&amgonokq&",pmcomenokq="&pmcomenokq&",pmgonokq="&pmgonokq
conn.execute(sql)
response.write("<p align=""center""><font color=""#dd0000"">成功设置考勤时间！</font>")
conn.close
response.end
end if
set conn=openconn("kqconn")
set rs=server.createobject("adodb.recordset")
sql="select * from inittime"
rs.open sql,conn,1
%>
<form method="POST" action="settime.asp" onsubmit="return checkform();" name="form1">
<div align="center">
<center>
<table border="1" width="90%" cellspacing="0" cellpadding="5" bordercolorlight="#C0C0C0" bordercolordark="#C0C0C0">
<tr>
<td colspan="2" bgcolor="#EFEFEF" height="40"><b><font color="#DD0000">注意：</font></b>上班延迟时间和下班提前时间不能为0分钟，设置这两个值的作用是作为考勤的缓冲时间。</td>
</tr>
<tr>
<%
amcomehour=hour(rs("amondutytime"))
amcomeminute=minute(rs("amondutytime"))
%>
<td width="246" height="30" bgcolor="#FFFFFF">上午标准上班时间：<select size="1" name="amcomehour">
<option value="6">6点</option>
<option value="7">7点</option>
<option value="8">8点</option>
<option selected value="9">9点</option>
</select><select size="1" name="amcomeminute">
<option selected value="0">00分</option>
<option value="30">30分</option>
</select>
<script language="javascript">
document.form1.amcomehour.value=<%=amcomehour%>;
document.form1.amcomeminute.value=<%=amcomeminute%>;
</script>
</td>
<%
amgohour=hour(rs("amoffdutytime"))
amgominute=minute(rs("amoffdutytime"))
%>
<td width="248" height="30" bgcolor="#FFFFFF">上午标准下班时间：<select size="1" name="amgohour">
<option value="11">11点</option>
<option value="12" selected>12点</option>
<option value="13">13点</option>
</select><select size="1" name="amgominute">
<option selected value="0">00分</option>
<option value="30">30分</option>
</select>
<script language="javascript">
document.form1.amgohour.value=<%=amgohour%>;
document.form1.amgominute.value=<%=amgominute%>;
</script>
</td>
</tr>
<tr>
<%
pmcomehour=hour(rs("pmondutytime"))
pmcomeminute=minute(rs("pmondutytime"))
%>
<td width="246" height="30" bgcolor="#FFFFFF">下午标准上班时间：<select size="1" name="pmcomehour">
<option value="13">13点</option>
<option value="14" selected>14点</option>
<option value="15">15点</option>
</select><select size="1" name="pmcomeminute">
<option selected value="0">00分</option>
<option value="30">30分</option>
</select>
<script language="javascript">
document.form1.pmcomehour.value=<%=pmcomehour%>;
document.form1.pmcomeminute.value=<%=pmcomeminute%>;
</script>
</td>
<%
pmgohour=hour(rs("pmoffdutytime"))
pmgominute=minute(rs("pmoffdutytime"))
%>
<td width="248" height="30" bgcolor="#FFFFFF">下午标准下班时间：<select size="1" name="pmgohour">
<option value="16">16点</option>
<option value="17" selected>17点</option>
<option value="18">18点</option>
<option value="19">19点</option>
</select><select size="1" name="pmgominute">
<option selected value="0">00分</option>
<option value="30">30分</option>
</select>
<script language="javascript">
document.form1.pmgohour.value=<%=pmgohour%>;
document.form1.pmgominute.value=<%=pmgominute%>;
</script>
</td>
</tr>
<tr>
<td width="246" height="30" bgcolor="#FFFFFF">上班考勤延迟时间：<select size="1" name="comedelaytime">
<option value="0">0分钟</option>
<option value="10">10分钟</option>
<option value="15">15分钟</option>
<option value="20">20分钟</option>
<option value="25">25分钟</option>
<option value="30">30分钟</option>
<option value="35">35分钟</option>
<option value="40">40分钟</option>
<option value="45">45分钟</option>
<option value="50">50分钟</option>
<option value="55">55分钟</option>
</select>
<script language="javascript">
document.form1.comedelaytime.value=<%=rs("ondutydelaytime")%>;
</script>
</td>
<td width="248" height="30" bgcolor="#FFFFFF">下班考勤提前时间：<select size="1" name="goaheadtime">
<option value="0">0分钟</option>
<option value="10">10分钟</option>
<option value="15">15分钟</option>
<option value="20">20分钟</option>
<option value="25">25分钟</option>
<option value="30">30分钟</option>
<option value="35">35分钟</option>
<option value="40">40分钟</option>
<option value="45">45分钟</option>
<option value="50">50分钟</option>
<option value="55">55分钟</option>
</select>
<script language="javascript">
document.form1.goaheadtime.value=<%=rs("offdutyaheadtime")%>;
</script>
</td>
</tr>
<tr>
<td width="100%" height="30" bgcolor="#FFFFFF" colspan="2">考勤时间段：<select size="1" name="kqtimephase">
<option value="10">10分钟</option>
<option value="15">15分钟</option>
<option value="20" selected>20分钟</option>
<option value="25">25分钟</option>
<option value="30">30分钟</option>
<option value="35">35分钟</option>
<option value="40">40分钟</option>
<option value="45">45分钟</option>
<option value="50">50分钟</option>
<option value="55">55分钟</option>
</select>
<script language="javascript">
document.form1.kqtimephase.value=<%=rs("kqtimephase")%>;
</script>
</td>
</tr>
<tr>
<td width="100%" height="30" bgcolor="#FFFFFF" colspan="2">
<input type="checkbox" name="amgonokq" value=1>上午下班不考勤<input type="checkbox" name="pmcomenokq" value=1>下午上班不考勤<input type="checkbox" name="pmgonokq" value=1>下午下班不考勤
<script language="javascript">
<%
if rs("amgonokq")=1 then
response.write("document.form1.amgonokq.checked=true;")
end if
if rs("pmcomenokq")=1 then
response.write("document.form1.pmcomenokq.checked=true;")
end if
if rs("pmgonokq")=1 then
response.write("document.form1.pmgonokq.checked=true;")
end if
%>
</script>
</td>
</tr>
</table>
</center>
</div>
<p align="center"><input type="submit" value="确定" name="submit">
<input type="reset" value="重填" name="resetbutton"></p>
</form> </center>
<%
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -