admin_newsclasseditok.asp

来自「庐江二中」· ASP 代码 · 共 33 行

<!--#include file="session.asp"-->
<%checkAdmin1%>
<!--#include file=conn.asp -->
<%
founderr=false
NewsID= request("NewsID")
NewBigClassName=Request.Form("BigClassName")
NewSmallClassName=Request.Form("SmallClassName")

if NewBigClassName="" then
	errmsg=errmsg+"<li>你没有选择大类！"
	founderr=true
end if

if NewSmallClassName="" then
	errmsg=errmsg+"<li>你没有选择小类！"
	founderr=true
end if

if founderr=true then
	call error()
else
	sql="select BigClassName,SmallClassName from News where NewsID="& NewsID
	rs.open sql,conn,1,3
	rs("BigClassName")=NewBigClassName
	rs("SmallClassName")=NewSmallClassName	
	rs.update
	rs.close
	conn.close
	set conn=nothing
	Response.Redirect "admin_NewsModify.asp?NewsID=" & NewsID
end if
%>