news_manage_sort_ok.asp

来自「OFFICE办公自动化」· ASP 代码 · 共 24 行

<!--#include file="../inc/conn.asp"-->
<%
'sort_type=cint(Request.Form("sort_type"))
sort_action=Request.Form("sort_action") 
boardname=Request.Form("boardname") '取得新栏目名
news_id=Request.Form("news_id")   

if sort_action="add_new" then '当添加时 

	  oConn.execute("insert tbioaInfoStyle(Newsort,ParentID) values('" & boardname & "',0)")     

elseif sort_action="edit" then '当修改时
  	oConn.execute "UPDATE tbioaInfoStyle SET Newsort='" & boardname & "' where ID=" & news_id
elseif sort_action="del" then '当删除时
  oConn.execute "DELETE FROM tbioaInfoStyle WHERE ID=" & news_id
  oConn.execute "DELETE FROM tbioaInfomation WHERE newsort=" & news_id
end if
%>
<%sub showError(msg)%>
<%=msg%> 
<%end sub%>
<%=response.redirect ("./news_manage.asp")%>
<!--#include file="../inc/conn_close.asp"-->