📄 printcheck.asp
字号:
<!--#include file="headfiles/Connection.inc"-->
<%
dim rsCheck,crdate,DepartID
set rsCheck=server.CreateObject("adodb.recordset")
crdate=request("d")
'response.Write(crdate)
DepartID=request("id")
'strSql=left(strSql,len(strSql)-1)
'strSql=right(strSql,len(strSql)-1)
crdate=left(crdate,len(crdate)-1)
crdate=right(crdate,len(crdate)-1)
crdate=cdate(crdate)
'response.Write(strSql)
'rsCheck.open strSql,conn,3,1
strSql="select * from "&year(crdate)
if month(crdate)<10 then
strSql=strSql&"0"
end if
strSql=strSql&month(crdate)&"CheckView where Check_Date=#"&crdate&"#"
if DepartID="" or DepartID="1" then
Depart="全体员工"
else
dim rsDepart
set rsDepart=server.CreateObject("adodb.recordset")
level=cint(left(DepartID,1))
DID=cint(right(DepartID,len(DepartID)-1))
strSql1="select * from Depart"&level&"Table where Depart_ID="&DID
rsDepart.open strSql1,conn,3,1
Depart=rsDepart("Depart_Name")
rsDepart.close
strSql=strSql&" and Employee_Depart"&level&"="&DID
end if
strSql=strSql&" order by Employee_ID"
'response.write(strSql)
rsCheck.open strSql,conn,3,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>员工出勤记录</title>
<link href="headfiles/text.css" rel="stylesheet" type="text/css">
</head>
<div align="center">
<body bottommargin="0" leftmargin="0" rightmargin="0" topmargin="0">
<table width="580" border="0" cellspacing="0" cellpadding="5">
<tr>
<td align="center" class="title6" colspan="3">员工出勤记录</td>
</tr>
<tr class="title2">
<td>部门：<%=Depart%></td><td> </td><td align="right">日期：<%=crdate%></td>
</tr>
<tr>
<td colspan="3">
<table width="100%" cellpadding="2" cellspacing="0" border="1">
<tr class="title2" align="center"><td>编号</td><td>姓名</td><td>一级部门</td><td>上班时间</td><td>下班时间</td><td>状态</td></tr>
<%
do while not rsCheck.eof
%>
<tr class="title1"><td> <%=rsCheck("Employee_ID")%></td><td> <%=rsCheck("Employee_Name")%></td><td><%=rsCheck("Depart1")%></td><td> <%=rsCheck("Begin_Time")%></td><td> <%=rsCheck("End_Time")%></td><td> <%=rsCheck("CheckWork_State")%></td></tr>
<%
rsCheck.movenext
loop
%>
</table>
</td>
</tr>
<tr>
<td colspan="3" align="right"><input type="button" value="打印" style="width:60px" onClick="window.print();"></td>
</tr>
</table>
</body></div>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -