user.asp

一个小型ASP做的工资管理系统,这也是别人做的,我觉得他很地干静.

        上班签到时间
          <%else%>
        下班签到时间
        <%end if%>
        ：</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><%=formatdatetime(now(),3)%></td>
    </tr>
    <%if tim="" then%>
    <tr>
      <td bgcolor="#F9F9F9" class="a4">迟到说明：</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><textarea name="textarea2" cols="40" rows="5" id="textarea"></textarea></td>
    </tr>
    <%end if%>
    <tr>
      <td colspan="2" bgcolor="#F9F9F9" class="a4"><div align="center">
        <input type="submit" name="Submit22322" value="工作签到">
      </div></td>
    </tr>
  </form>
</table>
<%end if%>
<%if menu="jielist" then
set rs=server.createobject("adodb.recordset")
sql="select * from [jiesuan] where name='"&user&"'" 
rs.open sql,conn,1,1
ok=rs("ok")
set rssc=conn.Execute("select sum(zong) from [jiesuan] where name='"&user&"'")
set rssd=conn.Execute("select sum(jiang) from [jiesuan] where name='"&user&"'")
set rsse=conn.Execute("select sum(ti) from [jiesuan] where name='"&user&"'")
set rssf=conn.Execute("select sum(bu) from [jiesuan] where name='"&user&"'")

gongzi=cint(rssc(0))+cint(rssd(0))+cint(rsse(0))+cint(rssf(0))
gongzi=Round(gongzi,2)

set rse=server.createobject("adodb.recordset")
sql="select * from [gongzi] where name='"&user&"'" 
rse.open sql,conn,1,3
if rse.bof and rse.eof then
rse.addnew
rse("name")=user
rse("gongzi")="0"
rse.update
rse.close
end if

set rsg=server.createobject("adodb.recordset")
sql="select * from [gongzi] where name='"&user&"'" 
rsg.open sql,conn,1,3
yu=gongzi-rsg("leiji")
yu=Round(yu,2)
jiesuan=rsg("ok")

set rsd=server.createobject("adodb.recordset")
sql="select * from [user] where name='"&Request.Cookies("user")&"'" 
rsd.open sql,conn,1,3

if ad="save" then
if cint(request("jine"))>yu then
response.write "<script>alert('您的余额不足。');location.href='?menu=jielist'</script>"
response.end
end if
set rsc=server.createobject("adodb.recordset")
sql="select * from [gongzi] where name='"&Request.Cookies("user")&"'" 
rsc.open sql,conn,1,3
rsc("gongzi")=gongzi
rsc("shangci")=request("jine")
rsc("leiji")=cint(rsc("leiji"))+cint(request("jine"))
rsc("time")=date()
rsc("bei")=request("bei")
rsc("ok")="no"
rsc.update
rsc.close
response.write "<script>alert('申请提交成功。');location.href='?menu=jielist'</script>"
response.end
end if
shi=date()
tian=shi-#2007-10-15#
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#BED3DB">
  <tr>
    <td colspan="9" class="a1"><div align="center" class="f12 STYLE1"><strong>工资清单</strong></div></td>
  </tr>
  <tr>
    <td width="11%" bgcolor="#F9F9F9" class="a4"><div align="center">姓名</div></td>
    <td width="22%" bgcolor="#F9F9F9" class="a4"><div align="center">结算日期</div></td>
    <td width="13%" bgcolor="#F9F9F9" class="a4"><div align="center">工资</div></td>
    <td width="11%" bgcolor="#F9F9F9" class="a4"><div align="center">工作天数</div></td>
    <td width="11%" bgcolor="#F9F9F9" class="a4"><div align="center">结算工资</div></td>
    <td width="8%" bgcolor="#F9F9F9" class="a4"><div align="center">奖金</div></td>
    <td width="8%" bgcolor="#F9F9F9" class="a4"><div align="center">提成</div></td>
    <td width="7%" bgcolor="#F9F9F9" class="a4"><div align="center">补助</div></td>
    <td width="9%" bgcolor="#F9F9F9" class="a4"><div align="center"></div></td>
  </tr>
  <%do while not rs.eof%>
  <tr>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("name")%> </div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("riqi")-rs("time")%> - <%=rs("riqi")%></div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("jiage")%>元/<%=rs("lei")%></div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("time")%> 天 </div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("zong")%>元</div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("jiang")%>元</div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("ti")%>元</div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("bu")%>元</div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center">
      <%if rs("ok")="no" then%>
      未结算
      <%else%>
      已结算
      <%end if%>
    </div></td>
  </tr>
  <%rs.movenext
                  loop
                  rs.close
                  set rs=nothing
                  %>
</table>
<br>
<div align="center"><br>
  <table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
    <form name="form2" method="post" action="?menu=jielist&ad=save"><tr>
      <td colspan="2" class="a1"><div align="center" class="STYLE1"><strong>提取现金</strong></div></td>
    </tr>
    <tr>
      <td width="15%" bgcolor="#F9F9F9">您的银行帐号：</td>
      <td width="85%" bgcolor="#F9F9F9"><span class="STYLE2"><u><%=rsd("name")%></u> - <u><%=rsd("yin")%></u></span>&nbsp;&nbsp;请检查是否有错，有错请在提取说明写明白。</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9">提取金额：</td>
      <td width="85%" bgcolor="#F9F9F9"><input name="jine" type="text" id="jine">
元</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9">提取说明：</td>
      <td width="85%" bgcolor="#F9F9F9"><textarea name="bei" cols="30" rows="5" id="bei"></textarea></td>
    </tr>
    <tr>
      <td colspan="2" bgcolor="#F9F9F9"><div align="center">
        <%if jiesuan="no" then%>你在<%=rsg("time")%>申请的<span class="STYLE2"><%=rsg("shangci")%></span>元还没发放呢。<%else%><input type="submit" name="Submit" value="马上提交申请"><%end if%>
      </div></td>
    </tr>
	</form>
  </table>
  <br>
  <table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
    <tr>
      <td class="a4"><div align="center">累计收益：<span class="STYLE2"><%=gongzi%></span>元 最近在<%=rsg("time")%>日提取<span class="STYLE2"><%=rsg("shangci")%></span>元，共累计提取<span class="STYLE2"><%=rsg("leiji")%></span>元，还有<span class="STYLE2"><%=yu%></span>元可提取。</div></td>
    </tr>
  </table>
</div>
<%end if%>
<%if menu="eduser" then
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where name='"&user&"'" 
rs.open sql,conn,1,3

if ad="ed" then
name=request("name")
pass=request("pass")
sex=request("sex")
yin=request("yin")

rs("name")=name
if pass<>"" then
rs("pass")=md5(pass,32)
end if
rs("sex")=sex
rs("yin")=yin
rs("ok")="yes"
rs.update
rs.close
response.write "<script>alert('信息修改成功。');location.href='?menu=eduser'</script>"
end if
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#BED3DB">
  <form name="form1" method="post" action="?menu=eduser&ad=ed">
    <tr>
      <td colspan="2" class="a1"><div align="center" class="f12 STYLE1"><strong>修改信息</strong></div></td>
    </tr>
    <tr>
      <td width="17%" bgcolor="#F9F9F9" class="a4"><div align="center">姓&nbsp;名：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="name" type="text" id="name" value="<%=rs("name")%>" size="15"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">密&nbsp;码：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="pass" type="text" id="pass">
        不修改请留空</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">性&nbsp;别：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><select name="sex" id="sex">
        <option value="boy">男</option>
        <option value="girl">女</option>
      </select></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">年&nbsp;龄：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="age" type="text" id="age" value="<%=rs("age")%>" size="10"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">工牌号：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="gong" type="text" id="gong" value="<%=rs("gong")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">身份证：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="shen" type="text" id="shen" value="<%=rs("shen")%>" size="40">
        必须输入正确的身份证号</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><DIV align="center">银行帐号：</DIV></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="yin" type="text" id="yin" value="<%=rs("yin")%>" size="40">
        例如：工商银行 **** **** **** **** ***</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><DIV align="center">电&nbsp;话：</DIV></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="tel" type="text" id="tel" value="<%=rs("tel")%>">
        例如：区号-电话号码</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><DIV align="center">Q&nbsp;Q：</DIV></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="qq" type="text" id="qq" value="<%=rs("qq")%>">
        例如：15253061</td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><DIV align="center">E-mail：</DIV></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="email" type="text" id="email" value="<%=rs("email")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><DIV align="center">地&nbsp;址：</DIV></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="add" type="text" id="add" value="<%=rs("add")%>" size="60"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><div align="center">职&nbsp;位：</div></td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><%=rs("zhiwei")%></td>
    </tr>
    <tr>
      <td colspan="2" bgcolor="#F9F9F9" class="a4"><div align="center">
        <input type="submit" name="Submit223232" value="提交">
      </div></td>
    </tr>
  </form>
</table>
<%end if%>
<%
if menu="cha" then
id=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from [gonggao] where id="&id
rs.open sql,conn,1,1
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
  <tr>
    <td colspan="3" class="a1"><div align="center" class="f12 STYLE1"><strong>查看留言</strong></div></td>
  </tr>
  <tr>
    <td  width="17%" bgcolor="#FFFFFF" class="a4"><div align="center">标题：</div></td>
    <td width="83%" colspan="2" bgcolor="#FFFFFF" class="a4"><%=rs("title")%></td>
  </tr>
  <tr>
    <td width="17%" bgcolor="#FFFFFF" class="a4"><div align="center">内容：</div></td>
    <td colspan="2" bgcolor="#FFFFFF" class="a4"><textarea name="textarea" cols="60" rows="20"><%=rs("content")%></textarea></td>
  </tr>
  <tr>
    <td bgcolor="#FFFFFF" class="a4">&nbsp;</td>
    <td colspan="2" bgcolor="#FFFFFF" class="a4"><div align="right">发布者：<%=rs("name")%> 发布时间：<%=rs("time")%></div></td>
  </tr>

</table>
<%end if%>
</body>
</html>