📄 am_om_ov.asp

📁 物业管理和办公自动化系统

💻 ASP

字号:

<!--#INCLUDE FILE="z_common.asp"-->
<html>
<head>
<title>察看流程审批</title>
<style type="text/css">
<!-- @import url(../common.css); -->
</style>
</head>
<body>
<p>
<table cellspacing=0 cellpadding=0 align=center border=0 width=600>
<tr><td class=noborder><% MenuIndex %></td></tr>
</table>


<%
	MyDBConnect
	strSQL="select flow_name from t_flow where flow_id=" & Request.QueryString("fid")
	DBQuery(strSQL)
%>
<p align=center>
<a href="am_fm_fp.asp?fid=<%=Request.QueryString("fid")%>">
流程名称：<%=oRs("flow_name")%></a>
<br>
<table cellspacing=0 cellpadding=0 border=1 align=center width=600>
<tr align=center>
	<td colspan=3 class=tblTitle>审 批 意 见</td>
</tr>
<tr align=center>
	<td class=tdHead>步骤序号</td>
	<td class=tdHead>审批人</td>
	<td class=tdHead>审批意见</td>
</tr>
<%
	strSQL="select a.step_no,account_name,opinion from t_flow_opinion a,t_flow_step b,v_user_account c"
	strSQL=strSQL & " where a.flow_id=b.flow_id and a.step_no=b.step_no and b.step_op_person=c.account_id"
	strSQL=strSQL & " and a.flow_id=" & Request.QueryString("fid")
	DBQuery strSQL
    

    Do while (Not oRs.eof) 
		Response.Write("<tr align=center>")
		Response.Write("<td>&nbsp;" & oRs("step_no")&"</td>")
		Response.Write("<td>&nbsp;" & oRs("account_name")&"</td>")
		Response.Write("<td align=left>&nbsp;" & oRs("opinion")&"</td>")
		Response.Write("</tr>")
		oRs.MoveNext 
    Loop 
	DBEndQuery
%>
</table>

<%	
	' Close Recordset
	DBDisconnect
%>

             
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -