📄 am_fm_sm.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=400>
<tr><td class=noborder><% MenuIndex %></td></tr>
</table>

<%
	MyDBConnect
	'decide could or not modify
	strSQL="select cur_step from t_cur_step where flow_id=" & Request.QueryString("fid")
	DBQuery(strSQL)
	i=oRs("cur_step")
	j=Request.QueryString("sid")
	'response.write(oRs("cur_step") & "+" & Request.QueryString("sid"))
	If CInt(i) >= CInt(j) Then
			'response.write(">=")
			'response.end
			response.redirect "../docmgr/my_error_page.asp?eid=3"
	End If
	' Output Result
	strSQL="select * from t_flow_step "
	strSQL=strSQL & " where flow_id=" & Request.QueryString("fid")
	strSQL=strSQL & " and step_no=" & Request.QueryString("sid")
	DBQuery(strSQL)
	oRs1=oRs

%>
<br>
<br>
<form method="post" action="am_fm_smr.asp?fid=<%=Request.QueryString("fid")%>&sid=<%=Request.QueryString("sid")%>">
<table cellspacing=0 cellpadding=0 align=center width=400 border=1 class=tblDashed>
<tr><td colspan=2 class=tblTitle>修 改 流 程 步 骤</td></tr>
<tr height=25px>
	<td class=noborder align=center width=80px>步骤序号:</td>
	<td class=noborder><%=Request.QueryString("sid")%></td>
</tr>
<tr height=25px>
	<td class=noborder align=center>审批人:</td>
	<td class=noborder><select name="account_id" style="width:80px">
<%
	strSQL="select * from v_user_account "
	DBQuery(strSQL)

   
     Do while (Not oRs.eof)
		If(oRs("account_id")=oRs1("step_op_person")) Then
          Response.write("<option value="& oRs("account_id") &" selected >" & oRs("account_name") &"</option>") 
		Else
          Response.write("<option value="& oRs("account_id") &" >" & oRs("account_name") &"</option>") 
		End If
          oRs.MoveNext 
     Loop 
	 DBEndQuery
%>
</select></td>
</tr>
<tr height=25px>
	<td class=noborder align=center>操 作:</td>
	<td class=noborder><select name="operation_id" style="width:80px">
<%
	strSQL="select * from t_step_operation "
	DBQuery(strSQL)

   
     Do while (Not oRs.eof)
		If(oRs("operation_id")=oRs1("step_op_id")) Then
          Response.write("<option value="& oRs("operation_id") &" selected >" & oRs("operation_name") &"</option>") 
		Else
          Response.write("<option value="& oRs("operation_id") &" >" & oRs("operation_name") &"</option>") 
		End If
          oRs.MoveNext 
     Loop 
	 DBEndQuery
%>
</select></td>
</tr>
<tr height=25px>
	<td class=noborder align=center>描 述:</td>
	<td class=noborder><input type=text name=step_desc value="<%=oRs1("step_desc")%>" class=RimInput></td>
</tr>
<tr height=30px>
	<td class=noborder align=center colspan=2><input type=submit value="确认修改" class=FlatBtn>&nbsp;&nbsp;&nbsp;&nbsp;<input type=reset value="重设修改" class=FlatBtn></td></tr>
</table>

</form>


</body>
</html>
⌨️ 快捷键说明

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