% if uid="vvkkll" then response.redirect "login.htm" end if set rs=server.createobject("ADODB.recordset") sql="select top 1 uid,shengd,shid,company,UserLock,vip,rank,pid,did,cid,sid,experience from xfxtsf with (nolock) where uid='"&uid&"'order by userid desc" rs.open sql,conn,1,1 session("uid")=rs("uid").value session("shengd")=rs("shengd").value session("zone")=rs("shid").value session("company")=rs("company").value session("ishacker")="0" session("vip")=rs("vip").value session("rank")=rs("rank").value session("pid")=rs("pid").value session("did")=rs("did").value session("cid")=rs("cid").value session("sid")=rs("sid").value session("experience")=rs("experience").value rs.close() Set rs=Nothing %>
| 常用操作: | 刷新--提升信息排名 | |
| 所在城市: | <%If session("zone")=session("shengd") Then response.write session("zone") Else response.write session("shengd")&" "&session("zone") end if%> | 修改我的资料 |
| 帐号类型: | <% select Case chknum(session("rank")) Case 1000000 response.write "■总公司(集团帐号)" Case 999999 response.write "■总公司(副)(集团帐号)" Case 100000 response.write "★省级大区(集团帐号)" Case 99999 response.write "★省级大区(试用期)(集团帐号)" Case 10000 response.write "◆市级分公司(集团帐号)" Case 9999 response.write "◆市级分公司(试用期)(集团帐号)" Case 1000 response.write "▲门店(集团帐号)" Case 999 response.write "▲门店(试用期)(集团帐号)" Case 100 response.write "员工(集团帐号)" Case 99 response.write "员工(试用期)(集团帐号)" Case 7 response.write "全球通-集团帐号(审核中)" Case 6 response.write "全国通-集团帐号(审核中)" Case 5 response.write "全省通-集团帐号(审核中)" Case 4 response.write "本地通-集团帐号(审核中)" Case 3 response.write "店面通-集团帐号(审核中)" Case 1 response.write "普通用户" Case -1000000 response.write "■总公司(暂停)(集团帐号)" Case -999999 response.write "■总公司(副)(暂停)(集团帐号)" Case -100000 response.write "★省级大区(暂停)(集团帐号)" Case -99999 response.write "★省级大区(试用期)(暂停)(集团帐号)" Case -10000 response.write "◆市级分公司(暂停)(集团帐号)" Case -9999 response.write "◆市级分公司(试用期)(暂停)(集团帐号)" Case -1000 response.write "▲门店(暂停)(集团帐号)" Case -999 response.write "▲门店(试用期)(暂停)(集团帐号)" Case -100 response.write "员工(暂停)(集团帐号)" Case -99 response.write "员工(试用期)(暂停)(集团帐号)" Case Else response.write "员工(集团帐号)" end select%> | <%If chknum(session("rank"))>=99 And chknum(session("rank"))<999 Then ElseIf chknum(session("rank"))>=99 Then response.write "管理我的下属" Else response.write "升级集团帐号服务" end if%> |
| 用户积分: | <%= session("experience") %> | 用户类型:<%select Case CLng(session("vip")) Case 51 usergroup="售楼员" Case 71 usergroup="经纪人" Case 100 usergroup="收费高级中介会员" Case 90 usergroup="免费高级中介会员" Case 80 usergroup="收费中介会员" Case 60 usergroup="收费房产公司会员" Case 50 usergroup="免费房产公司会员" Case 40 usergroup="收费个人会员" Case 30 usergroup="免费个人会员" Case Else usergroup="免费中介会员" end select response.write usergroup %> |
| 上次登录日期: | <%= session("lasttime") %> | 上次登录IP: <%= session("userlastip") %> |
请勿发布重复信息需要提升排名请使用刷新功能处罚 :封电话,帐号,公司名称,并删除所有信息,积分清零。2010-7-10 违规名单 | ||