📄 am_ftm_sar.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

	'update
	strSQL="update t_template_step "
	strSQL=strSQL & " set step_no=step_no+1 "
	strSQL=strSQL & " where step_no > " & Request.Form("step_no")
	strSQL=strSQL & " and template_id=" & Request.QueryString("tid")
	DBExecute strSQL

	'insert 
	sid=Request.Form("step_no") + 1
	strSQL="insert into t_template_step "
	strSQL=strSQL & "(template_id,step_no,step_op_id,step_op_person,step_desc) values (" 
	strSQL= strSQL & Request.QueryString("tid") & ", " 
	strSQL= strSQL & (Request.Form("step_no")+1) & ","
	strSQL= strSQL & Request.Form("step_op") & ",'"
	strSQL= strSQL & Request.Form("step_op_person") & "','"
	strSQL= strSQL & Request.Form("step_desc") & "')"


	DBExecute strSQL
    
	' Output Result
	strSQL="select template_id,step_no,operation_name,account_name,step_desc "
	strSQL=strSQL & " from t_template_step a,t_step_operation b,v_user_account c "
	strSQL=strSQL & " where a.step_op_id=b.operation_id "
	strSQL=strSQL & " and a.step_op_person=c.account_id "
	strSQL=strSQL & " and a.template_id=" & Request.QueryString("tid") 
	strSQL=strSQL & " and a.step_no=" & (Request.Form("step_no")+1) 
	DBQuery(strSQL)
%>

<p align=center>*******成功新增模板步骤*********<br>

<table cellspacing=0 cellpadding=0 border=1 align=center width=400>
<tr><td colspan=4 class=tblTitle>新 增 模 板 步 骤</td></tr>
<tr align=center>
	<td class=tdHead>步骤序号</td>
	<td class=tdHead>审批人</td>
	<td class=tdHead>步骤操作</td>
	<td class=tdHead>描   述</td>
</tr>
<tr align=center>
	<td>&nbsp;<%=oRs("step_no")%></td>
	<td>&nbsp;<%=oRs("account_name")%></td>
	<td>&nbsp;<%=oRs("operation_name")%></td>
	<td>&nbsp;<%=oRs("step_desc")%></td>
</tr>
</table>


<%
	Response.Write("<a href='am_ftm_sa.asp?tid=" & oRs("template_id")&"'>")
%>
<img border=0 src="image/newform.gif" alt="新增流程模板步骤"> 新增流程模板步骤</a>
<a href=am_ftm_ftm.asp?tid=<%=Request.QueryString("tid")%>>
<img border=0  src="image/RecordEdit.gif" alt="修改流程模板"> 修改流程模板</a>
<%	
	' Close Recordset
	DBEndQuery

	DBDisconnect
%>

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

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