action.asp

来自「1、公文管理 公文管理是办公系统的核心」· ASP 代码 · 共 28 行

<!--#include file="conn.inc"-->
<%
if request("action")="edit" then
  sql="select * from kind where id="&request("id")
  rs.open sql,conn,3,2
  rs("zi")=Request.Form("zi")
  rs.update
  response.redirect"p_zi.asp"

else

  if request("action")="del" then
    sql="select * from kind where id="&request("id")
    rs.open sql,conn,3,2
    rs.delete
    rs.update
    response.redirect"p_zi.asp"
  else 
    sql="select * from kind"
    rs.open sql,conn,3,2
    rs.addnew
    rs("kind")=Request.Form("kind")
    rs("zi")=Request.Form("zi")
    rs.update
    response.redirect"p_zi.asp"
  end if
end if  
%>