📄 banliqikuangchakan1.asp
字号:
<!--#include file="include/sqlstr.asp"-->
<!--#include file="include/opendb.asp"-->
<!--#include file="include/bgsub.asp"-->
<%
oabusyname=request.cookies("oabusyname")
oabusysuid=request.cookies("oabusysuid")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
'if oabusysuid="" then response.redirect "default.asp"
%>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css/css.css" type="text/css">
<body bgcolor="#ffffff">
<%
call bghead()
%>
<p><b>执行情况</b></font></p>
<%
call bgmid()
%>
<table border="1" cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="100%" id="AutoNumber1" cellpadding="4">
<tr bgcolor="#cecece" align="center">
<td width="6%" >状态</td>
<td width="20%">流程主题</td>
<td width="20%">限办时间</td>
<td width="20%">正在处理者</td>
<td width="34%">办理要求</td>
</tr>
<%
dim rs1,sql1,rs,sql,conn,conn1,i
'取得当前日期
nowyear=year(date)
nowmonth=month(date)
nowday=day(date)
set conn=opendb()
set rs=server.createobject("adodb.recordset")
'发起或者参与的没有结束的流程
sql="select a.*,b.shifoukanguo,b.name from a_liuchengbeifeng a right join "&_
" (select distinct liuchengbeifengid as id from a_liucheng where name="&SqlStr(oabusyname)&""&_
" union select id from a_liuchengbeifeng where fashongren="&SqlStr(oabusyname)&") c on a.id=c.id"&_
" left join a_liucheng b on a.id=b.liuchengbeifengid "&_
" where b.id=(select min(id) from a_liucheng where liuchengbeifengid=a.id and shifoukanguo='0')"
'response.Write(sql)
'response.End()
rs.open sql,conn,1,1
for i=1 to rs.recordcount
'取得流程限时
stopyear=rs("year")
stopmonth=rs("mouth")
stopday=rs("day")
%>
<tr>
<td align="center" >
<% if cint(stopyear) < cint(nowyear) then '方案超时%>
<img border="0" src="liucheng/image/l2.gif">
<input type="hidden" name="T1" size="2" value="">
<% else if cint(stopyear)=cint(nowyear) and cint(stopmonth)<cint(nowmonth) then '方案超时%>
<img border="0" src="liucheng/image/l2.gif">
<input type="hidden" name="T1" size="2" value="">
<% else if cint(stopyear)=cint(nowyear) and cint(stopmonth)=cint(nowmonth) and cint(stopday)<cint(nowday) then '方案超时%>
<img border="0" src="liucheng/image/l2.gif">
<input type="hidden" name="T1" size="2" value="">
<% else if rs("zhongzhi")="1" then '方案终止%>
<img border="0" src="liucheng/image/l3.gif">
<input type="hidden" name="T1" size="2" value="4">
<% else if rs("chongban")="1" then '要求重办 %>
<img border="0" src="liucheng/image/l4.gif">
<input type="hidden" name="T1" size="2" value="2">
<% else '正常%>
<img border="0" src="liucheng/image/l1.gif">
<input type="hidden" name="T1" size="2" value="">
<%
end if
end if
end if
end if
end if
%>
</td>
<td align="left" valign="middle" title=<%=newname%>><a href="liucheng/attributechakan.asp?id=<%=rs("id")%>"><font color="#000000"><%=rs("title")%></font></a> </font></td>
<td align="left" valign="middle" style="font-size:9pt">
<%=rs("year")&"-"&rs("mouth")&"-"&rs("day")%></font></td>
<td><%=rs("name")%></font></td>
<td><%=rs("content")%></td>
</tr>
<%
rs.movenext
next
rs.close
'发起得已经结束的流程
sql="select * from a_liuchengbeifeng where shifouwancheng=1 and fashongren="&SqlStr(oabusyname)
rs.open sql,conn,1,1
for j=1 to rs.recordcount
%>
<tr>
<td align="center" >
<img border="0" src="liucheng/image/l5.gif">
<input type="hidden" name="T1" size="2" value="">
</td>
<td align="left" valign="middle" title=<%=newname%>><a href="liucheng/attributechakan.asp?id=<%=rs("id")%>"><font color="#000000"><%=rs("title")%></font></a> </font></td>
<td align="left" valign="middle" style="font-size:9pt">
<%=rs("year")&"-"&rs("mouth")&"-"&rs("day")%></font></td>
<td> </font></td>
<td><%=rs("content")%></td>
</tr>
<%
rs.movenext
next
rs.close
%>
</table>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" cellpadding="0" width="400">
<tr>
<td>
<p align="right"> <b><font size="2">状态</font>：</b></p>
</td>
<td width="10"> <font size="2"><img border="0" src="liucheng/image/l1.gif"></font></td>
<td width="33"> <font size="2">正常</font></td>
<td width="23"> <font size="2"><img border="0" src="liucheng/image/l2.gif"></font></td>
<td width="31"> <font size="2">超时</font></td>
<td width="22"> <font size="2"><img border="0" src="liucheng/image/l3.gif"></font></td>
<td width="32"> <font size="2">终止</font></td>
<td width="23"> <font size="2"><img border="0" src="liucheng/image/l4.gif"></font></td>
<td width="99"> <font size="2">执行者要求重办</font></td>
<td width="22"> <font size="2"><img border="0" src="liucheng/image/l5.gif"></font></td>
<td width="47"> <font size="2">已完成</font></td>
</tr>
</table>
<%
call bgback()
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -