admin_newsset.asp

ASP源程序采用天空软件小偷中心核件制成

<!--#include file="conn.asp"-->
<!--#include file="admin_loginchk.asp"-->
<%admin1%>
<% act=request("action")
   if act="SetIsGood" then
   call setnews()
   end if
   
   sub setnews()
	 set rs=server.createobject("adodb.recordset")
		sql="select IsGood from article where articleid="&request("id") 
		rs.open sql,conn,1,3
		if not rs.eof then
			if rs("IsGood")=true then
				rs("IsGood")=false
			else
				rs("IsGood")=true
			end if
			rs.update
		end if
	response.redirect"admin_newsedit.asp"
    end sub
		%>