smallsave.asp

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

<!--#include file="conn.asp"-->
<%
 if request("types")="addnclass" then
  set rs=server.createobject("adodb.recordset")
  sql="select * from anclass"
  rs.open sql,conn,3,3
  rs.addnew
  rs("nclass")=request("nclass")
  rs("classid")=request("classid")
  rs("nclasstop")=request("nclasstop")
  rs("nclasson")=request("nclasson")
  rs("nclassurl")=request("nclassurl")
  rs("nclassbr")=request("nclassbr")
  rs("nclassup")=request("nclassup")
  rs.update
  rs.close
  set rs=nothing
response.redirect "ClassManage.asp"
end if
%>
<%
if request("types")="mod" then
sql1="update ANclass set Nclass='"&request("Nclass")&"' where Nclassid="&request("Nclassid")
conn.execute(sql1)
sql2="update ANclass set nclasstop='"&request("nclasstop")&"' where Nclassid="&request("Nclassid")
conn.execute(sql2)
sql3="update ANclass set nclassurl='"&request("nclassurl")&"' where Nclassid="&request("Nclassid")
conn.execute(sql3)
sql4="update ANclass set nclassbr='"&request("nclassbr")&"' where Nclassid="&request("Nclassid")
conn.execute(sql4)
sql5="update ANclass set nclassup='"&request("nclassup")&"' where Nclassid="&request("Nclassid")
conn.execute(sql5)
response.redirect "ClassManage.asp"
end if

if request("types")="del" then
sql1="delete from ANclass where Nclassid="&request("Nclassid")
conn.execute(sql1)
sql2="delete from article where Nclassid="&request("Nclassid")
conn.execute (sql2)
response.redirect "ClassManage.asp"
end if 
%>