📄 leaveaddg.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=DataBase/conn.asp-->
<!--#include file=yan.asp-->
<!--#include file=purview.asp-->
<%
call yuangongkaoqin
'考勤员工
set rsr=server.CreateObject("adodb.recordset")
sqlr="SELECT dbo.tb_Employee.name, dbo.tb_Dept.title, dbo.tb_User.username FROM dbo.tb_Dept INNER JOIN dbo.tb_Employee ON dbo.tb_Dept.id = dbo.tb_Employee.suoshu INNER JOIN dbo.tb_User ON dbo.tb_Employee.id = dbo.tb_User.name "
rsr.open sqlr,conn,1,1
'添加考勤
if request("post")<>"" then
if request("bantian")<>"" then
bantian="是"
else
bantian="否"
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_Leave"
rs.open sql,conn,1,3
rs.addnew
rs("name")=request("geren")
rs("kshijian")=request("kyear")&"-"&request("kmonth")&"-"&request("kday")
rs("jshijian")=request("jyear")&"-"&request("jmonth")&"-"&request("jday")
rs("kyear")=request("kyear")
rs("kmonth")=request("kmonth")
rs("kday")=request("kday")
rs("jyear")=request("jyear")
rs("jmonth")=request("jmonth")
rs("jday")=request("jday")
rs("bantian")=bantian
rs("jiayin")=request("jiayin")
rs("zpi")="否"
rs("rpi")="否"
rs("suoshu")=suoshu
rs("time")=now()
rs.update
rs.close
response.Write("<script language=javascript>alert('提交成功！')</script>")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style>
<link href="CSS/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #0000FF}
.style2 {color: #FF0000}
-->
</style>
</head>
<body topmargin="0">
<table width="550" border="0" align="center">
<tr>
<td width="55%" height="30"> - <span class="style2">人事管理</span>→<span class="style1">考勤管理</span>→<font color="#FF0000">员工考勤登记</font></td>
</tr>
</table>
<table width="550" border="0" align="center" cellspacing="0" bgcolor="#000000">
<tr>
<td><table width="550" border="0" align="center" cellspacing="0" >
<form name="form1" method="post" action="">
<tr>
<td bgcolor="#FFFFFF"><table width="550" height="142" border="0" align="center" cellspacing="0" >
<tr>
<td width="88" height="30" align="right" background="images/index_24.gif">考勤对象：</td>
<td width="233" background="images/index_24.gif">
<select name="geren" id="select">
<%
do while not rsr.EOF
%>
<option value="<%=rsr("username")%>">〖<%=rsr("title")%>〗<%=rsr("name")%></option>
<%
rsr.movenext
loop
%>
</select>
<input name="post" type="hidden" id="post" value="true"></td>
<td width="154" background="images/index_24.gif"> </td>
<td width="67" background="images/index_24.gif"> </td>
</tr>
<tr>
<td height="30" rowspan="2" align="right">时间期限：</td>
<td>
<select name="kyear" id="select6">
<%for i=2005 to 2100%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="kmonth" id="select7">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="kday" id="select8">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日至 </td>
<td>
<p> </td>
<td rowspan="2"> </td>
</tr>
<tr>
<td>
<select name="jyear" id="select9">
<%for i=2005 to 2100%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="jmonth" id="select10">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="jday" id="select11">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日</td>
<td><input name="bantian" type="checkbox" id="bantian3" value="是">
半天 </td>
</tr>
<tr>
<td align="right">状态：</td>
<td>
<select name="jiayin" id="jiayin">
<option value="事假">--事假--</option>
<option value="病假">--病假--</option>
<option value="加班">--加班--</option>
<option value="公假">--公假--</option>
<option value="婚假">--婚假--</option>
<option value="丧假">--丧假--</option>
<option value="产假">--产假--</option>
</select></td>
<td><%= suoshu %></td>
<td> </td>
</tr>
<tr>
<td colspan="4"><div align="center">
<input name="Submit" type="submit" class="botton" value=" 提 交 ">
</div></td>
</tr>
</table></td>
</tr>
</form>
</table></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -