<%
sub mingxing()
	response.write("<tr>")
	dim sql,rs,F_or_M,username,article,mingxing_1_type,mingxing_2_type,mingxing_3_type,wp,hp,face,Temp
%>
<%
	dim fsObj,txtObj,mingxing_1,mingxing_2,mingxing_3,max_welth,max_cp,max_ep,n_welth,n_welth2,n_cp,n_cp2,n_ep,n_ep2,min_disp,max_disp,isxingxiang1,isxingxiang2,isxingxiang3,isnengliang1,isnengliang2,isnengliang3
	Set fsObj=Server.CreateObject("Scripting.FileSystemObject")
	set txtObj = fsObj.OpenTextFile(Server.MapPath("dv_plus/mingxing/")&"\mingxing.inc",1)
	txtObj.skipline()
	txtObj.skipline()
	txtObj.skip(11)
	mingxing_1=txtObj.read(1)
	txtObj.skipline()
	txtObj.skip(11)
	mingxing_2=txtObj.read(1)
	txtObj.skipline()
	txtObj.skip(11)
	mingxing_3=txtObj.read(1)
'读取金钱满额数
	txtObj.skipline()
	max_welth=txtObj.ReadLine
'读取魅力满额数
	max_cp=txtObj.ReadLine
'读取经验满额数
	max_ep=txtObj.ReadLine
'读取金钱换算倍率
	n_welth=txtObj.ReadLine
'读取魅力换算倍率
	n_cp=txtObj.ReadLine
'读取经验换算倍率
	n_ep=txtObj.ReadLine
'读取超出满额金钱换算倍率
	n_welth2=txtObj.ReadLine
'读取超出满额魅力换算倍率
	n_cp2=txtObj.ReadLine
'读取超出满额经验换算倍率
	n_ep2=txtObj.ReadLine
'读取最小显示数
	min_disp=txtObj.ReadLine
'读取能量柱背景框显示数
	max_disp=txtObj.ReadLine
'读取第一列是否虚拟形象显示开关
	isxingxiang1=txtObj.ReadLine
'读取第二列是否虚拟形象显示开关
	isxingxiang2=txtObj.ReadLine
'读取第三列是否虚拟形象显示开关
	isxingxiang3=txtObj.ReadLine
'读取第一列是否能量柱显示开关
	isnengliang1=txtObj.ReadLine
'读取第二列是否能量柱显示开关
	isnengliang2=txtObj.ReadLine
'读取第三列是否能量柱显示开关
	isnengliang3=txtObj.ReadLine
	set txtObj=nothing
	set fsObj=nothing

%>
<%

'显示第一列的头像
select case mingxing_1
  case 1
  	mingxing_1_type="今日"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
  case 2
  	mingxing_1_type="本周"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date()-weekday(date(),2) group by username order by count(username) desc"
  case 3
  	mingxing_1_type="本月"
  	sql="select top 1 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(date()) and Month(DateAndTime)=month(Date()) group by username order by count(username) desc"
  case 4
  	mingxing_1_type="今年"
  	sql="select top 1 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(Date()) group by username order by count(username) desc"
  case 5
  	mingxing_1_type="真正"
  	sql="select top 1 username,userpost from [Dv_user] order by userpost desc"
  case 6
  	mingxing_1_type="帅哥"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=1 order by userpost desc"
  case 7
  	mingxing_1_type="靓妹"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=0 order by userpost desc"
  case else
  	mingxing_1_type="今日"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
end select
	set rs=Dvbbs.execute(sql)
if rs.eof then
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2><IMG  src='skins/default/FeMale.gif' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	response.write("<font color=#ff0000>"&mingxing_1_type&"</font>灌水<font color=#DA9136>状元</font>")
	response.write("<p align=left>姓名<font color=#ff0000>等你来改写</font> <br>")
	response.write "等级<img src='dv_plus/mingxing/leve0.gif' border=0>"
	response.write "<br><font color=red>"&mingxing_1_type&"</font>发 <font color=#ff0000>零</font> 贴"

'锋芒不露加入能量柱开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
		if isnengliang1=0 then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red>等你来改写<font></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
'锋芒不露加入能量柱开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

	response.write("Email<font color=#ff0000>空</font>")
	response.write("</td><td width=33% valign=middle align=center><table width='100%' height='100%'><tr><td></strong> <font color=#9999ff>照片-=></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><img src='dv_plus/mingxing/nomx.gif' border=0></td></tr></table></td></table></TD>")
  else
  	username=rs(0)
  	article=rs(1)
	sql="select userclass,userWealth,useremail,userface,userwidth,userheight,usersex,userEP,userCP from [Dv_user] where username='"&username&"'"
	set rs=Dvbbs.execute(sql)
	if rs(6)="1" then
		F_or_M="../../skins/default/Male.gif"
	else
		F_or_M="../../skins/default/FeMale.gif"
	end if
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2> <IMG  src='dv_plus/mingxing/"&F_or_M&"' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	response.write("<font color=#ff0000>"&mingxing_1_type&"</font>灌水<font color=#DA9136>状元</font>")
	response.write("<p align=left>姓名 <a href='dispuser.asp?name="&username&"' target='_blank'><font color=blue>"&username&"</font></a><br>")
	response.write "等级" & rs(0) & "<br>"
	response.write "<font color=red>"&mingxing_1_type&"</font>发<font color=red> " & Article & "</font> 贴"

'锋芒不露加入能量柱开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
	if isnengliang1=1 then
		if rs(1)>max_welth then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth2)+min_disp & " height=9 alt="&rs(1)&"元现金><IMG height=8 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth)+min_disp & " height=8 alt="&rs(1)&"元现金><IMG height=8 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(8)>max_cp then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp2)+min_disp & " height=9 alt="&rs(8)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp)+min_disp & " height=9 alt="&rs(8)&"><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(7)>max_ep then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep2)+min_disp & " height=9 alt="&rs(7)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep)+min_disp & " height=9 alt="&rs(7)&"><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
	else
		response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red><b>"&rs(1)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red><b>"&rs(8)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red><b>"&rs(7)&"</b></font></td></tr></table>"
	end if
'锋芒不露加入能量柱开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

	response.write("Email")
	if trim(rs(2))<>"" then
    		response.write("<a href='mailto:"&rs(2)&"'><font color=olive>飞鸽传书</font></a>")
  	end if

'锋芒不露加入虚拟形象开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
        Temp=Split(rs(3),"|")
        If Ubound(Temp)>0 Then
        face=Temp(1)
        Else
        face=Temp(0)
        End If
	wp=rs(4)
	hp=rs(5)
	if wp>80 then
		wp=80
		hp=(rs(5)/rs(4))*80
	end if
	if hp>120 then
		hp=80
		wp=(rs(4)/rs(5))*120
	end if
		response.write("</td><td width=33% valign=middle align=center><table height='140'><tr><td></strong><font color=#9999ff>照片-=></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><a href=javascript:openScript('dispuser.asp?name="&username&"',700,500)><img border=0 src='"&face&"' width='"&wp&"' height='"&hp&"' alt='看什么看，偶是"&dvbbs.Forum_info(0)&mingxing_1_type&"明星！有本事将俺赶走啊！我等着你哦！呵呵！'></a></td></tr></table></td></tr></table></TD>")
'锋芒不露加入虚拟形象开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

  end if
	
'显示第二列的头像
select case mingxing_2
  case 1
  	mingxing_2_type="今日"
	sql="select top 2 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
  case 2
  	mingxing_2_type="本周"
	sql="select top 2 username,count(username) from Dv_bbs1 where DateAndTime>Date()-weekday(date(),3) group by username order by count(username) desc"
  case 3
  	mingxing_2_type="本月"
  	sql="select top 2 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(date()) and Month(DateAndTime)=month(Date()) group by username order by count(username) desc"
  case 4
  	mingxing_2_type="今年"
  	sql="select top 2 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(Date()) group by username order by count(username) desc"
  case 5
  	mingxing_2_type="真正"
  	sql="select top 2 username,userpost from [Dv_user] order by userpost desc"
  case 6
  	mingxing_2_type="帅哥"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=1 order by userpost desc"
  case 7
  	mingxing_2_type="靓妹"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=0 order by userpost desc"
  case else
  	mingxing_2_type="今日"
	sql="select top 2 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
end select
	set rs=Dvbbs.execute(sql)
	
if (not rs.eof) and mingxing_1=mingxing_2 then
	rs.movenext
end if	
if rs.eof then
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2> <IMG src='skins/default/FeMale.gif' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	if mingxing_1=mingxing_2 then
		response.write("<font color=#ff0000>"&mingxing_2_type&"</font>灌水<font color=#DA9136>榜眼</font>")
	else
		response.write("<font color=#ff0000>"&mingxing_2_type&"</font>灌水<font color=#DA9136>状元</font>")
	end if
	response.write("<p align=left>姓名<font color=#ff0000>等你来改写</font> <br>")
	response.write "等级<img src='dv_plus/mingxing/leve0.gif' border=0>"
	response.write "<br><font color=red>"&mingxing_1_type&"</font>发 <font color=#ff0000>零</font> 贴"

'锋芒不露加入能量柱样式开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
		if isnengliang2=0 then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red>等你来改写<font></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
'锋芒不露加入能量柱样式开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝


	response.write("Email<font color=#ff0000>空</font>")
	response.write("</td><td width=33% valign=middle align=center><table width='100%' height='100%'><tr><td></strong><font color=#9999ff>照片-=></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><img src='dv_plus/mingxing/nomx.gif' border=0></td></tr></table></td></table></TD>")
  else
  	username=rs(0)
  	article=rs(1)
	
	sql="select userclass,userWealth,useremail,userface,userwidth,userheight,usersex,userEP,userCP from [Dv_user] where username='"&username&"'"
	
	set rs=Dvbbs.execute(sql)
	if rs(6)="1" then
		F_or_M="../../skins/default/Male.gif"
	else
		F_or_M="../../skins/default/FeMale.gif"
	end if
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2> <IMG  src='dv_plus/mingxing/"&F_or_M&"' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	if mingxing_1=mingxing_2 then
		response.write("<font color=#ff0000>"&mingxing_2_type&"</font>灌水<font color=#DA9136>榜眼</font>")
	else
		response.write("<font color=#ff0000>"&mingxing_2_type&"</font>灌水<font color=#DA9136>状元</font>")
	end if
	response.write("<p align=left>姓名 <a href='dispuser.asp?name="&username&"' target='_blank'><font color=blue>"&username&"</font></a><br>")
	response.write "等级" & rs(0) & "<br>"
	response.write "<font color=red>"&mingxing_2_type & "</font>发<font color=red> " & Article & "</font> 贴"

'锋芒不露加入能量柱开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
	if isnengliang2=1 then
		if rs(1)>max_welth then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td align=left width=80 background=dv_plus/mingxing/img_backing.gif height=13><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth2)+min_disp & " height=9 alt="&rs(1)&"元现金></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth)+min_disp & " height=8 alt="&rs(1)&"元现金><IMG height=9 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(8)>max_cp then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp2)+min_disp & " height=9 alt="&rs(8)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp)+min_disp & " height=9 alt="&rs(8)&"><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(7)>max_ep then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep2)+min_disp & " height=9 alt="&rs(7)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep)+min_disp & " height=9 alt="&rs(7)&"><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
	else
		response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red><b>"&rs(1)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red><b>"&rs(8)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red><b>"&rs(7)&"</b></font></td></tr></table>"
	end if
'锋芒不露加入能量柱开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
		
	response.write("Email")
	if trim(rs(2))<>"" then
    		response.write("<a href='mailto:"&rs(2)&"'><font color=olive>飞鸽传书</font></a>")
  	end if
  	
'锋芒不露加入虚拟形象开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
        Temp=Split(rs(3),"|")
        If Ubound(Temp)>0 Then
        face=Temp(1)
        Else
        face=Temp(0)
        End If
	wp=rs(4)
	hp=rs(5)
	if wp>80 then
		wp=80
		hp=(rs(5)/rs(4))*80
	end if
	if hp>120 then
		hp=80
		wp=(rs(4)/rs(5))*120
	end if
	if isxingxiang2=0 then
		response.write("</td><td width=33% valign=middle align=center><table height=140><tr><td></strong><font color=#9999ff>照片-=></font></td></tr><tr><td height='100%' valign=middle align=center><a href=javascript:openScript('dispuser.asp?name="&username&"',700,500)><img border=0 src='"&face&"' width='"&wp&"' height='"&hp&"'alt='看什么看，偶是"&dvbbs.Forum_info(0)&mingxing_1_type&"明星！有本事将俺赶走啊！我等着你哦！呵呵！'></a></td></tr></table></td></tr></table></TD>")
	else
		response.Write("</td><td width=33% valign=middle align=center><table><tr><td align='center'></strong><font color=#9999ff><a href='plus_home_show.asp?name="&username&"' target='_blank'><font color=blue>"&username&"的家</font></a></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><div alt='ddddd'><IFrame src=""plus_visual_show2.asp?username="&username&"&boardid=0&type=small&bgcolor=tablebody1"" width=""80"" height=""120"" marginwidth=""0"" marginheight=""0"" hspace=""0"" vspace=""0"" frameborder=""0"" scrolling=""NO"" allowtransparency=""true""></iframe></div></td></tr></table></td></tr></table></TD>")
	end if
'锋芒不露加入虚拟形象开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

end if

'显示第三列的头像
select case mingxing_3
  case 1
  	mingxing_3_type="今日"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
  case 2
  	mingxing_3_type="本周"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date()-weekday(date(),2) group by username order by count(username) desc"
  case 3
  	mingxing_3_type="本月"
  	sql="select top 1 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(date()) and Month(DateAndTime)=month(Date()) group by username order by count(username) desc"
  case 4
  	mingxing_3_type="今年"
  	sql="select top 1 username,count(username) from Dv_bbs1 where year(DateAndTime)=year(Date()) group by username order by count(username) desc"
  case 5
  	mingxing_3_type="真正"
  	sql="select top 1 username,userpost from [Dv_user] order by userpost desc"
  case 6
  	mingxing_3_type="帅哥"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=1 order by userpost desc"
  case 7
  	mingxing_3_type="靓妹"
  	sql="select top 1 username,userpost from [Dv_user] where usersex=0 order by userpost desc"
  case else
  	mingxing_3_type="今日"
	sql="select top 1 username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
end select
	set rs=Dvbbs.execute(sql)
if rs.eof then
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2> <IMG  src='skins/default/FeMale.gif' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	response.write("<font color=#ff0000>"&mingxing_1_type&"</font>灌水<font color=#DA9136>状元</font>")
	response.write("<p align=left>姓名<font color=#ff0000>等你来改写</font><br>")	
	response.write "等级<img src='dv_plus/mingxing/leve0.gif' border=0>"
	response.write "<br><font color=red>"&mingxing_1_type&"</font>发 <font color=#ff0000>零</font> 贴"

'锋芒不露加入能量柱开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
		if isnengliang3=0 then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red>等你来改写<font></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red>等你来改写<font></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=20 height=9><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
'锋芒不露加入能量柱开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
		
	response.write("Email<font color=#ff0000>空</font>")
	response.write("</td><td width=33% valign=middle align=center><table width='100%' height='100%'><tr><td></strong><font color=#9999ff>照片-=></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><img src='dv_plus/mingxing/nomx.gif' border=0></td></tr></table></td></table></TD>")
  else
  	username=rs(0)
  	article=rs(1)
	sql="select userclass,userWealth,useremail,userface,userwidth,userheight,usersex,userEP,userCP from [Dv_user] where username='"&username&"'"
	set rs=Dvbbs.execute(sql)
	if rs(6)="1" then
		F_or_M="../../skins/default/Male.gif"
	else
		F_or_M="../../skins/default/FeMale.gif"
	end if
	response.write("<TD vAlign=middle align=middle width='3%' class=tablebody2><IMG  src='dv_plus/mingxing/"&F_or_M&"' align=absMiddle>")
	response.write("</TD>")
	response.write("<TD vAlign=top align=middle width='30%' class=tablebody1>")
	response.write("<table border=0 width='100%'>")
	response.write("<tr>")
	response.write("<td width=44% valign=top> <strong>")
	response.write("<font color=#ff0000>"&mingxing_3_type&"</font>灌水<font color=#DA9136>状元</font>")
	response.write("<p align=left>姓名 <a href='dispuser.asp?name="&username&"' target='_blank'><font color=blue>"&username&"</font></a><br>")
	response.write "等级" & rs(0) & "<br>"
	response.write "<font color=red>"&mingxing_3_type&"</font>发<font color=red> " & Article & "</font> 贴"

'锋芒不露加入能量柱开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
	if isnengliang3=1 then
		if rs(1)>max_welth then
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td align=left width=80 background=dv_plus/mingxing/img_backing.gif height=13><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth2)+min_disp & " height=9 alt="&rs(1)&"元现金></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else
			response.write "<br><table cellspacing=0 cellpadding=0 border=0><tr><td width=30>现金</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar4.gif width=" & (rs(1)*n_welth)+min_disp & " height=8 alt="&rs(1)&"元现金><IMG height=9 src=dv_plus/mingxing/bar4_1.gif border=0></td><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(8)>max_cp then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp2)+min_disp & " height=9 alt="&rs(8)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>魅力</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar5.gif width=" & (rs(8)*n_cp)+min_disp & " height=9 alt="&rs(8)&"><IMG height=9 src=dv_plus/mingxing/bar5_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
		if rs(7)>max_ep then
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep2)+min_disp & " height=9 alt="&rs(7)&"></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		else		
			response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=30>经验</td><td><table cellspacing=0 cellpadding=0 width="&max_disp&" border=0><tbody><tr><td width=3 height=13><img height=13 src=dv_plus/mingxing/img_left.gif width=3></td><td background=dv_plus/mingxing/img_backing.gif><img src=dv_plus/mingxing/bar3.gif width=" & (rs(7)*n_ep)+min_disp & " height=9 alt="&rs(7)&"><IMG height=9 src=dv_plus/mingxing/bar3_1.gif border=0></td><td width=3 height=13 ><img height=13 src=dv_plus/mingxing/img_right.gif width=3></td></tr></tbody></table></td></tr></table>"
		end if
	else
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>现金：</td><td><font color=red><b>"&rs(1)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>魅力：</td><td><font color=red><b>"&rs(8)&"</b></font></td></tr></table>"
		response.write "<table cellspacing=0 cellpadding=0 border=0><tr><td width=40>经验：</td><td><font color=red><b>"&rs(7)&"</b></font></td></tr></table>"
	end if
'锋芒不露加入能量柱开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝


	response.write("Email")
	if trim(rs(2))<>"" then
    		response.write("<a href='mailto:"&rs(2)&"'><font color=olive>飞鸽传书</font></a>")
  	end if

'锋芒不露加入虚拟形象开关开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
        Temp=Split(rs(3),"|")
        If Ubound(Temp)>0 Then
        face=Temp(1)
        Else
        face=Temp(0)
        End If
	wp=rs(4)
	hp=rs(5)
	if wp>80 then
		wp=80
		hp=(rs(5)/rs(4))*80
	end if
	if hp>120 then
		hp=80
		wp=(rs(4)/rs(5))*120
	end if
	if isxingxiang3=0 then
		response.write("</td><td width=33% valign=middle align=center><table height='140'><tr><td></strong><font color=#9999ff>照片-=></font></td></tr><tr><td height='100%' valign=middle align=center><a href=javascript:openScript('dispuser.asp?name="&username&"',700,500)><img border=0 src='"&face&"' width='"&wp&"' height='"&hp&"'alt='看什么看，偶是"&dvbbs.Forum_info(0)&mingxing_1_type&"明星！有本事将俺赶走啊！我等着你哦！呵呵！'></a></td></tr></table></td></tr></table></TD>")
	else
		response.Write("</td><td width=33% valign=middle align=center><table><tr><td align='center'></strong><font color=#9999ff><a href='plus_home_show.asp?name="&username&"' target='_blank'><font color=blue>"&username&"的家</font></a></font></td></tr><tr><td width=100% height='100%' valign=middle align=center><div alt='ddddd'><IFrame src=""plus_visual_show2.asp?username="&username&"&boardid=0&type=small&bgcolor=tablebody1"" width=""80"" height=""120"" marginwidth=""0"" marginheight=""0"" hspace=""0"" vspace=""0"" frameborder=""0"" scrolling=""NO"" allowtransparency=""true""></iframe></div></td></tr></table></td></tr></table></TD>")
	end if
'锋芒不露加入虚拟形象开关结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

  end if
	response.write("</TR>")
rs.close
set rs=nothing
end sub 

function mingxingtop(topmax)
	dim sql,rs
	sql="select top "&topmax&" username,count(username) from Dv_bbs1 where DateAndTime>Date() group by username order by count(username) desc"
	set rs=Dvbbs.execute(sql)
	if rs.eof then
		mingxingtop="今日暂时无人发贴" 
	else
		mingxingtop=""
		dim c
		c=0
		do while not rs.eof
			mingxingtop=mingxingtop&"<font face=Wingdings color=blue>v</font> <a href=dispuser.asp?name="&rs(0)&" target=_blank title=""查看该用户个人资料及最新发帖一览""><font color=#00BFFF>"&rs(0)&"</font></a>[<font color=red>"&rs(1)&"</font>]&nbsp;&nbsp;"
			rs.movenext
			c=c+1
			if c=topmax then exit do
		loop
	end if
end function
%>