<%
'增加数据——————————————————-
action = request.QueryString(“action”)
if action = “add” then
set rs = server.CreateObject(“ADODB.RecordSet”)
sql = “select * from class”
rs.open sql, conn, 3, 3
rs.AddNew
rs(“class”) = request.Form(“classa”)
rs(“sort”) = request.Form(“sorta”)
rs.Update
rs.close
set rs = nothing
conn.close
set conn = nothing
response.Redirect(“music.asp”)
end if
'增加数据结束——————————————————-
'修改数据——————————————————-
if action = “xiugai” then
nID = request.QueryString(“id”)
set rs = server.CreateObject(“ADODB.RecordSet”)
sql = “select * from class where id = “&nID
rs.open sql, conn, 1, 3
rs(“class”) = request.Form(“class”)
rs(“sort”) = request.Form(“sort”)
rs.Update
rs.close
set rs = nothing
conn.close
set conn = nothing
response.Redirect(“class.asp”)
end if
'修改数据结束——————————————————-
'删除数据——————————————————-
if action = “delete” then
nID = request.QueryString(“id”)
sql = “delete from class where id = “&nID
conn.Execute(sql)
conn.close
set conn = nothing
response.Redirect(“class.asp”)
end if
'删除数据结束——————————————————-
%>