xinxi.asp

21世纪人才www.51zy.net 网站源码

<%if request.cookies("godbook")("shjianame")<>"" then%>尊敬的商家您好,欢迎管理您的网上商城！<%elseif request.cookies("godbook")("username")="" and request.cookies("godbook")("shjianame")="" then%> 
亲爱的顾客您好,购买商品请先 [<a href="login.asp">登录</a>] [<a href="reg.asp">注册</a>] 
<%else
set rs=server.createobject("adodb.recordset")
rs.open "select jifen,yucun,reglx,vipdate from [user] where username='"&request.cookies("godbook")("username")&"'",conn,1,3
if rs("vipdate")<>"" then 
'看是不是过期VIP
if rs("vipdate")<date and rs("reglx")=2 then
rs("reglx")=1
rs.update
end if
end if
Response.Cookies("godbook")("yucun")=rs("yucun")
Response.Cookies("godbook")("jifen")=rs("jifen")
Response.Cookies("godbook")("reglx=")=rs("reglx")
rs.close
set rs=nothing
if Request.Cookies("godbook")("reglx")=2 then
response.write ""&Request.Cookies("godbook")("username")&" 贵宾您好,您目前有"&Request.Cookies("godbook")("jifen")&"积分,预存款"&Request.Cookies("godbook")("yucun")&"元 "
else
response.write ""&Request.Cookies("godbook")("username")&" 您好,您目前有"&Request.Cookies("godbook")("jifen")&"积分,预存款"&Request.Cookies("godbook")("yucun")&"元 "
end if
end if
%>