serversubmit.asp

来自「天创商务网客户资源管理系统 v1,asp+Access,iis5」· ASP 代码 · 共 30 行

<!--#include file = include.asp-->
<%servername=request.form("servername")
serverid=request.form("serverid")
  operation=request.querystring("operation")
      select case operation

  case "Addservername"
    sql="insert into server (servername) values ('"&servername&"')"
    conn.execute(sql)
        Call Wran
  case "Modifyserver"
    sql="update server set servername='"&servername&"' where serverid="&serverid&""
    conn.execute(sql)
        Call Wran
  case "Delservername"
   sql="delete * from server where serverid="&serverid&""
    conn.execute(sql)
        Call Wran

  end select%>
<%

sub wran
response.redirect "servermanage.asp"
response.end
end sub

%>