xuanjuAsp/xafch315/adzp/ZPstop.asp

<!--#include file="../bdcommx/connxyz.asp"-->
<%call log_chk()
call passChk()
act=request("act")
thex=request("thex")
if act="thes" then
Set rs=Server.Createobject("Adodb.Recordset")
sql="select * from adzp where zp_id="&thex&""
rs.open sql,conn,1,3
rs("zp_sta")=1
rs.update
rs.close
set rs=nothing
''''''''''''''''''''''''''''保留关联空位
response.write"<SCRIPT language=JavaScript>alert('操作成功！');"
response.write"this.location.href='ZPmag.asp';</SCRIPT>" 
end if
if act="thek" then
Set rs=Server.Createobject("Adodb.Recordset")
sql="select * from adzp where zp_id="&thex&""
rs.open sql,conn,1,3
rs("zp_sta")=0
rs.update
rs.close
set rs=nothing
''''''''''''''''''''''''''''保留关联空位
response.write"<SCRIPT language=JavaScript>alert('操作成功！');"
response.write"this.location.href='ZPmag.asp';</SCRIPT>" 
end if
%>