nword_modify.asp

来自「shopxp网上购物系统v6.6已经调试,百分百可用」· ASP 代码 · 共 26 行

<%@ codepage ="936" %>
<!--#include file="../nUser/config.asp"-->
<!--#include file="../nUser/conn.asp"-->
<!-- #include file="inc/Session.asp" -->
<%
   dim sql
   dim rs
   ntype=request("ntype")


      if ntype=1 then
         sql="update kheu_nWord set show_flag=false where id="&request("id")
      elseif ntype=2 then
         sql="update kheu_nWord set show_flag=true where id="&request("id")
      elseif ntype=3 then
         sql="update kheu_nWord set pay_flag=false where id="&request("id")
	  elseif ntype=4 then
         sql="update kheu_nWord set pay_flag=true where id="&request("id")
  end if

   conn.execute sql
   conn.close
   set conn=nothing
  response.redirect request.serverVariables("HTTP_REFERER")
%>