<!-- #include file="setup.asp" -->

<%
top
if Request.Cookies("username")=empty then error("<li>您还未<a href=login.asp>登录</a>社区")
%>

<table border=0 width=<%=dkuan%> align=center cellspacing=1 cellpadding=4 class=a2>
<tr class=a3>
<td height=25>&nbsp;<img src=images/Forum_nav.gif>&nbsp; <%ClubTree%> → 
<a href="banzhu.asp">管理员评定</a> → 社区区长评定 → <a href="ban.asp">版主评定</a></td>
</tr>
</table><br>

<SCRIPT>valigntop()</SCRIPT>

<TABLE cellSpacing=1 cellPadding=1 width=<%=dkuan%> align=center border=0 class=a2>

<TR align=middle class=a1>
<TD height=23 colspan="4"><img src=images/membercode/6.gif>社区区长</TD>

<%

sql="select * from [user] where membercode >5 and membercode <7 order by posttopic Desc"
rs.Open sql,Conn,1

pagesetup=10 '设定每页的显示数量
rs.pagesize=pagesetup
TotalPage=rs.pagecount  '总页数
PageCount = cint(Request.QueryString("ToPage"))
if PageCount <1 then PageCount = 1
if PageCount > TotalPage then PageCount = TotalPage
if TotalPage>0 then rs.absolutepage=PageCount '跳转到指定页数
i=0
Do While Not RS.EOF and i<pagesetup
i=i+1


if datediff("d",rs("landtime"),date())<=3 then
myvar="<img src=images/membercode/6.gif align=absmiddle alt=非常勤奋！奖励其一个奖章!> 工作十分负责"
elseif datediff("d",rs("landtime"),date())<=7 then
myvar="好象已有点松散，但 <font color=red>7</font> 天内还有登陆"
elseif datediff("d",rs("landtime"),date())>=7 then
myvar="注意，您已经 <font color=red>7</font> 天以上没有登陆了"
elseif datediff("d",rs("landtime"),date())>=15 then
myvar=" <img src=images/jidan.gif align=absmiddle alt=工作失职！丢个臭鸡蛋！> 超过 <font color=red>15</font> 天没有登陆，警告！"
elseif datediff("d",rs("landtime"),date())>=20 then
myvar="<img src=images/jidan.gif align=absmiddle alt=工作严重失职！丢个臭鸡蛋！> 超过 <font color=red>20</font> 日未登陆，严重失职！将考虑取消资格！</font>"
elseif datediff("d",rs("landtime"),date())>=30 then
myvar="<img src=iimages/jidan.gif align=absmiddle alt=工作严重失职！丢个臭鸡蛋！> 超过 <font color=red>30</font> 日未登陆，情节严重！将被取消资格！</font>"

end if
if rs("posttopic") <=50 then
comeon=" <font color=red>好象发的原贴还少了点，请多多努力！</font>"
elseif rs("membercode")=6 and rs("posttopic") >=50 then
comeon=" <font color=red>管理员好努力哦！贴子发得也好多！</font>"
elseif rs("membercode")=5 and rs("posttopic") >=50 then
comeon=" <font color=red>论坛区长好努力哦！贴子发得也好多！</font>"
elseif rs("membercode")=4 and rs("posttopic") >=50 then
comeon=" <font color=red>超级版主好努力哦！贴子发得也好多！</font>"
elseif rs("membercode")=3 and rs("posttopic") >=50 then
comeon=" <font color=red>论坛版主好努力哦！贴子发得也好多！</font>"
elseif rs("membercode")=2 and rs("posttopic") >=50 then
comeon=" <font color=red>VIP会员好努力哦！贴子发得也好多！</font>"
elseif rs("membercode")=1 and rs("posttopic") >=50 then
comeon=" <font color=red>论坛会员好努力哦！贴子发得也好多！</font>"

end if

if rs("membercode")=6 then
zhiwu=" <img src=images/membercode/6.gif> <font color=red>管理员</font>"
elseif rs("membercode")=5 then
zhiwu=" <img src=images/membercode/6.gif> <font color=red>社区区长</font>"
elseif rs("membercode")=4 then
zhiwu=" <img src=images/membercode/4.gif> <font color=red>超级版主</font>"
elseif rs("membercode")=3 then
zhiwu=" <img src=images/membercode/3.gif> <font color=red>论坛版主</font>"
elseif rs("membercode")=2 then
zhiwu=" <img src=images/membercode/2.gif> <font color=red>VIP版主</font>"
elseif rs("membercode")=1 then
zhiwu=" <img src=images/membercode/1.gif> <font color=red>论坛会员</font>"

end if
upsent=datediff("d",rs("landtime"),date())
if upsent=0 then
upsent="全勤"
end if

%>
<TR align=middle class=a4>
<TD height=50 align=center width="2%" valign="middle">
<p style="margin-top: 0; margin-bottom: 0"><img src=images/membercode/6.gif></a></p>
<p style="margin-top: 0; margin-bottom: 0">
　</p>
<br></td>


<TD height=50 align=center width="19%">
<p style="margin-top: 0; margin-bottom: 0"><a href=Profile.asp?username=<%=rs("username")%>><%=rs("username")%></a></p>
<p style="margin-top: 0; margin-bottom: 0">
<img src=<%=rs("userface")%> width="90" height="90"></td>


<TD height=50 align=center valign="top" width="68%">
<p align="left" style="margin-top: 0; margin-bottom: 0">最后登陆：<font color="red"><%=rs("landtime")%></font><p align="left" style="margin-top: 0; margin-bottom: 0">
等级名称：<Script>document.write(level(<%=rs("membercode")%>,<%=rs("membercode")%>,'','')+levelname);</Script><p align="left" style="margin-top: 0; margin-bottom: 0">
发贴数量：<%=rs("posttopic")%>贴<p align="left" style="margin-top: 0; margin-bottom: 0">
回贴数量：<%=rs("postrevert")%>贴<p align="left" style="margin-top: 0; margin-bottom: 0">
出&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 勤：缺勤<%=upsent%>天了<p align="left" style="margin-top: 0; margin-bottom: 0">
评&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 价：<%=comeon%><p style="margin-top: 0; margin-bottom: 0">
<font face="Wingdings" color="blue">v</font><%=myvar%><font face="Wingdings" color="blue">v</font><p style="margin-top: 0; margin-bottom: 0" align="left">
　</td>
<TD height=50 align=center valign="middle" width="10%"><script>
if("<%=rs("userphoto")%>"!=""){
document.write("<img src=images/Emotions/4.gif><a target=_blank href=<%=rs("userphoto")%>>有相片</a>")
}else{
document.write("<img src=images/Emotions/54.gif>没有相片");
}</script></td>
<%
RS.MoveNext
loop
RS.Close

%>





</table><center>
<SCRIPT>valignbottom()</SCRIPT>
[
<script>
PageCount=<%=TotalPage%> //总页数
topage=<%=PageCount%>   //当前停留页
for (var i=1; i <= PageCount; i++) {
if (i <= topage+3 && i >= topage-3 || i==1 || i==PageCount){
if (i > topage+4 || i < topage-2 && i!=1 && i!=2 ){document.write(" ... ");}
if (topage==i){document.write(" "+ i +" ");}
else{
document.write("<a href=?topage="+i+">"+ i +"</a> ");
}
}
}
</script>

]<br><%
htmlend
%>