📄 wageedit.asp
字号:
<!--#include file=DataBase/conn.asp-->
<!--#include file=yan.asp-->
<!--#include file=purview.asp-->
<%
call xinchouxiugai
set rs=server.CreateObject("adodb.recordset")
sql="Select * from tb_dept order by up"
rs.Open sql,conn,1,1
if request("suoshu")<>"" then
suoshu=request("suoshu")
else
suoshu=1
end if
set rsr=server.CreateObject("adodb.recordset")
sqlr="select * from tb_Employee where suoshu="&suoshu
rsr.open sqlr,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
<link href="CSS/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
.style2 {color: #0000FF}
.style3 {color: #FF0000}
-->
</style></head>
<body topmargin="0">
<form name="form1" method="post" action="">
<table width="550" border="0" align="center">
<tr>
<td width="55%" height="30"> - <span class="style2">薪水管理</span>→<span class="style3">薪水修改</span></td>
</tr>
</table>
<table width="100" border="0" align="center" cellspacing="0" class="dian">
<tr >
<td height="28" colspan="4" background="images/index_24.gif"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<table width="438" height="94" border="0" align="center" cellspacing="0" >
<tr>
<td width="94" height="35" align="center"> 部 门：</td>
<td width="180">
<select name="menu1" onChange="MM_jumpMenu('self',this,0)">
<%
do while not rs.eof
xian=""
for i=1 to rs("level")-1
xian = xian&"├"
next
xian = xian&"〖"&trim(rs("title"))&"〗<br>"
%>
<option value="wageedit.asp?suoshu=<%=rs("id")%>" <%if rs("id")=clng(request("suoshu")) then%>selected<%end if%>><%=xian%></option>
<%
rs.movenext
loop
%>
</select>
<input name="post" type="hidden" id="post" value="true"></td>
<td width="50" align="center">员工：</td>
<td width="106">
<select name="name" id="name">
<%do while not rsr.eof %>
<option value="<%=rsr("id")%>" <%if clng(rsr("id"))=clng(request("name")) then%>selected<%end if%>><%=rsr("name")%></option>
<%
rsr.movenext
loop
%>
</select></td>
</tr>
<tr>
<td height="36" align="center">日 期：</td>
<td colspan="3">
<select name="year" id="year">
<%for i=2005 to 2050%>
<option value="<%=i%>" <%if i=clng(request("year")) then%>selected<%end if%>><%=i%></option>
<%next%>
</select>
年
<select name="month" id="month">
<%for i=1 to 12%>
<option value="<%=i%>" <%if i=clng(request("month")) then%>selected<%end if%>><%=i%></option>
<%next%>
</select>
月</td>
</tr>
<tr>
<td height="23" colspan="4" align="center"><input name="Submit" type="submit" class="botton" value=" 查 找 ">
</td>
</tr>
</table></td>
</tr>
</table>
</form>
<%
if request("post")<>"" then
if request("name")="" then
response.Write("<script language=javascript>alert('请选择一个员工');location='javascript:history.go(-1)'</script>")
response.End()
end if
set rsx=server.CreateObject("adodb.recordset")
sqlx="select * from tb_Wage where year="&request("year")&" and month="&request("month")&" and name="&request("name")
rsx.open sqlx,conn,1,1
if not rsx.eof then
%>
<form name="form2" method="post" action="">
<table width="438" height="374" border="0" align="center" cellspacing="0" class="dian" >
<tr >
<td height="28" colspan="4" background="images/index_24.gif"></td>
</tr>
<tr>
<td width="90" align="center">工作日数：</td>
<td width="320">
<input name="gongzuo" type="text" class="wenben" id="gongzuo2" value="<%=rsx("gongzuo")%>" size="10" maxlength="10">
天
<input name="post1" type="hidden" id="post1" value="<%=rsx("id")%>"></td>
</tr>
<tr>
<td align="center">日 薪：</td>
<td>
<input name="rixin" type="text" class="wenben" id="rixin2" value="<%=rsx("rixin")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">本 薪：</td>
<td>
<input name="benxin" type="text" class="wenben" id="benxin2" value="<%=rsx("benxin")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">奖 金：</td>
<td>
<input name="jiangjin" type="text" class="wenben" id="jiangjin2" value="<%=rsx("jiangjin")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">假日津贴：</td>
<td>
<input name="jiari" type="text" class="wenben" id="jiari2" value="<%=rsx("jiari")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">全勤奖金：</td>
<td>
<input name="quanqin" type="text" class="wenben" id="quanqin2" value="<%=rsx("quanqin")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">加班津贴：</td>
<td>
<input name="jiaban" type="text" class="wenben" id="jiaban2" value="<%=rsx("jiaban")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">本期工资：</td>
<td>
<input name="benqi" type="text" class="wenben" id="benqi2" value="<%=rsx("benqi")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">福 利 金：</td>
<td>
<input name="fuli" type="text" class="wenben" id="fuli2" value="<%=rsx("fuli")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">伙 食 费：</td>
<td>
<input name="huoshi" type="text" class="wenben" id="huoshi2" value="<%=rsx("huoshi")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">所 得 税：</td>
<td>
<input name="suode" type="text" class="wenben" id="suode2" value="<%=rsx("suode")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">借 支：</td>
<td>
<input name="jiezhi" type="text" class="wenben" id="jiezhi2" value="<%=rsx("jiezhi")%>" size="10" maxlength="10">
元</td>
</tr>
<tr>
<td align="center">实发工资：</td>
<td>
<input name="shifa" type="text" class="wenben" id="shifa2" value="<%=rsx("shifa")%>" size="10" maxlength="10">
元</td>
</tr>
<tr align="center">
<td colspan="2"><input name="Submit2" type="submit" class="botton" value=" 提 交 ">
<input name="Submit2" type="reset" class="botton" value=" 重 置 "></td>
</tr>
</table>
</form>
<%
else
response.Write("<div align=center>没有相关信息</div>")
end if
end if
%>
</body>
</html>
<%
if request("post1")<>"" then
if request("gongzuo")="" then
response.Write("<script language=javascript>alert('工作日数不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("rixin")="" then
response.Write("<script language=javascript>alert('日薪不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("benxin")="" then
response.Write("<script language=javascript>alert('本薪不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("jiangjin")="" then
response.Write("<script language=javascript>alert('奖金不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("jiari")="" then
response.Write("<script language=javascript>alert('假日津贴不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("quanqin")="" then
response.Write("<script language=javascript>alert('全勤奖金不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("jiaban")="" then
response.Write("<script language=javascript>alert('加班津贴不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("benqi")="" then
response.Write("<script language=javascript>alert('本期工资不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("fuli")="" then
response.Write("<script language=javascript>alert('福利金不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("huoshi")="" then
response.Write("<script language=javascript>alert('伙食费不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("suode")="" then
response.Write("<script language=javascript>alert('所得税不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("jiezhi")="" then
response.Write("<script language=javascript>alert('借支不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
if request("shifa")="" then
response.Write("<script language=javascript>alert('实发工资不能为空');location='javascript:history.go(-1)'</script>")
response.End()
end if
set rsj=server.CreateObject("adodb.recordset")
sqlj="select * from tb_Wage where id="&request("post1")
rsj.open sqlj,conn,1,3
rsj("gongzuo")=request("gongzuo")
rsj("rixin")=request("rixin")
rsj("benxin")=request("benxin")
rsj("jiangjin")=request("jiangjin")
rsj("jiari")=request("jiari")
rsj("quanqin")=request("quanqin")
rsj("jiaban")=request("jiaban")
rsj("benqi")=request("benqi")
rsj("fuli")=request("fuli")
rsj("huoshi")=request("huoshi")
rsj("suode")=request("suode")
rsj("jiezhi")=request("jiezhi")
rsj("shifa")=request("shifa")
rsj.update
rsj.close
response.Write("<script language=javascript>alert('修改成功！')</script>")
end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -