document_file_repeal.asp

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

<%
'功能：报表归档作废/恢复
%>

<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->

<%
  mRecordID=request("RecordID")	'文档编号
  mZFBZ=request("ZFBZ")	'作废标志
  '------------------------------------------------
  sqlstr="update tbioaDocument_File set ZFBZ="&mZFBZ&" Where RecordID='"&mRecordID&"'"
  oconn.execute sqlstr
  response.write "<script language=javascript> history.go(-2) </SCRIPT>"
%>