<% ID=trim(request("ID")) if request("cmdUp")<>"" and isnumeric(ID) then oConn.execute "update tblDoc set isOld=1 where ID="& ID response.write "

归档处理完成，[返回]

" response.end end if if request("cmdDelete")<>"" and isnumeric(ID) then oConn.execute "delete tblDocFinal where DocID="& ID oConn.execute "delete tblDocSuggest where DocID="& ID oConn.execute "Delete tblDoc where ID="& ID response.write "

公文已经删除！[返回]

" response.end end if %>