paiming_do.asp

一个考勤评分系统

<!--''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权：野马原创                    ''''
''''联系：[e-mail]          ''''
''''说明：需要新功能联系我      ''''
''''QQ:214297587                    ''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
-->
<title>考勤评分系统后台  by 野马</title>
<!--#include file="check.asp"-->
<!--#include file="MD5.asp"-->
 <!--#include file="conn.asp"-->
<%
if request("act")="allupdate" then 

sql="select * from scunews"
rs.open sql,cn,3,3
 do while not rs.eof 
curtime=rs("pmcrutime")
rs("pmlasttime")=curtime
rs("pmcrutime")=now() 
rs.update
rs.movenext 
loop
rs.close
response.redirect "paiming.asp"
end if
%>
<%
if request("act")="sinupdate" then 
aid=request.form("aaid")
pm=request.form("pm")
sql="select * from scunews where id="&aid
rs.open sql,cn,3,3
rs("paiming")=pm
curtime=rs("pmcrutime")
rs("pmlasttime")=curtime
rs("pmcrutime")=now()
rs.update
rs.close
response.redirect "paiming.asp"
end if
%>
<%
if request("act")="sinupdate" then 
aid=request("aaid")
pm=request("pm")
sql="select * from scunews where id="&aid
rs.open sql,cn,3,3
rs("paiming")=pm
curtime=rs("pmcrutime")
rs("pmlasttime")=curtime
rs("pmcrutime")=now()
rs.update
rs.close
response.write "ddd"
end if
%>