check_date_id.asp

来自「OFFICE办公自动化」· ASP 代码 · 共 62 行

ASP
62 行
字号 
<%
'文件名：check_date_id.asp
'作者：展亮
'功能：工作流文件审批处理
'参数：
'开发时间：2003-11-4 0:50
%>
<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->
<!--#include file="../asp/displayformdate.asp"-->
<!--#include file="../asp/displaycheckinf.asp"-->
<link rel="stylesheet" type="text/css" href="../css.css">
<%

'-----------------------------------------------------

%>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/flowstep.css" type=text/css>
<title>main</title>
</head>
<center>
<%
page=request("page")
%>
<table>
<tr>
<td><b><font color="#3F608F">工作流文件审批处理</font></b></td><form method="post" action="displaycheckfile.asp"><td><input type="submit" name="submit" value="返回"><input type="hidden" name="page" value="<%=page%>"></td></form>
</tr>
</table>
</center>
<br>
<center>
<%
id=request("id")
ifagree=request("ifagree")
check_content=request("check_content")
if ifagree<>"" then
 sql="update workflow_check_rec set ifagree='" & cString(ifagree) & "',ifcheck='yes',check_content='" & cString(check_content) & "',check_date='" & cString(now()) & "' where id=" & id
 oConn.Execute sql
 set oConn=nothing
%>
<br><br><br>
<font color="#FF0000">
<font size=3>审批完成！</font>

<% 
else 
%> 
<br><br><br> 
<font color=red size=3>审批失败----你必须选择“同意”或“不同意”！</font> 
 
<% 
end if 
%> 
</center> 

 
</font>

check_date_id.asp - 源码说明

本页面展示了「OFFICE办公自动化」中的 check_date_id.asp 源码文件，采用 ASP 编程语言编写，共 62 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与OFFICE相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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