📄 employeesign.asp
字号:
<!--#include file="headfiles/Connection.inc"-->
<%
dim rsTime,rsCheck,checkid,userid
checkid=request.Form("txtCheck")
if checkid="" then
ckeckid=0
else
checkid=cint(checkid)
end if
userid=request("userid")
set rsTime=server.CreateObject("adodb.recordset")
strSql="select Begin_Time, End_Time from SystemInfoTable"
rsTime.open strSql,conn,3,1
set rsCheck=server.CreateObject("adodb.recordset")
strSql="select * from "&year(date())
if month(date)<10 then
strSql=strSql&"0"
end if
strSql=strSql&month(date())&"CheckTable where Check_Date=#"&replace(date(),"-","/")&"# and Employee_ID="&session("hr_user_id")
rsCheck.open strSql,conn,3,2
if rsCheck.recordcount=0 then
dim rsEmployee
set rsEmployee=server.CreateObject("adodb.recordset")
strSql="select * from EmployeeTable"
rsEmployee.open strSql,conn,3,1
do while not rsEmployee.eof
rsCheck.addnew
rsCheck("Employee_ID")=rsEmployee("Employee_ID")
rsCheck("Check_Date")=date()
rsCheck("Employee_State")=7
rsEmployee.movenext
loop
rsCheck.update
end if
rsCheck.close
select case checkid
case 1
strSql="select * from "&year(date())
if month(date)<10 then
strSql=strSql&"0"
end if
strSql=strSql&month(date())&"CheckTable where Check_Date=#"&replace(date(),"-","/")&"# and Employee_ID="&session("hr_user_id")
'response.Write(strSql)
rsCheck.open strSql,conn,3,2
rsCheck("Begin_Time")=time()
rsCheck.update
rsCheck.close
strSql="select * from "&year(date())
if month(date)<10 then
strSql=strSql+"0"
end if
strSql=strSql&month(date())&"CheckTable where Check_Date=#"&replace(date(),"-","/")&"# and Employee_ID="&session("hr_user_id")
'response.Write(strSql)
rsCheck.open strSql,conn,3,1
case 2
strSql="select * from "&year(date())
if month(date)<10 then
strSql=strSql&"0"
end if
strSql=strSql&month(date())&"CheckTable where Check_Date=#"&replace(date(),"-","/")&"# and Employee_ID="&session("hr_user_id")
'response.Write(strSql)
rsCheck.open strSql,conn,3,2
rsCheck("End_Time")=time()
if rsCheck("Begin_Time")>rsTime("Begin_Time") then
if rsCheck("End_Time")<rsTime("End_Time") then
rsCheck("Employee_State")=4
else
rsCheck("Employee_State")=2
end if
else
if rsCheck("End_Time")<rsTime("End_Time") then
rsCheck("Employee_State")=3
else
rsCheck("Employee_State")=1
end if
end if
rsCheck.update
case else
strSql="select * from "&year(date())
if month(date)<10 then
strSql=strSql&"0"
end if
strSql=strSql&month(date())&"CheckTable where Check_Date=#"&replace(date(),"-","/")&"# and Employee_ID="&session("hr_user_id")
'response.Write(strSql)
rsCheck.open strSql,conn,3,1
if rsCheck("End_Time")<>"" then
checkid=2
response.Write(chr(13)&"<script language='javascript'>")
response.Write(chr(13)&"alert('您今天的考勤已经结束！');")
response.Write(chr(13)&"</script>")
else
if rsCheck("Begin_Time")<>"" then
checkid=1
end if
end if
end select
'response.Write(session("hr_user_name"))
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="headfiles/text.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
function BeginWork(){
frmESign.txtBTime.value=frmESign.tt.value;
frmESign.txtBTime.disabled=false;
frmESign.txtCheck.value=1;
frmESign.submit();
}
function EndWork(){
frmESign.txtETime.value=frmESign.tt.value;
frmESign.txtETime.disabled=false;
frmESign.txtCheck.value=2;
frmESign.submit();
}
</script>
</head>
<body bottommargin="0" leftmargin="0" rightmargin="0" topmargin="0" background="images/bg.gif">
<table width="600" width="425" cellpadding="0" cellspacing="0" border="0">
<form id="frmESign" name="frmESign" action="EmployeeSign.asp?userid=<%=userid%>" method="post">
<tr><td bgcolor="#6699ff" valign="middle" align="center" height="35" class="title5">员工考勤</td></tr>
<tr><td><table width="100%" cellpadding="5" cellspacing="0" border="1">
<tr><td colspan="3"class="title3">
<script language=JavaScript> var version = 1.0;</script>
<script language=JavaScript1.1> var version = 1.1;</script>
<script language=JavaScript1.2> var version = 1.2;</script>
<script language=JavaScript1.3> var version = 1.3;</script>
<script language="JavaScript">
<!--
var y=new Date();
var gy=y.getYear();
var dName=new Array("星期天","星期一","星期二","星期三","星期四","星期五","星期六");
var mName=new Array("1月","2月","3月","4月","5月","6月","7月","8月","9月","10月","11月","12月");
if (version < 1.3)
{
if (gy<2000)
{
document.write("<FONT COLOR=\"black\" class=\"p1\">"+"19"+y.getYear()+"年" + mName[y.getMonth()] + y.getDate() + "日 " + dName[y.getDay()] + "" + "</FONT>");
}
else
document.write("<FONT COLOR=\"black\" class=\"p1\">"+y.getYear()+"年" + mName[y.getMonth()] + y.getDate() + "日 " + dName[y.getDay()] + "" + "</FONT>");
}
else
{
document.write("<FONT COLOR=\"black\" class=\"p1\">"+y.getFullYear() +"年"+ mName[y.getMonth()] + y.getDate() + "日 " + dName[y.getDay()] + "</FONT>");
}
//-->
</script>
<input id="tt" name="tt" style="width:60px" class="text1" value="<%=time()%>"><input id="txtCheck" name="txtCheck" style="width:20px;visibility:hidden" value="<%=checkid%>">
</td></tr>
<tr><td colspan="3" class="title3" align="center"><font color="#0000ff">特别提示：现在上班时间为 </font><font color="#ff0000"><% response.write(rsTime("Begin_Time")&"--"&rsTime("End_Time"))%></font></td></tr>
<tr><td class="title2">员工姓名：</td><td colspan="2"><%=session("hr_user_name")%></td></tr>
<tr><td class="title2">上班时间：</td><td><input type="text" id="txtBTime" name="txtBTime" width="80" disabled <%if checkid>=1 then response.Write("value='"&rsCheck("Begin_Time")&"'") end if%>></td><td><input type="button" value="开始工作" onClick="BeginWork(); " <% if checkid>=1 then response.Write("disabled") end if %>></td></tr>
<tr><td class="title2">下班时间：</td><td><input type="text" id="txtETime" name="txtETime" width="80" disabled <%if checkid>=2 then response.Write("value='"&rsCheck("End_Time")&"'") end if%>></td><td><input type="button" value="结束工作" onClick="EndWork(); " <% if checkid>=2 then response.Write("disabled") end if %>></td></tr>
</table></td></tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -