<%@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"-->
<%
action=my_request("action",0)
id=my_request("id",1)
if id="" or action="" then
call wnourl("參數錯誤")
end if
select case action
case "del"
conn.execute ("delete from ssort_order where id="&id)
call wurl("刪除成功","customorder.asp")
case "modi"
flag=my_request("flag",1)
if flag=0 then
flagx=1
elseif flag=1 then
flagx=0
end if
conn.execute ("update ssort_order set zm_iscl="&flagx&" where id="&id)
call wurl("審核成功","customorder.asp")
case else
response.redirect "customorder.asp"
end select
conn.close
set conn=nothng
%>