<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="chk.asp"-->
<!--#include file="db_conn.asp"-->
<!--#include file="../my_libs/my_request.asp"-->
<!--#include file="../my_libs/my_lib.asp"-->
<%
dim flag,sql,rs,flagx,sid,id
flag=my_request("flag",0)
if flag="" or isnull(flag) then
call wnourl("參數錯誤")
else
flagx=split(flag,",")
sid=cint(flagx(1))
idd=cint(flagx(0))
id=cint(flagx(2))
end if

if sid=0 then
vozm="zm_newsisok"
elseif sid=1 then
vozm="zm_newsistop"
end if

sql="update ssort_news set "&vozm&"= "&idd&" where nid="&id
conn.execute (sql)
call wurl("修改成功","manage_news.asp")
conn.close
set conn=nothing
%>