comshh.asp

实现让客户上网就可以挑选自己所想要的装饰物

<!--#include file="cn.asp"-->
<%if session("admin")=""  or request.cookies("timesshop")("admin")="" then 
response.Write "<script language='javascript'>alert('请先登录！');window.location.replace('login.asp');</script>"
response.End
end if
lei=request.QueryString("lei")
gg=trim(request.QueryString("gg"))
id=trim(request("id"))
nname=trim(request("name"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from company where id="&id
rs.open sql,cn,1,3
select case lei
case 1
rs("shenhe")=true
rs("shtime")=now()
rs.update
response.Write "<script language='javascript'>alert('审核成功！');window.location.replace('allcompany.asp');</script>"
 case 2
if gg="yes" then
rs("gg")=true
rs.update
response.Write "<script language='javascript'>alert('修改成功！');window.location.replace('allcompany.asp');</script>"
else
rs("gg")=false
rs.update
response.Write "<script language='javascript'>alert('修改成功！');window.location.replace('allcompany.asp');</script>"
end if
end select
%>