<!--#include file=byshop_conn.asp-->
<%if session("admin")="" then
response.Redirect "login.asp"
end if

%>
<%
if session("Flag")=1 then
	color="#000000"
elseif session("Flag")=2 then
	color="#000000"
else
	 color="#CCCCCC"
end if

if session("Flag")=1 then
	colorx="#000000"
else
	 colorx="#CCCCCC"
end if



'//新楼盘出售

'新楼盘全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from build    ",conn,1,1
buildall=rs.recordcount 
rs.close

'新楼盘待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from build where by_shenhe=0  ",conn,1,1
buildwait=rs.recordcount 
rs.close

'新楼盘固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from build where guding=1   ",conn,1,1
buildgd=rs.recordcount 
rs.close


'//二手房出售

'二手房出售全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell ",conn,1,1
sellall=rs.recordcount 
rs.close

'二手房出售待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell where by_shenhe=0  ",conn,1,1
sellwait=rs.recordcount 
rs.close

'二手房出售固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell where guding=1   ",conn,1,1
sellgd=rs.recordcount 
rs.close


'//二手房求购

'二手房求购全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell2 ",conn,1,1
sellqgall=rs.recordcount 
rs.close

'二手房求购待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell2 where by_shenhe=0  ",conn,1,1
sellqgwait=rs.recordcount 
rs.close

'二手房求购固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from sell2 where guding=1   ",conn,1,1
sellqggd=rs.recordcount 
rs.close


'//借款信息

'借款信息全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent ",conn,1,1
rentall=rs.recordcount 
rs.close

'借款信息待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent where by_shenhe=0  ",conn,1,1
rentwait=rs.recordcount 
rs.close

'借款信息固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent where guding=1   ",conn,1,1
rentgd=rs.recordcount 
rs.close

'//放款信息'借贷信息求租全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent2 ",conn,1,1
rentqgall=rs.recordcount 
rs.close

'借贷信息求租待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent2 where by_shenhe=0  ",conn,1,1
rentqgwait=rs.recordcount 
rs.close

'借贷信息求租固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from rent2 where guding=1   ",conn,1,1
rentqggd=rs.recordcount 
rs.close

'//合租

'合租全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from cotenancy ",conn,1,1
cotenancyall=rs.recordcount 
rs.close

'合租待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from cotenancy where by_shenhe=0  ",conn,1,1
cotenancywait=rs.recordcount 
rs.close

'合租固顶
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from cotenancy where guding=1   ",conn,1,1
cotenancygd=rs.recordcount 
rs.close


'//会员

'会员全部
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from byshop_user ",conn,1,1
userall=rs.recordcount 
rs.close

'会员待审核
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from  byshop_user where reglx=0  ",conn,1,1
userwait=rs.recordcount 
rs.close

REM 管理栏目设置
dim menu(12,10)
menu(0,0)="常规设置"
menu(0,1)="<a href=webconfig.asp target=right><font color="&colorx&">网站设置</a> "
menu(0,2)="<a href=guanggao.asp target=right><font color="&colorx&">广告服务</a> "
menu(0,3)="<a href=links.asp target=right><font color="&colorx&">文字链接</a> "
menu(0,4)="<a href=imageslinks.asp target=right><font color="&colorx&">图片链接</a> "



menu(1,0)="新楼盘管理"
menu(1,1)="<a href=addbuild.asp target=right>添加新楼盘</a> "
menu(1,2)="<a href=managebuild.asp?action=all target=right>管理新楼盘</a>&nbsp;<font color=#ff0000>"&buildwait&"</font>/"&buildall&""
menu(1,3)="<a href=buildgd.asp target=right>固顶排序</a>&nbsp;"&buildgd&""



menu(2,0)="二手房管理"
menu(2,1)="<a href=addsell.asp target=right>添加出售</a> "
menu(2,2)="<a href=managesell.asp?action=all target=right>管理出售</a>&nbsp;<font color=#ff0000>"&sellwait&"</font>/"&sellall&""
menu(2,3)="<a href=sellgd.asp target=right>固顶排序</a>&nbsp;"&sellgd&""
menu(2,4)="<a href=addsell2.asp target=right>添加求购</a> "
menu(2,5)="<a href=managesell2.asp?action=all target=right>管理求购</a>&nbsp;<font color=#ff0000>"&sellqgwait&"</font>/"&sellqgall&""
menu(2,6)="<a href=sell2gd.asp target=right>固顶排序</a>&nbsp;"&sellqggd&""



menu(3,0)="借放款信息管理"
menu(3,1)="<a href=addrent.asp target=right>添加借款信息</a> "
menu(3,2)="<a href=managerent.asp?action=all target=right>管理借款信息</a>&nbsp;<font color=#ff0000>"&rentwait&"</font>/"&rentall&""
menu(3,3)="<a href=rentgd.asp target=right>固顶排序</a>&nbsp;"&rentgd&""
menu(3,4)="<a href=addrent2.asp target=right>添加放款信息</a> "
menu(3,5)="<a href=managerent2.asp?action=all target=right>管理放款信息</a>&nbsp;<font color=#ff0000>"&rentqgwait&"</font>/"&rentqgall&""
menu(3,6)="<a href=rent2gd.asp target=right>固顶排序</a>&nbsp;"&rentqggd&""

menu(4,0)="合租管理"
menu(4,1)="<a href=addcotenancy.asp target=right>添加合租</a> "
menu(4,2)="<a href=managecotenancy.asp?action=all target=right>管理合租</a>&nbsp;<font color=#ff0000>"&cotenancywait&"</font>/"&cotenancyall&""
menu(4,3)="<a href=cotenancygd.asp target=right>固顶排序</a>&nbsp;"&cotenancygd&""

menu(5,0)="建材装修"
menu(5,1)="<a href=addwz.asp target=right>添加装修文章</a> "
menu(5,2)="<a href=editwz.asp target=right>管装修理文章</a>"
menu(5,4)="<a href=zxgg.asp target=right>装修公司</a>"

menu(6,0)="房产图库"
menu(6,1)="<a href=fcpic.asp target=right>管理图库</a> "


menu(7,0)="会员管理"
menu(7,1)="<a href=manageuser.asp?action=all target=right>管理会员</a>&nbsp;<font color=#ff0000>"&userwait&"</font>/"&userall&""
menu(7,2)="<a href=editxx.asp?action=tiaoyue target=right>会员条约</a> "


menu(8,0)="留言管理"
menu(8,1)="<a href=buildreview.asp?action=all target=right>新楼盘留言</a>"
menu(8,2)="<a href=sellreview.asp?action=all target=right>二手房出售留言</a>"
menu(8,3)="<a href=sell2review.asp?action=all target=right>二手房求购留言</a>"
menu(8,4)="<a href=rentreview.asp?action=all target=right>借款信息留言</a> "
menu(8,5)="<a href=rent2review.asp?action=all target=right>借贷信息求租留言</a> "
menu(8,6)="<a href=cotenancyreview.asp?action=all target=right>合租留言</a> "

menu(9,0)="信息管理"
menu(9,1)="<a href=changepic.asp target=right><font color="&color&">首页幻灯片广告</a> "
menu(9,2)="<a href=addnews.asp target=right><font color="&color&">添加新闻信息</a> "
menu(9,3)="<a href=editnews.asp target=right><font color="&color&">管理新闻信息</a>"
menu(9,4)="<a href=zxgg.asp target=right><font color="&color&">管理装修公司</a>"
menu(9,5)="<a href=editxx.asp target=right><font color="&color&">帮助中心</a> "


menu(10,0)="省市管理"
menu(10,1)="<a href=ManageProvince.asp target=right><font color="&color&">省管理</a> | <a href=ManageCity.asp target=right><font color="&color&">市管理</a>"

menu(11,0)="网站安全管理"
menu(11,1)="<a href=loginerr.asp target=right><font color="&color&">后台登录失败</a>"
menu(11,2)="<a href=adminlog.asp target=right><font color="&color&">管理员登录日志</a>"


menu(12,0)="数据处理(Access)"
menu(12,1)="<a href=database_menager.asp#1 target=right><font color="&colorx&">数据库更名</a> "
menu(12,2)="<a a href=../check.asp target=right><font color="&color&">系统空间占用</a>"
menu(12,3)="<a href=aspcheck.asp target=right><font color="&color&">服务器环境</a>"
%>
<title>管理页面</title>
<META content="MSHTML 5.00.3315.2870" name=GENERATOR>
<style type=text/css>
body  {
	background:#000000;
	margin:0px;
	font:9pt 宋体;
	background-color: #fffff;
	scrollbar-face-color: #f8f8f8;
scrollbar-highlight-color: #ffffff;
scrollbar-shadow-color: #f8f8f8;
scrollbar-shadow-color: #f8f8f8;
scrollbar-arrow-color: #808080;
scrollbar-track-color: #ededed;
scrollbar-darkshadow-color: #808080; }

table  { border:0px; }
td  { font:normal 12px 宋体; }
img  { vertical-align:bottom; border:0px; }
a  { font:normal 12px 宋体; color:#000000; text-decoration:none; }
a:hover  { color:#000000;text-decoration:underline; }
.sec_menu  {
	border-left:1px solid #efefef;
	border-right:1px solid #efefef;
	border-bottom:1px solid #efefef;
	overflow:hidden;
	background:#f7f7f7;
	border-top-width: 1px;
	border-top-style: solid;
	border-top-color: #efefef;
}
.menu_title  { }
.menu_title span  { position:relative; top:2px; left:8px; color:#000000;  }
.menu_title2  { }
.menu_title2 span  { position:relative; top:2px; left:8px; color:#000000;  }
.style1 {color: #FFFFFF}
.style2 {color: #000000}
</style>
<SCRIPT language=javascript1.2>
function showsubmenu(sid)
{
whichEl = eval("submenu" + sid);
if (whichEl.style.display == "none")
{


eval("submenu" + sid + ".style.display=\"none\";");
}
}
</SCRIPT>
<BODY leftmargin="0" topmargin="0" marginheight="0" marginwidth="0">
<table width=100% cellpadding=0 cellspacing=0 border=0 align=left> 
<tr>
  <td valign=top> <table cellpadding=0 cellspacing=0 width=158 align=center>
      <tr> 
        <td height=42 valign=bottom> 
		<img border="0" src="images/title.gif" width="163" height="60"> 
        </td>
      </tr>
    </table>
    <table cellpadding=0 cellspacing=0 width=158 align=center>
      <tr> 
        
    <td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background=images/admin_titil2.jpg> 
      &nbsp;使用说明</span><span> </td>
      </tr>
      <tr> 
        <td style="display:"> 
		<div class=sec_menu style="width:160px; height:86px"> 
            
            <table cellpadding=0 cellspacing=0 align=center width=158>
             
             
        <tr> 
          <td height=20><img src=images/bullet.gif border=0><a href="pay.asp" target="right">购买方式</a></td>
              </tr>
             
              <tr> 
                <td height=20>
				<p align="left">
				<img src=images/bullet.gif border=0><a href=gnsm.asp target=right>功能说明</a> | <a href=sysm.asp target=right>使用流程</a></td>
              </tr>
             
              <tr> 
                <td height=20>
				<img src=images/bullet.gif border=0><a href=tj.asp target=right>信息统计</a></td>
              </tr>
             
              <tr> 
                
          <td height=20> <img src=images/bullet.gif border=0><a href=renpassword.asp target=right>修改密码</font></a> 
            | <b><a href="logout.asp" target=_top>注销退出</a></b></td>
              </tr>
              </table>
    </table>
    <div  style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=158>
              <tr>
                
            <td height=10></td>
              </tr>
            </table>
          </div>
<%
	dim j,i
	dim tmpmenu
	dim menuname
	dim menurl
for i=0 to ubound(menu,1)
%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
  <tr>
    <td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background="images/admin_titil2.jpg" id=menuTitle1 onclick="showsubmenu(<%=i%>)"> 
      <span><%=menu(i,0)%></span> </td>
  </tr>
  <tr>
    <td <%if i=1 or i=2 then%> style="display:"  style="display:none" <%end if%> id='submenu<%=i%>'>
    <!--<td style="display:none" id='submenu<%=i%>'>-->
<div class=sec_menu style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
	<%
	for j=1 to ubound(menu,2)
	if isempty(menu(i,j)) then exit for
	%>
<tr><td height=20><img src=images/bullet.gif border=0><%=menu(i,j)%></td></tr>
<%
	next
%>
</table>
	  </div>
<div  style="width:158">
<table cellpadding=0 cellspacing=0 align=center width=158>
<tr><td height=10></td></tr>
</table>
	  </div>
	</td>
  </tr>
</table>
<%next%>
<table cellpadding=0 cellspacing=0 width=158 align=center>
      <tr> 
        
        
    <td height=25 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background="images/admin_left_2.gif" id=menuTitle1> 
       </td>
      </tr>
      <tr> 
        <td> <div class=sec_menu style="width:158"> 
            <table cellpadding=0 cellspacing=0 align=center width=158>
              <tr>
                <td height=20><br>
				版权所有:<BR>
              　　动力借贷中介系统V2.0<BR>
              <BR>
              演示网站:<BR>
              　<a href="http://www.0731xwtz.com" target=right>http://www.0731xwtz.com</a><BR>
              <BR></td>
              </tr>
            </table>
          </div></td>
      </tr>
    </table><BR> 
  