<% If request.cookies("timesshop")("username")="" Then dim url url=url&request.ServerVariables("SCRIPT_NAME") if(len(trim(request.ServerVariables("QUERY_STRING")))>0) then url=url & "?" & request.ServerVariables("QUERY_STRING") end if response.write url response.Redirect "/user/login.asp?url='"&url&"'" end if%> <%=webname%>  ----  获取礼券
<%=request.cookies("timesshop")("username")%>的礼券

获得礼券:
恭喜您!
您获得 9折 订单折扣券一张!
您可以在下订单的时候选择该礼券。
使用此张礼券后,您只需付原订单 90% 的金额。(运费不参于打扣)
 
 
<% sub Getcoupon() set rs=server.CreateObject("adodb.recordset") rs.open "select * from coupon where owner='"&request.cookies("timesshop")("username")&"' order by id desc",conn,1,3 rs.addnew rs("code")="06120601" rs("owner")=request.cookies("timesshop")("username") rs("kind")=2 rs("content")=9 rs("gettime")=now() rs("getfrom")="cars51" rs("state")=0 rs("deadline")="" rs.update end sub %>