% If request.cookies("timesshop")("username")="" Then Response.Write "" end if%> <% if request("action")="getcoupon" then set rs=server.CreateObject("adodb.recordset") rs.open "select * from coupon where owner='"&request.cookies("timesshop")("username")&"' and code='06120503' order by id desc",conn,1,3 if rs.recordcount<6 then rs.addnew rs("code")="06120503" rs("owner")=request.cookies("timesshop")("username") rs("kind")=3 rs("content")=4547 rs("gettime")=now() rs("getfrom")="cars51" rs("state")=0 'rs("deadline")="" rs.update response.write " " 'response.Redirect "coupon.asp" else response.write " " end if rs.close set rs=nothing end if %>
|