<!--#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  
%>