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

📄 user.asp

📁 一个小型ASP做的工资管理系统,这也是别人做的,我觉得他很地干静.
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="ked.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
name=request("name")
menu=request("menu")
ad=request("ad")
user=Request.Cookies("user")
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<style type="text/css">
<!--
.STYLE1 {color: #FFFFFF}
.STYLE2 {color: red}
.STYLE3 {color: #FF0000}
-->
</style>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>会员中心</title>
<link rel="stylesheet" href="admin/admin.css" type="text/css">
</head>

<body>
<%if menu="user" then
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where name='"&Request.Cookies("user")&"'" 
rs.open sql,conn,1,3
lei=rs("zhiwei")

set rs2=server.createobject("adodb.recordset")
sql="select * from [zhiwei] where lei='"&lei&"'" 
rs2.open sql,conn,1,3
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
  <tr>
    <td colspan="2"  class="a1"><div align="center" class="STYLE1"><strong>您的信息</strong></div></td>
  </tr>
  <tr>
    <td width="10%" class="a4"><div align="center">职&nbsp;位:</div></td>
    <td width="90%" class="a4"><%=rs("zhiwei")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">工&nbsp;资:</div></td>
    <td class="a4"><span class="STYLE3"><%=rs2("jiage")%></span>/元 按<%=rs2("suan")%>计算</td>
  </tr>
  <tr>
    <td class="a4"><div align="center">姓&nbsp;名:</div></td>
    <td class="a4"><%=rs("name")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">性&nbsp;别:</div></td>
    <td class="a4"><%=rs("sex")%></td>
  </tr>
  
  <tr>
    <td class="a4"><div align="center">年&nbsp;龄:</div></td>
    <td class="a4"><%=rs("age")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">工牌号:</div></td>
    <td class="a4"><%=rs("gong")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">身份证:</div></td>
    <td class="a4"><%=rs("shen")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">银行帐号:</div></td>
    <td class="a4"><%=rs("yin")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">电&nbsp;话:</div></td>
    <td class="a4"><%=rs("tel")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">Q&nbsp;Q:</div></td>
    <td class="a4"><%=rs("qq")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">E-mail:</div></td>
    <td class="a4"><%=rs("email")%></td>
  </tr>
  <tr>
    <td class="a4"><div align="center">地&nbsp;址:</div></td>
    <td class="a4"><%=rs("add")%></td>
  </tr>
  <tr>
    <td colspan="2" class="a4"><div align="center">
      <input name="button42" type=button class="button" onClick="location.href='?menu=eduser'" value="修改此信息">
    </div></td>
  </tr>
</table>
<%end if%>
<%if menu="gbook" then
set rs=server.createobject("adodb.recordset")
sql="select * from [gbook] where sname='"&Request.Cookies("user")&"'" 
rs.open sql,conn,1,3
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
  <tr>
    <td colspan="4" class="a1"><div align="center" class="STYLE1"><strong>留言信息管理</strong></div></td>
  </tr>
  <tr>
    <td width="17%" bgcolor="#F9F9F9" class="a4"><div align="center">标题</div></td>
    <td width="42%" bgcolor="#F9F9F9" class="a4"><div align="center">内容</div></td>
    <td width="12%" bgcolor="#F9F9F9" class="a4"><div align="center">发布者</div></td>
    <td width="29%" 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("title")%></div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("content")%></div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("name")%></div></td>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><%=rs("time")%></div></td>
  </tr>
  <%rs.movenext
                  loop
                  rs.close
                  set rs=nothing
                  %>
</table>
<%end if%>

<%if menu="gbook2" then
set rs=server.createobject("adodb.recordset")
sql="select * from [gbook] where sname='"&Request.Cookies("user")&"'" 
rs.open sql,conn,1,1

if ad="save" then
set rsa=server.createobject("adodb.recordset")
sql="select * from [gbook]" 
rsa.open sql,conn,1,3
rsa.addnew
rsa("title")=request("title")
rsa("content")=request("content")
rsa("name")=Request.Cookies("user")
rsa("sname")=request("sname")
rsa.update
rsa.close
response.write "<script>alert('留言发送成功。');location.href='?menu=gbook2'</script>"
end if

set rsvl=server.createobject("adodb.recordset")
sql="select * from [user]" 
rsvl.open sql,conn,1,3
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" class="a2">
  <form name="form1" method="post" action="?menu=gbook2&ad=save">
    <tr>
      <td colspan="2" class="a1"><div align="center" class="STYLE1"><strong>发布留言</strong></div></td>
    </tr>
    <tr>
      <td width="17%" bgcolor="#F9F9F9" class="a4">主 题:</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><input name="title" type="text" id="title" size="40"></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4">信息内容:</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><textarea name="content" cols="40" rows="5" id="content"></textarea></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4">接收人:</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><select name="sname" id="sname">
        <option value="admin">admin - 管理员</option>
        <%do while not rsvl.eof%>
        <option value="<%=rsvl("name")%>"><%=rsvl("name")%> - <%=rsvl("zhiwei")%></option>
        <%rsvl.movenext
                  loop
                  rsvl.close
                  set rsvl=nothing
                  %>
      </select></td>
    </tr>
    <tr>
      <td colspan="2" bgcolor="#F9F9F9" class="a4"><div align="center">
        <input type="submit" name="Submit2232" value="提交">
      </div></td>
    </tr>
  </form>
</table>
<%end if%>
<%if menu="gonggao" then
set rs=server.createobject("adodb.recordset")
sql="select * from [gonggao]" 
rs.open sql,conn,1,1
%>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" class="a2">
  <tr>
    <td colspan="4" class="a1" height=25><div align="center" class="STYLE1"><strong>公告信息</strong></div></td>
  </tr>
  <tr>
    <td colspan="4" bgcolor="#F9F9F9" class="a1"><table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#BED3DB">
	<%do while not rs.eof%>
        <tr>
    <td width="9%" bgcolor="#F2F2F2" class="a4"><div align="center"><strong>标题:</strong></div></td>
    <td width="76%" bgcolor="#F2F2F2" class="a4"><a href="?menu=cha&id=<%=rs("id")%>"><%=rs("title")%></a></td>
    <td width="15%" bgcolor="#F2F2F2" class="a4">编号<%=rs("id")%> </td>
        </tr>
  <tr>
    <td bgcolor="#F9F9F9" class="a4"><div align="center"><strong>内容:</strong></div></td>
    <td colspan="2" bgcolor="#F9F9F9" class="a4"><%if len(rs("content"))>40 then
					  Response.Write left(rs("content"),40)+"....."
					  else
					  Response.Write rs("content")
					  end if
					  %></td>
    </tr>
  <tr>
    <td colspan="3" bgcolor="#F9F9F9" class="a4"><div align="right">发布者:<%=rs("name")%> 发布时间:<%=rs("time")%></div></td>
    </tr>
  <tr>
    <td colspan="3" bgcolor="#BED3DB" class="a4" height="10"></td>
  </tr>
  <%rs.movenext
                  loop
                  rs.close
                  set rs=nothing
                  %>
    </table></td>
  </tr>
</table>
<%end if%>
<%if menu="dao" then
set rs=server.createobject("adodb.recordset")
sql="select * from [qiandao] where name='"&user&"' and riqi='"&date()&"'" 
rs.open sql,conn,1,3
tim=rs("time")
tim2=rs("time2")
if tim2<>"" then
response.write"今日已经完成签到。上班签到时间:"&tim&",下班签到时间"&tim2&""
response.End
end if

if ad="save" then
set rsa=server.createobject("adodb.recordset")
sql="select * from [qiandao]" 
rsa.open sql,conn,1,3
if tim="" then
rsa.addnew
rsa("name")=Request.Cookies("user")
rsa("riqi")=date()
rsa("time")=formatdatetime(now(),3)
rsa("bei")=request("bei")
rsa.update
rsa.close
response.write "<script>alert('上班签到成功。');location.href='?menu=dao'</script>"
else
set rsb=server.createobject("adodb.recordset")
sql="select * from [qiandao] where name='"&user&"' and riqi='"&date()&"'" 
rsb.open sql,conn,1,3
rsb("time2")=formatdatetime(now(),3)
rsb.update
rsb.close
response.write "<script>alert('下班签到成功。');location.href='?menu=dao'</script>"
end if
end if
%>
<table width="95%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#BED3DB">
  <form name="form1" method="post" action="?menu=dao&ad=save">
    <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"><%if tim="" then%>
        上班签到日期
          <%else%>
        下班签到日期
        <%end if%>
        :</td>
      <td width="83%" bgcolor="#F9F9F9" class="a4"><%=date()%></td>
    </tr>
    <tr>
      <td bgcolor="#F9F9F9" class="a4"><%if tim="" then%>

⌨️ 快捷键说明

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