savedingdan.asp

闲置物品免费交易的平台

<!--#include file="conn.asp"-->
<%if request.Cookies("days6")("username")=""  then
response.write "<script language=javascript>alert('对不起，您还没有登陆！');history.go(-1);</script>"
response.End
end if
dim action,order,username
action=request.QueryString("action")
id=request.QueryString("id")
checkbox=request("checkbox")
select case action
case "save"
if request("checkbox")<>"" then
	set rs=server.CreateObject("adodb.recordset")
	rs.Open "select zhuangtai from [bookjia] where id="&id&"",conn,1,3
	old_zhuangtai=rs("zhuangtai")
	rs("zhuangtai")=checkbox
		rs.Update
		rs.Close
	set rs=nothing
'conn.execute ("update bookjia set zhuangtai="&request("checkbox")&" where id='"&id&"'")
response.Write "<script language=javascript>alert('订单状态更改成功！');window.close();window.opener.location.reload();</script>"
response.end
end if


case "del"
'删除时要判断状态，未收到货时要返还积分和库存的
conn.execute ("delete from bookjia where id="&id&"")
response.Write "<script language=javascript>alert('订单删除成功！');window.close();window.opener.location.reload();</script>"
response.end
end select
%>