<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../conn/nosql.asp"-->
<!--#include file="../../conn/config.asp"-->
<!--#include file="../../conn/count.asp"-->
<!--#include file="../count.asp"-->

<%
if isChkInteger(request("web_id")) then
web_id=nosql(request("web_id"))
else
Response.Redirect ("../../index.asp")
end if
gz=nosql(request("gz"))
if gz<>""  then
if session("id")="" then
			   response.write "<script language='javascript'>"
                    response.write "alert('对不起，请登录后再访问本页！');"
                    response.write"javascript:history.go(-1)</SCRIPT>"
			        response.End()
end if
Set tempgz= Server.CreateObject("ADODB.Recordset") 
tempgz.open "select * from snsn_hua where userid="&session("id")&" and guozi>0",conn,1,3
if not tempgz.eof then
'清已摘果子
if instr(tempgz("guozixy"),gz)>0 then
tempgz("guozixy")=replace(tempgz("guozixy"),gz,"|")
tempgz("guozi")=tempgz("guozi")-1
'分类加果子数目
tempgzok=split(tempgz("guoziok"),"|")
if len(gz)=5 then
tempgzok((mid(gz,4,1)-1))=int(tempgzok((mid(gz,4,1))-1))+1
tempgz("guoziok")=tempgzok(0)&"|"&tempgzok(1)&"|"&tempgzok(2)&"|"&tempgzok(3)&"|"&tempgzok(4)
else 
tempgzok((mid(gz,5,1)-1))=int(tempgzok((mid(gz,5,1))-1))+1
tempgz("guoziok")=tempgzok(0)&"|"&tempgzok(1)&"|"&tempgzok(2)&"|"&tempgzok(3)&"|"&tempgzok(4)
end if
tempgz.update
response.write "<script language='javascript'>"
response.write "alert('采摘完成!!!');"
response.write"location.href='index.asp?web_id="&web_id&"';</SCRIPT>"
response.end
end if
end if

end if

%>

<style>
A {
	COLOR: #333333;
	font-family: "??";
	font-size: 9pt;
	text-decoration: none;

} 
A:hover {
	COLOR: #000000;
	text-decoration: underline;
}
DIV,FORM,P,TD,BODY{FONT-SIZE:9pt;}
BODY{
	SCROLLBAR-FACE-COLOR : #efefef;
	SCROLLBAR-ARROW-COLOR : #cccccc;
	SCROLLBAR-TRACK-COLOR : #ffffff;
	SCROLLBAR-SHADOW-COLOR : #FDFDFD;
	SCROLLBAR-3DLIGHT-COLOR : #efefef;
	SCROLLBAR-HIGHLIGHT-COLOR : #FDFDFD;
	SCROLLBAR-DARKSHADOW-COLOR : #efefef;
} 
}
TD {FONT-SIZE: 9pt;COLOR: #666666;LINE-HEIGHT: 160%;FONT-FAMILY: "??";font-style: normal;font-weight: normal;font-variant: normal;}
.wenbenkuang {color: #333333;border: 1px solid #999999;font-family: "??";font-size: 9pt;}
.go-wenbenkuang {font-family: "??";font-size: 9pt;color: #333333;background-color: #eeeeee;cursor: hand;padding: 1px;height: 19px;border-top: 1px solid #FFFFFF;border-right: 1px solid #a2a2a2;border-bottom: 1px solid #a2a2a2;border-left: 1px solid #FFFFFF;}
select {background-color:#9BDBF2;}
.style1 {color: #FF0000}
</style>
<body>

<script language="javascript">
<!--
 var sRepeat=null;


//-->
function secCard(n)
        {
          for(i=0;i<secTable.cells.length;i++) 
		  secTable.cells[i].className="cardNormal";
          secTable.cells[n].className="cardSelected";
          for(i=1;i<secTable.cells.length;i=i+2) 
		  secTable.cells[i].className="cardSpace";
          secTable.cells[n+1].className="cardSpaceLeft";
          secTable.cells[3].className="cardSpaceLast";
        }
        function secBoard(n)
        {
          for(i=0;i<mainTable.tBodies.length;i++)
            mainTable.tBodies[i].style.display="none";
            mainTable.tBodies[n].style.display="";
        }
function changeLayer(div){
		if(div == "r"){
			Image1.src = "img/phfw.gif";
			Image2.src = "img/phcf2.gif";
			
		}else if(div == "t"){
			Image1.src = "img/phfw2.gif";
			Image2.src = "img/phcf.gif";
			
		}
		}

</script>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<script language="javascript">

var imgurl=new Array()
	imgurl[0]=""
	imgurl[1]=""
	imgurl[2]=""
	var rad
		function cc(){
			rad=parseInt(Math.random()*3)
			return rad;
		}
	function imove(){
		for(i=1;i<=9;i++){
		ly=eval("document.all.fl"+i)
		ly.style.left=parseInt(ly.style.left)+1
		ly.style.top=parseInt(ly.style.top)+1
		if(parseInt(ly.style.left)>document.body.clientWidth){
				ly.innerHTML="<img src='"+imgurl[cc()]+"'>"
				ly.style.left="0px"
			}
		if(parseInt(ly.style.top)>document.body.clientHeight){
				ly.innerHTML="<img src='"+imgurl[cc()]+"'>"
				ly.style.top="0px"
			}
		}
	}
	function rdimg(){
		for(i=1;i<=9;i++){
			ly=eval("document.all.fl"+i)
			ly.innerHTML="<img src='"+imgurl[cc()]+"'>"
			ly.style.left=parseInt(Math.random()*document.body.clientWidth-50)
			ly.style.top =parseInt(Math.random()*document.body.clientHeight-25)
		}
			a=setInterval("imove()",100)
		}
		rdimg()
		var a
			function clear(){
			for(i=1;i<=9;i++){
				ly=eval("document.all.fl"+i)
				ly.innerHTML=""
				clearInterval(a)   //????setInterval×′ì?
				document.all.f1.flo.value=0
			}
		}
</script>
<%
if isChkInteger(request("web_id")) then
web_id=nosql(request("web_id"))
else
Response.Redirect ("../../index.asp")
end if


sql="select * from snsn_user where uflag=3 and id="&web_id
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write "<script language='javascript'>"
response.write "alert('没有此用户，请确认后或联系管理员再访问本页！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
end if

if int(mid(request.ServerVariables("URL"),6,1))<>rs("url") then
response.redirect"/web/"&rs("url")&"/index.asp?web_id="&web_id
response.end
end if

username=rs("username")
%>

<HTML>
<HEAD>
<TITLE><%=rs("homename")%>---迷你主页</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<link rel="stylesheet" href="css.css" type="text/css">
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.z12 {
	font-size: 12px;
}
-->
</style>

<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>

</HEAD>
<BODY>

<%
'花
Set hua= Server.CreateObject("ADODB.Recordset")
hua.open"select * from snsn_hua where userid="&web_id,conn,1,3
if not hua.eof then
			if hua("huadj")=5 then
			maxhua="800"
			elseif  hua("huadj")=4 then
			maxhua="799"
			elseif hua("huadj")=3 then
			maxhua="600"
			elseif hua("huadj")=2 then
			maxhua="300"
			else 
			maxhua="99"
			end if
%>

<%if not hua.eof then%>
<%
''结果子tempc是结出果子的级别tempb是结出果子的位置rndguozi是结出果子的机率15%-50%/天
if hua("huadj")=5 then
if hua("guozi")<=11 and datediff("d",hua("guozidate"),now)>1 then
rndguozi=14-int((hua("yg")+hua("yl")+hua("yy")+hua("ax"))/100)
Randomize 
if int( rnd*10 )>=rndguozi then
Randomize
guozi=int(rnd*2)
end if
if guozi>0 then
do while true
	Randomize
	tempa=int(rnd*12+1)		
		if instr(hua("guozixy"),"|"&cstr(tempa)&"-1|")=0 and instr(hua("guozixy"),"|"&cstr(tempa)&"-2|")=0 and instr(hua("guozixy"),"|"&cstr(tempa)&"-3|")=0 and instr(hua("guozixy"),"|"&cstr(tempa)&"-4|")=0 and instr(hua("guozixy"),"|"&cstr(tempa)&"-5|")=0 then
		tempb=tempa
exit do
		end if	
loop

Randomize	
tempc=int(rnd*hua("huaclass")+1)
hua("guozixy")=hua("guozixy")&tempb&"-"&tempc&"|"
hua("guozi")=hua("guozi")+guozi
end if
hua("guozidate")=now
hua.update
end if
%>

<%
a1=0
a1=a1+instr(hua("guozixy"),"|1-1|")
a1=a1+instr(hua("guozixy"),"|1-2|")
a1=a1+instr(hua("guozixy"),"|1-3|")
a1=a1+instr(hua("guozixy"),"|1-4|")
a1=a1+instr(hua("guozixy"),"|1-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:664px; top:444px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|1-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|2-1|")
a1=a1+instr(hua("guozixy"),"|2-2|")
a1=a1+instr(hua("guozixy"),"|2-3|")
a1=a1+instr(hua("guozixy"),"|2-4|")
a1=a1+instr(hua("guozixy"),"|2-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:700px; top:423px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|2-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|3-1|")
a1=a1+instr(hua("guozixy"),"|3-2|")
a1=a1+instr(hua("guozixy"),"|3-3|")
a1=a1+instr(hua("guozixy"),"|3-4|")
a1=a1+instr(hua("guozixy"),"|3-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:665px; top:424px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|3-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|4-1|")
a1=a1+instr(hua("guozixy"),"|4-2|")
a1=a1+instr(hua("guozixy"),"|4-3|")
a1=a1+instr(hua("guozixy"),"|4-4|")
a1=a1+instr(hua("guozixy"),"|4-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:695px; top:398px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|4-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|5-1|")
a1=a1+instr(hua("guozixy"),"|5-2|")
a1=a1+instr(hua("guozixy"),"|5-3|")
a1=a1+instr(hua("guozixy"),"|5-4|")
a1=a1+instr(hua("guozixy"),"|5-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:672px; top:408px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|5-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|6-1|")
a1=a1+instr(hua("guozixy"),"|6-2|")
a1=a1+instr(hua("guozixy"),"|6-3|")
a1=a1+instr(hua("guozixy"),"|6-4|")
a1=a1+instr(hua("guozixy"),"|6-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:704px; top:416px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|6-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|7-1|")
a1=a1+instr(hua("guozixy"),"|7-2|")
a1=a1+instr(hua("guozixy"),"|7-3|")
a1=a1+instr(hua("guozixy"),"|7-4|")
a1=a1+instr(hua("guozixy"),"|7-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:685px; top:425px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|7-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|8-1|")
a1=a1+instr(hua("guozixy"),"|8-2|")
a1=a1+instr(hua("guozixy"),"|8-3|")
a1=a1+instr(hua("guozixy"),"|8-4|")
a1=a1+instr(hua("guozixy"),"|8-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:684px; top:441px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|8-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|9-1|")
a1=a1+instr(hua("guozixy"),"|9-2|")
a1=a1+instr(hua("guozixy"),"|9-3|")
a1=a1+instr(hua("guozixy"),"|9-4|")
a1=a1+instr(hua("guozixy"),"|9-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:700px; top:439px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+3,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|9-<%=mid(hua("guozixy"),a1+3,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|10-1|")
a1=a1+instr(hua("guozixy"),"|10-2|")
a1=a1+instr(hua("guozixy"),"|10-3|")
a1=a1+instr(hua("guozixy"),"|10-4|")
a1=a1+instr(hua("guozixy"),"|10-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:674px; top:426px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+4,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|10-<%=mid(hua("guozixy"),a1+4,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|11-1|")
a1=a1+instr(hua("guozixy"),"|11-2|")
a1=a1+instr(hua("guozixy"),"|11-3|")
a1=a1+instr(hua("guozixy"),"|11-4|")
a1=a1+instr(hua("guozixy"),"|11-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:693px; top:411px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+4,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|11-<%=mid(hua("guozixy"),a1+4,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if
a1=0
a1=a1+instr(hua("guozixy"),"|12-1|")
a1=a1+instr(hua("guozixy"),"|12-2|")
a1=a1+instr(hua("guozixy"),"|12-3|")
a1=a1+instr(hua("guozixy"),"|12-4|")
a1=a1+instr(hua("guozixy"),"|12-5|")
if a1>0  then%>
<div id="Layer2" style="position:absolute; left:681px; top:397px; width:24px; height:24px; z-index:101"><img src="img/sguo_0<%=mid(hua("guozixy"),a1+4,1)%>.gif" width="24" height="24" <%if session("id")<>"" then%><%if int(session("id"))=int(web_id) then%> alt="人参果点击采摘" onclick="return  gz('|12-<%=mid(hua("guozixy"),a1+4,1)%>|')" <%end if%><%else%> alt="人参果只有花的主人才能采摘" <%end if%>></div>
<%end if%>
<%end if
'结束果子
%>






<div id=huabg>
<div id="Layer23wqew" style="position:absolute; left:685px; top:352px; width:194px; height:174px; z-index:2"><table width="100%" height="100%" title="单击花即可隐藏花的参数">
  <tr><td align="center" valign="middle"><div align="center"><img src="/web/1/img/hua/<%=hua("huaname")%>_bg.gif" ></div></td>
</tr></table></div>
<div id="Layer2231213" style="position:absolute; left:685px; top:358px; width:194px; height:170px; z-index:5">


<table width="100%" height="100%"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td align="center" ><table width="100%" height="170"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="17%">&nbsp;</td>
        <td width="83%" align="center" valign="bottom"><table width="132"  border="0" cellpadding="0" cellspacing="0">
          <tr align="center">
            <td height="80" width="33" title="阳光：<%=hua("yg")%>"><table width="15" height="80"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_fm.gif">
              <tr>
                <td height="5"><img src="img/hua/icon_ft.gif" width="27" height="5"></td>
              </tr>
              <tr>
                <td height="80" align="center" valign="bottom"><table width="27"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_f1.gif" height="<%=80*hua("yg")/hua("max1")%>" >
                  <tr>
                    <td></td>
                  </tr>
                </table></td>
              </tr>
              <tr>
                <td height="5"><img src="img/hua/icon_fd.gif" width="27" height="5"></td>
              </tr>
            </table></td>
            <td height="80" width="33" title="爱心：<%=hua("ax")%>"><table width="15" height="80"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_fm.gif"  >
              <tr>
                <td height="5"><img src="img/hua/icon_ft.gif" width="27" height="5"></td>
              </tr>
              <tr>
                <td height="80" valign="bottom"><table width="27"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_f2.gif" height="<%=80*hua("ax")/hua("max1")%>" >
                  <tr>
                    <td></td>
                  </tr>
                </table></td>
              </tr>
              <tr>
                <td height="5"><img src="img/hua/icon_fd.gif" width="27" height="5"></td>
              </tr>
            </table></td>
            <td height="80" width="33" title="雨露：<%=hua("yl")%>"><table width="15" height="80"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_fm.gif" >
              <tr>
                <td height="5"><img src="img/hua/icon_ft.gif" width="27" height="5"></td>
              </tr>
              <tr>
                <td height="80" valign="bottom"><table width="27"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_f3.gif"  height="<%=80*hua("yl")/hua("max1")%>" >
                  <tr>
                    <td></td>
                  </tr>
                </table></td>
              </tr>
              <tr>
                <td height="5"><img src="img/hua/icon_fd.gif" width="27" height="5"></td>
              </tr>
            </table></td>
            <td width="33" height="80" title="营养：<%=hua("yy")%>"><table width="15" height="80"  border="0" align="center" cellpadding="0" cellspacing="0" background="img/hua/icon_fm.gif" >
              <tr>
                <td height="5"><img src="img/hua/icon_ft.gif" width="27" height="5"></td>
              </tr>
              <tr>
                <td height="80" valign="bottom"><table width="27"  border="0" cellpadding="0" cellspacing="0" background="img/hua/icon_f4.gif"  height="<%=80*hua("yy")/hua("max1")%>" >
                  <tr>
                    <td></td>
                  </tr>
                </table></td>
              </tr>
              <tr>
                <td height="5"><img src="img/hua/icon_fd.gif" width="27" height="5"></td>
              </tr>
            </table></td>
          </tr>
          <tr align="center">
            <td height="16" title="阳光：<%=hua("yg")%>"><img src="img/hua/icon_b1.gif" width="16" height="16"></td>
            <td height="16" title="爱心：<%=hua("ax")%>"><img src="img/hua/icon_b2.gif" width="16" height="16"></td>
            <td height="16" title="雨露：<%=hua("yl")%>"><img src="img/hua/icon_b3.gif" width="16" height="16" ></td>
            <td height="16" title="营养：<%=hua("yy")%>"><img src="img/hua/icon_b4.gif" width="16" height="16"></td>
          </tr>
          <tr align="center">
            <td height="15" colspan="4">
			<%
			if hua("userdj")=5 then
			dj="花之神匠"
			elseif  hua("userdj")=4 then
			dj="花之圣手"
			elseif hua("userdj")=3 then
			dj="花匠大师"
			elseif hua("userdj")=2 then
			dj="高级花匠"
			else 
			dj="花匠学徒"
			end if
			response.Write("<font color='000000'>"&dj&"</font>")
			%>
			 <a href="javascript:;" title="帮助" onClick="window.open('/web/1/huahelp.asp','huahelp','scrollbars=yes,resizable=no,width=440,menubar=no,top=10,left=188')"><img src="img/hua/bt_help.gif" width="8" height="11" border="0"></a></td>
            </tr>
        </table>
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td height="12"></td>
            </tr>
          </table></td>
      </tr>
    </table></td>
    </tr>
</table>

<%end if%></div></div>
<div id="Layer3" style="position:absolute; left:652px; top:356px; width:92px; height:178px; z-index:10">
<%

if not hua.eof then
%>
<img src="img/hua/<%=hua("huaname")%>_f<%=hua("huadj")%>.gif" width="92" height="178" onClick="showadv()" title="当前植物为:<%=hua("huaclass")%>级&nbsp;第<%=hua("huadj")%>阶段的&nbsp;<%=hua("huaname1")%>&nbsp;&nbsp;(单击花即可隐藏花的参数)">
<script language="javascript">
function gz(qqq){
location.href="index.asp?web_id=<%=web_id%>&gz="+qqq
window.event.cancelBubble=true
}

function showadv(){
if (huabg.style.display=="none")
{
huabg.style.display=""
}else{
huabg.style.display="none"
}
}

</script>
<%end if%>
</div>
<div id="Layer4" style="position:absolute; left:50px; top:483px; width:868px; height:50px; z-index:1"><img src="img/hua/<%=hua("huaname")%>_r<%=hua("huadj")%>.gif"></div>
<%end if
'结束  花
%>




<%		
	Public function IIF(massage,trueresult,falseresult)
		if massage then
			IIF=trueresult
		else
			IIF=falseresult
		end if
	end function

%>
<div id="Layer1" style="position:absolute; left:784px; top:24px; width:130px; height:296px; z-index:1">
  <%if fw=1 then%>
  <SCRIPT language=JavaScript>

function hve_display(t_id,i_id){//显示隐藏程序

	//var t_id;//表格id
	//var i_id;//图片id
	var on_img="on.gif";//打开时图片
	var off_img="off.gif";//隐藏时图片
		if (t_id.style.display == "none") {//如果为隐藏状态
		t_id.style.display="";//切换为显示状态
		i_id.src="img/fw_1_1.gif";}//换图
	else{//否则
		t_id.style.display="none";//切换为隐藏状态
		i_id.src="img/fw_1.gif";}//换图
}

function Hve_Display(t_id){//显示隐藏程序
	var t_id;
		if (t_id.style.display == "none") {//如果为隐藏状态
		t_id.style.display="";//切换为显示状态
		}//换图
	else{//否则
		t_id.style.display="none";//切换为隐藏状态
		}//换图
}

            </SCRIPT>
			


			<%
'记录访问者

if session("id")<>""  then
if  int(session("id"))<>int(web_id)  and session("over2")<>web_id then
session("over2")=web_id

Set countfw= Server.CreateObject("ADODB.Recordset") 
countfw.open "select * from snsn_countfw where userid="&web_id&" and fwuserid="&session("id"),conn,1,1

'阳光(会员访问量)
Set countfw0= Server.CreateObject("ADODB.Recordset") 
countfw0.open "select * from snsn_countfw where userid="&web_id&" and fwuserid="&session("id")&" and datediff(d,fwdate,getdate())>1",conn,1,1
if not countfw0.eof or countfw.eof then
Set hua= Server.CreateObject("ADODB.Recordset") 
hua.open "select * from snsn_hua where userid="&web_id,conn,3,3
if not hua.eof then 
if hua("yg")<hua("max1")  then
if datediff("d",hua("ygdate"),now)>=1 then
hua("dayyg")=0
hua("ygdate")=now()
hua.update
end if
if hua("dayyg")<8 then

hua("dayyg")=hua("dayyg")+1
hua("yg")=hua("yg")+1
hua.update

end if
end if
end if
end if
'end 阳光


if countfw.eof then
conn.execute"insert into snsn_countfw (fwnum,fwdate,fwuserid,userid)values(1,getdate(),"&session("id")&","&web_id&")"

Set countfw1= Server.CreateObject("ADODB.Recordset") 
countfw1.open "select * from snsn_countfw where userid="&web_id,conn,1,1

if  countfw1.recordcount>10 then

Set countfw2= Server.CreateObject("ADODB.Recordset") 
countfw2.open "select top 1 * from snsn_countfw where userid="&web_id&" order by fwdate",conn,3,3
countfw2.delete()

end if

else

conn.execute"update  snsn_countfw set fwnum=fwnum+1,fwdate=getdate() where fwuserid="&session("id")&" and userid="&web_id

end if



end if
end if

%>
            <table border="0" align="center" cellpadding="0" cellspacing="0" background="images/mini001_007.gif" id=secTable>
              <tr>
                <td valign="top" class="cardSelected" onMouseOver="secCard(0);secBoard(0);"><img id="Image1" src="img/phfw.gif" width="60" height="20" onMouseOver="changeLayer('r')"></td>
                <td valign="top" class="cardNormal" onMouseOver="secCard(2);secBoard(1);"><img id="Image2" src="img/phcf2.gif" width="60" height="20" onMouseOver="changeLayer('t')"></td>
              </tr>
              <tr background="img/ph.gif">
                <td height="14" colspan="2" background="img/ph.gif">
                 <%	
web_idb=int(web_id)
Set bname1= Server.CreateObject("ADODB.Recordset") 
bname1.open "select * from snsn_count order by hit desc",conn,1,1 
bname1i=0
do while not bname1.eof
bname1i=bname1i+1
if bname1("userid")=web_idb then
exit do
end if
bname1.movenext
loop
Set bname2= Server.CreateObject("ADODB.Recordset") 
bname2.open "select id from snsn_user order by jifen desc",conn,1,1 
bname2i=0
do while not bname2.eof
bname2i=bname2i+1
if bname2("id")=web_idb then
exit do
end if
bname2.movenext
loop
%> <table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0"  id=mainTable>
                    <tbody style="DISPLAY: block">
                      <tr>
                        <td width="98%" align="center"><div align="center"> 当前：<span class="style1"><%=bname1i%></span>位</div></td>
                      </tr>
                    </tbody>
                    <tbody style="DISPLAY: none">
                      <tr>
                        <td width="98%" align="center"><div align="center">当前：<span class="style1"><%=bname2i%></span>位</div></td>
                      </tr>
                    </tbody>
                </table></td>
              </tr>
              <tr>
                <td colspan="2" valign="bottom"><img src="img/ph1.gif" width="120" height="3"></td>
              </tr> <tr>
                <td height="6" colspan="2" valign="bottom"></td>
              </tr>
            </table>
<table width="120"  border="0" align="center" cellpadding="0" cellspacing="0" class="z12">
    <tr align="center" >
      <td height="21" style="CURSOR: hand" onclick=javascript:hve_display(table1,image1)><img src="img/fw_1.gif" name="image1" width="120"></td>
    </tr>	<TBODY id=table1 style="DISPLAY: none"><%	
Set fwz= Server.CreateObject("ADODB.Recordset") 
fwz.open "select snsn_user.username, snsn_user.id,snsn_user.url,snsn_countfw.fwnum,snsn_countfw.fwdate,snsn_countfw.userid,snsn_countfw.fwuserid from snsn_countfw,snsn_user where snsn_user.id=snsn_countfw.fwuserid and snsn_countfw.userid="&web_id,conn,3,1 
if not  fwz.eof then
do while not fwz.eof
%>
    <tr align="center" bgcolor="#FFFFFF">
      <td height="21" background="img/fw_2.gif" ><table width="90%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><a  title="共访问<%=fwz(3)%>次" href="javascript:;" onClick="window.open('/web/<%=fwz(2)%>/index.asp?web_id=<%=fwz(1)%>','','scrollbars=no,resizable=no,width=920,height=565,menubar=no,top=10,left=10')" class="over"><b><font color="#0099CC"><%=left(fwz(0),8)%></font></b></a>(<%=FormatDate(fwz(4),3)%>)</td>
        </tr>
      </table>        </td>
    </tr>
	<%fwz.movenext
	loop
	else%>
	<tr><td height="21" align="center" background="img/fw_2.gif">最近访问的会员</td>
	</tr>
	<%end if%></TBODY><tr><td align="center"><img src="img/fw_3.gif" width="120"></td>
	</tr>
  </table><%end if%>
</div>
<IFRAME scrolling="NO" frameBorder=0 id=top name=top src="home.asp?web_id=<%=web_id%>&html=<%=nosql(request("html"))%>" style="HEIGHT: 533;  WIDTH: 920; Z-INDEX: 0"></IFRAME>
<IFRAME scrolling="NO" frameBorder=0 id=frmright name=forum src="midi.asp?web_id=<%=web_id%>" style="HEIGHT: 32; WIDTH: 920; Z-INDEX: 0"></IFRAME>
</BODY>
</HTML>