<% 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%>  ----  会员中心 - 积分操作
会员中心
<% set rs=server.CreateObject("adodb.recordset") rs.open "select score,deposit from [user] where username='"&request.cookies("timesshop")("username")&"' ",conn,1,1 strscore = rs("score") strdeposit = rs("deposit") rs.close rs.open "select webimg14 from config",conn,1,1 strvipscore = rs("webimg14") rs.close %>

 您目前的积分为: <% = strscore %> 分。

 你目前的预存款有: <% = strdeposit %> 元。把
 升级成VIP用户需要的积分:<% = strvipscore %> 分。 
<% set rs = nothing %>