⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 user_xiugai.asp

📁 通用考勤系统
💻 ASP
字号:
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权:野马原创                    ''''
''''联系:ctplr@163.com          ''''
''''说明:需要新功能联系我      ''''
''''QQ:2643148                    ''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<!--#include file="check.asp"-->

<!--#include file="conn.asp"-->
<!--#include file="../webinfo.asp"-->
<link href=left.css rel=stylesheet>
<title><%=webver%>-人员资料修改 :<%=webver%>by 野马</title>
<body   leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%


if session("qx")>4 then
response.write "对不起,您没有操作权限!"
else

  if request("action")="del" then 
t=request("id")
sql="delete from ct_sql where id="&t
cn.Execute sql
cn.close
response.redirect "userindex.asp"
end if



if request("action")="alldel" then 
  if request.form("chknum").count=0 then                                   
          response.write "<script>alert('没有选中任何项目!!');history.back();</script>"' 
   else   
             for i=1 to request.form("chknum").count  
               pxh=request.form("chknum")(i)  
                sql="delete from ct_sql where id="&pxh
                cn.Execute sql
       next
   cn.close

  end if
response.redirect "userindex.asp"
end if



 if request("action")="xiugai" then 

aid=request("id")
sql="select * from ct_sql where id="&aid
rs.open sql,cn,1,1
pname=rs("username")
realname=rs("realname")
monthqdnum=rs("monthqdnum")
monthlattertime=rs("monthlattertime")
alllattertime=rs("alllattertime")
monthfen=rs("monthfen")
allfen=rs("allfen")
monthqdnum=rs("monthqdnum")
allqdnum=rs("allqdnum")
id=rs("id")
monthkaoqinfen=rs("monthkaoqinfen")
alldelfen=rs("alldelfen")
alladdfen=rs("alladdfen")
auto=rs("auto")
ptype=rs("type")
lltype=rs("ltype")
rs.close
set rs=nothing

%><center>
<table background=../images/loginIn2.gif width=100%><tr>
<td align=center><img src=images/xginf.GIF><br><font color=yellow>
[<b>注意:</b></font>可以输入负数 ,系统会自动加减分。不修改的地方请保持为0]
</font>
</td></tr></table>

<form action='userxiugai_do.asp?action=xiugai' method=post><center>
    <table width="100%" height="118" border="1"  >
<tr align="center" >
                    
    <td height="23" colspan="2" class=tdhead>  
<img src="../images/User.gif" width="19" height="20">
 修改工作人员<font color=white><%=realname%></font>的信息</td>
                  </tr>
<tr>
<td height="23" colspan="2" class=tdwhtimg>  
<img src="../images/Arrow002.gif" ><font color=red>基本信息</font></td>
                  </tr>
  <tr> 
   <td width="12%" height="29" align="center" class=td1>登陆帐号 
      <input type="text" name="name" size="10"  readonly   value=<%=pname%> > <br> 
    </td>
    <td width="12%" height="29" align="center"  class=td1>真实姓名 
      <input type="text" name="realname" size="10"      value=<%=realname%> > <br> 
    </td>
</tr>
<tr>
    <td  align="center" class=td2>工 作 组   
  <% if (session("qx")>3 or session("qx")=0) then 
  sql="select typename,type from type where type="&ptype
    rs1.open sql,cn,1,1
 tname=rs1("typename")
 tid=rs1("type")
 rs1.close
  response.write "[<b>"&tname&"<B>]"
  response.write "<input type=hidden name=ptype value="&tid&">"
else%>
<select name="ptype"  <% if (session("qx")>3 or session("qx")=0) then%> disabled<%end if%>>
<option value=0>没有工作组</option>
<%
sql="select * from type"
    rs1.open sql,cn,1,1
  do while not rs1.eof
tname=rs1("typename")

%>
  <option value=<%=rs1("type")%>    <%if ptype=rs1("type") then%>  selected<%end if%> ><%=tname%>
   <% 
   if ptype=rs1("id") then   
     typesetworktime=rs1("worktime")
   end if
  rs1.movenext
 loop
   rs1.close
 
%>
 
    </select>

<%end if%>
      
 
 </td>
<td width="23%" align="center" class=td2>职务细分 <br>
<input type=radio name="ltype" value=0 <%if lltype="员工"  then%>  checked<%end if%> <% if (session("qx")>2  or session("qx")=0) then%> disabled<%end if%>>员工   
<input type=radio name="ltype" value=1 <%if lltype="组管理者"  then%>  checked<%end if%> <% if (session("qx")>2  or session("qx")=0) then%> disabled<%end if%>>组管理者  

<input type=radio name="ltype" value=2 <%if (lltype="待分配" or lltype=empty)  then%>  checked<%end if%> <% if session("qx")>2  or session("qx")=0 then%> disabled<%end if%>>待分配

</tr>
<tr>
<td height="23" colspan="2" class=tdwhtimg>  
<img src="../images/Arrow002.gif" ><font color=red>考勤信息</font></td>
                  </tr>
<tr>
    <td width="23%" align="center" class=td2>本月迟到次数 <font color=red><%=monthlattertime %>次 </font><br> 
      增加 
      <input type=text size=8 name=monthlattertime value=0 <%if session("qx")>2 then%>readonly class=abox<%end if%>></td>
     
    <td width="28%" align="center" class=td2>所有迟到次数<font color=red><%=alllattertime%>次 
      </font><br> 增加 
      <input type=text size=8 name=alllattertime value=0 <%if session("qx")>2 then%>readonly class=abox<%end if%>></td>
    </tr>
<tr>
    <td height="29"  align="center" class=td1>本月签到次数 <font color=red><%=monthqdnum%>次 </font><br> 
      增加 
      <input type=text size=8 name=monthqdnum value=0 <%if session("qx")>2 then%>readonly class=abox<%end if%>></td>
<td height="29"  align="center" class=td1>所有签到次数 <font color=red><%=allqdnum %>次 </font><br> 
      增加 
      <input type=text size=8 name=allqdnum value=0 <%if session("qx")>2 then%>readonly class=abox<%end if%>></td>

</tr>

<% if session("qx")<3 and session("qx")>0 then %>
 <tr>
    <td height="29"  align="right"  class=td2>
      签到设置组:
    </td>
<td height="29"  class=td2>
   <select name=autoqd >
  <option value=0>自由签到</option>
  <%
sql="select * from qdsetall"
    rs1.open sql,cn,1,1
  do while not rs1.eof
tname=rs1("setname")
%>
  <option value=<%=rs1("id")%>    <%if auto=rs1("id") then%>  selected<%end if%> ><%=tname%>
   <% 
   rs1.movenext
 loop
   rs1.close
 
%>
   </select>
</td>

</tr>

<tr>
<td height="23" colspan="2" class=tdwhtimg>  
<img src="../images/Arrow002.gif" ><font color=red>密码安全</font></td>
                  </tr>
<tr>
    <td align="center" colspan=3 class=td1>
<a href=userxiugai_do.asp?action=passhy&id=<%=aid%> onclick="{if(confirm('想清楚了吗?\n\n真的还原吗?')){return true;}return false;}">密码还原</a> 
  </td>
</tr>
<%end if%>
<tr> 
    <td colspan="6" align="center" class=td3><input  type="button" value=返回 onclick="history.back()" class="abox"> &nbsp;&nbsp;&nbsp;&nbsp;
       
       <input value="提交" type="submit"  class="ibox">&nbsp;&nbsp;&nbsp;&nbsp;    
      <input value="重写" type="reset"  class="ibox"> &nbsp;&nbsp;&nbsp;&nbsp; 
       <input name="id" type="hidden" value=<%=aid%>> 
    </td>
  </tr>
</table>

  </center>
</form>
</center>
 <%
end if
end if
%>
<br>
<br>
<br>
<br>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -