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

📄 newwork.asp

📁 网络办公系统
💻 ASP
字号:
<!--#include file="check.asp"-->
<!--#INCLUDE FILE="connect.asp" --> 
<html>
<head>
<title>待办工作</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">

            <%
			set rs=server.createobject("adodb.recordset")
	sql="select * from newwork where status=0 and userid='"&session("uid")&"' order by applytime desc"
   rs.open sql,conn,1,1
							 %>  
  <table cellspacing=0 cellpadding=0 width="100%" border=0>
    <tbody> 
     <tr> 
      <td valign="top"> 
        
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="50">
        <tr> 
         
            <td align="center"><img src="images/newwork.gif"></td>
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0" height="26" bgcolor="#BADCFC">
          <tr height=1> 
            <td colspan=2 bgcolor="#66AAE3" height="1"></td>
          </tr>
          <tr> 
            <td width="5%" align="center">&nbsp;</td>
            <td width="95%">
			当前您有<font class="picknum"><%=rs.recordcount %></font>项待办工作</td>
          </tr>
          <tr height=1> 
            <td colspan=2 bgcolor="#66AAE3" height="1"></td>
          </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0" height="26" bgcolor="#DBE3F0">
                  <tr> 
            <td width="22%" align="center">工 作 类 型</td>
            <td align="center" width="42%"> 标      题</td>
            <td align="center" width="22%">时   间</td>
            <td align="center" width="14%">占用时间</td>
          </tr>
		  <tr height=1> 
           <td colspan=4 bgcolor="#ffffff" height="1"></td>
          </tr>
          </table>
		  
        <table cellspacing=0 cellpadding=0 width="100%" border=0>
          <%if rs.eof then %>
          <tr bgcolor="E6F2FD"> 
            <td height="22" valign="middle" class="9blue" colspan="4"> 
              
            <table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
              <tr> 
                <td class=f6wait align="center"> 当前您没有待办工作 </td>
              </tr>
            </table>
            </td>
          </tr>
          <%end if
		  while not rs.eof
		   i=i+1
			    m=i mod 2
	            if m=0 then
	             %>
          <tr bgcolor="#E6F2FD"> 
            <% else %>
          <tr bgcolor="#F5FAFD"> 
            <%end if %>
            <td height=28 width="22%" align="center"> <a href="<%=rs("url")%>?flowid=<%=rs("baseid")%>&nwid=<%=rs("id")%>" class="aapply"> 
              </a><a href="<%=rs("url")%>?flowid=<%=rs("baseid")%>&nwid=<%=rs("id")%>" class="aapply"><%=rs("typed")%></a></td>
            <td height=28 align="center" width="42%"> <a href="<%=rs("url")%>?flowid=<%=rs("baseid")%>&nwid=<%=rs("id")%>" class="aapply"> 
              <%temp=""&rs("title")
	         if len(temp)>20 then
	         temp=left(temp,20)&"…"
	          end if
	          response.write(temp)
	         
			   %>
              </a></td>
            <td height=28 width="22%" align="center" class="applygz"> <%=rs("applytime")%> 
            </td>
            <td height=28 width="14%" align="center" class="applygz"> 
              <%temp=DateDiff ("n",rs("applytime"),now())
				      if temp<60 then
					response.write temp&"分钟"
					end if
					if temp>60 and temp<1440 then
					waithour=Clng(temp/60)
					response.write waithour&"小时"
					end if
					if temp>1440 then
				     waitday=CLng(temp/1440)
					response.write waitday&"天"
					end if
			      %>
            </td>
          </tr>
          <%rs.movenext
							wend
							%>
        </table>
      </td>
    </tr>
     
  </table>

<!--#include file="close.asp"-->
</body>
</html>

⌨️ 快捷键说明

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