qdsetjs.asp

通用考勤系统

<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权：野马原创                    ''''
''''联系：[e-mail]          ''''
''''说明：需要新功能联系我      ''''
''''QQ:2643148                    ''''
%>
<!--#include file="conn.asp"-->
<%
 sql="Select * From qdsetall"
  rs.open sql,cn,1,3
   do while not rs.eof
    zt=rs("id")
       qdnum=1
       worktime2=0
      sql2="Select * From qdsettime where upsetid="&zt&"  "
           rs1.open sql2,cn,1,3
            do while not rs1.eof  
              dayqdtime=rs1("dayqdtime")
              dayzxtime=rs1("dayzxtime") 
              rs1("qdnum")=qdnum
              worktime1=int(datediff("s",dayqdtime,dayzxtime)/60)
              worktime2=worktime1+worktime2
              qdnum=qdnum+1
            rs1.movenext
          loop
            rs1.close
   if worktime2=empty then
       worktime2=0
   end if
  rs("worktime")=worktime2
rs.update
rs.movenext
loop
rs.close
  response.write "<script>location.href='qdset2.asp'</script>" 

%>