<% set rs=server.createobject("adodb.recordset") rs.open ("select * from Mb"),conn,1,1 top=rs("top") rs.close %> <%=top%> <% if request.QueryString("utype")="uzj" then %>
  会员排行

[华北地区]  北京市  天津市  河北省  山西省  内蒙古自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=1 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[东北地区]  辽宁省  吉林省  黑龙江省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=2 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[华东地区]  上海市  江苏省  浙江省  安徽省  福建省  江西省  山东省  台湾省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=3 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[中南地区]  河南省  湖北省  湖南省  广东省  广西自治区  海南省  香港市  澳门市 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=4 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西南地区]  重庆市  四川省  贵州省  云南省  西藏自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=5 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西北地区]  陕西省  甘肃省  青海省  宁夏自治区  新疆自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=6 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

<% end if %> <% if request.QueryString("utype")="login" then %>
  活跃会员

[华北地区]  北京市  天津市  河北省  山西省  内蒙古自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=1 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[东北地区]  辽宁省  吉林省  黑龙江省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=2 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[华东地区]  上海市  江苏省  浙江省  安徽省  福建省  江西省  山东省  台湾省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=3 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[中南地区]  河南省  湖北省  湖南省  广东省  广西自治区  海南省  香港市  澳门市 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=4 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西南地区]  重庆市  四川省  贵州省  云南省  西藏自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=5 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西北地区]  陕西省  甘肃省  青海省  宁夏自治区  新疆自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=6 order by lasthits desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

<% end if %> <% if request.QueryString("utype")="newuser" then %>
  新增会员

[华北地区]  北京市  天津市  河北省  山西省  内蒙古自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=1 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[东北地区]  辽宁省  吉林省  黑龙江省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=2 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[华东地区]  上海市  江苏省  浙江省  安徽省  福建省  江西省  山东省  台湾省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=3 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[中南地区]  河南省  湖北省  湖南省  广东省  广西自治区  海南省  香港市  澳门市 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=4 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西南地区]  重庆市  四川省  贵州省  云南省  西藏自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=5 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西北地区]  陕西省  甘肃省  青海省  宁夏自治区  新疆自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where provinceid=6 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

<% end if %> <% if request.QueryString("utype")="" then %>
<% function gettipnum14() dim tmprs14 tmprs14=conn.execute("Select Count(userid) from user where groupid=1") gettipnum14=tmprs14(0) set tmprs14=nothing if isnull(gettipnum14) then gettipnum14=0 end function %>
  认证会员 数量 <%=gettipnum14()%> 名

[华北地区]  北京市  天津市  河北省  山西省  内蒙古自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=1 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[东北地区]  辽宁省  吉林省  黑龙江省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=2 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[华东地区]  上海市  江苏省  浙江省  安徽省  福建省  江西省  山东省  台湾省 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=3 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[中南地区]  河南省  湖北省  湖南省  广东省  广西自治区  海南省  香港市  澳门市 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=4 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西南地区]  重庆市  四川省  贵州省  云南省  西藏自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=5 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

[西北地区]  陕西省  甘肃省  青海省  宁夏自治区  新疆自治区 
<% set rs=server.createobject("adodb.recordset") i=0 sql="SELECT * FROM user where groupid=1 and provinceid=6 order by id desc" rs.open sql,conn,1,1 if rs.eof then response.write"

没有会员

" else do while not rs.eof %> <% i=i+1 if i>=49 then exit do if i mod 7=0 and i>=7 then %> <% end if rs.movenext loop end if rs.close %>
<% select case rs("Sex") case "女" response.write"" case "男" response.write"" end select %> .html" target="_blank"><%=rs("userid")%>

<% end if %>