classsave.asp

来自「admin/admin.asp是WAP的后台管理登陆页面」· ASP 代码 · 共 39 行

<!--#include file="conn.asp"-->
<%
 if request("types")="addclass" then
  set rs=server.createobject("adodb.recordset")
  sql="select * from Aclass"
  rs.open sql,conn,3,3
  rs.addnew
  rs("class")=request("class")
  rs("classurl")=request("classurl")
  rs("classtop")=request("classtop")
  rs("classon")=request("classon")
  rs.update
  rs.close
  set rs=nothing
response.redirect "ClassManage.asp"
   end if
%>
<%
if request("types")="mod" then
set rs=server.createobject("adodb.recordset")
sql="update Aclass set classtop='"&request("classtop")&"' where id="&request("id")
sql2="update Aclass set class='"&request("class")&"' where id="&request("id")
sql3="update Aclass set classurl='"&request("classurl")&"' where id="&request("id")
conn.execute(sql)
conn.execute(sql2)
conn.execute(sql3)
response.redirect "ClassManage.asp"
end if
if request("types")="del" then
set rs=server.createobject("adodb.recordset")
sql="delete from Aclass where id="&request("id")
sql2="delete from ANclass where classid="&request("id")
sql3="delete from article where classid="&request("id")
conn.execute(sql)
conn.execute(sql2)
conn.execute(sql3)
response.redirect "ClassManage.asp"
end if 
%>