xuanjuAsp/xafch315/News/Ntj.asp

<!--#include file="../bdcommx/connxyz.asp"-->
<%call log_chk()
dim thex,act,myodr,Keyword,Bid,Sid
thex=request("thex")
act=request("act")
myodr=request("myodr")
Keyword=request("Keyword")
Bid=request("Bid")
Sid=request("Sid")
if request("act")="stop" then
		Set rs=Server.Createobject("Adodb.Recordset")
		sql="select * from bdnews where nws_id="&thex&""
		rs.open sql,conn,1,3
		rs("nws_tj")=0
		rs.update
		rs.close
		set rs=nothing
		response.Redirect("Nmag.asp?Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"")
end if
if request("act")="rstop" then
		Set rs=Server.Createobject("Adodb.Recordset")
		sql="select * from bdnews where nws_id="&thex&""
		rs.open sql,conn,1,3
		rs("nws_tj")=1
		rs.update
		rs.close
		set rs=nothing
		response.Redirect("Nmag.asp?Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"")
end if%>