📄 sign4.asp.bak

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

💻 BAK

字号:

<%
option explicit
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1
%>
<!-- #include file="../include/config.inc" -->
<!-- #include file="../include/common.inc" -->
<!-- #include file="../include/debug.inc" -->
<!-- #include file="../include/db.inc" -->
<!-- #include file="../include/date.inc" -->
<!-- #include file="../include/datahandle.inc" -->
<!-- #include file="../include/recordlist.inc" -->
<!-- #include file="../include/security.inc" -->

<!-- #include file="../common/commonpage.inc" -->

<%
'call CheckSecurity()
dim fid : fid = GetParam("fid")
if IsEmpty(fid) then
	Response.Clear()
	Server.Transfer("sign.asp")
	Response.End
end if

%>

<html>
<head>
<title>上海信息大楼 Shanghai Information Tower</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../common/common.css" type="text/css">

<body >
	
<center>

<table cellspacing=0 cellpadding=0 border=0 align=center width=500>
<tr align=center height=60>
	<td colspan=3 class=tblTitle><marquee>审 批 意 见</marquee></td>
</tr>
<tr align=center height=50>
	<td ><B>步骤序号</B></td>
	<td ><B>审批人</B></td>
	<td ><B>审批意见</B></td>
</tr>
<%
	dim crs	
	set crs = New CRecordset
	dim strSQL
	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=" & fid & "order by a.step_no asc"
	dim rs	: set rs = crs.open(dbLocal,strSQL)
    

    Do while (Not rs.eof) 
		Response.Write("<tr align=center height=40>")
		Response.Write("<td>第" & Rs("step_no")&"步</td>")
		Response.Write("<td>" & Rs("account_name")&"</td>")
		Response.Write("<td align=center>" & Rs("opinion")&"</td>")
		Response.Write("</tr>")
		Rs.MoveNext 
    Loop 
%>
</table>


</center>
<br>
<br>
<% crs.Close() %>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -