<%
Function GetPurview(AllPurview)
    Response.Write "        <table width='100%' border='0' cellspacing='1' cellpadding='2'>"
	Response.Write "          <tr>"
	 Response.Write "<td width='16%'>日常操作管理</td>"
    Response.Write "          </tr>"
	 Response.Write "          <tr>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='UserManage' "&CheckPurview(AllPurview,"UserManage")&">会员管理</td>"
	  Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='order' "&CheckPurview(AllPurview,"order")&">在线定单</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='feedback' "&CheckPurview(AllPurview,"feedback")&">留言管理</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='AdminMaillist' "&CheckPurview(AllPurview,"AdminMaillist")&">邮件列表</td>"
	 Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='sysadmin_count' "&CheckPurview(AllPurview,"sysadmin_count")&">网站统计</td>"
	 Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='editpass' "&CheckPurview(AllPurview,"editpass")&">修改密码</td>"
    Response.Write "          </tr>"
	
	Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%'>系统设置管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_Update' "&CheckPurview(AllPurview,"Admin_Update")&">系统升级</td>"
	 Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='SiteConfig' "&CheckPurview(AllPurview,"SiteConfig")&">网站信息配置</td>"
    Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_FriendLinks' "&CheckPurview(AllPurview,"Admin_FriendLinks")&">友情链接管理</td>"
	 Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_AddAffiche' "&CheckPurview(AllPurview,"Admin_AddAffiche")&">网站公告管理</td>"
	  Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='VoteManage' "&CheckPurview(AllPurview,"VoteManage")&">网站调查管理</td>"
	   Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_QQ' "&CheckPurview(AllPurview,"Admin_QQ")&">在线qq管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
	    Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_Style' "&CheckPurview(AllPurview,"Admin_Style")&">编辑器管理</td>"
		 Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='uploadfile' "&CheckPurview(AllPurview,"uploadfile")&">上传文件管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg1"">"
    Response.Write "            <td width='16%'>公司信息管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg"">"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='AboutUs' "&CheckPurview(AllPurview,"AboutUs")&">公司信息管理</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Culture' "&CheckPurview(AllPurview,"Culture")&">公司文化管理</td>"
	Response.Write "            <td width='16%'></td>"  
	Response.Write "          <td width='16%'></td>"
    Response.Write "            <td width='16%'></td>"
	Response.Write "            <td width='16%'></td>"
    Response.Write "          </tr>"
		Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg1"">"
    Response.Write "            <td width='16%'>公司产品管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg"">"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='productclass' "&CheckPurview(AllPurview,"productclass")&">产品类别</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='productmanage' "&CheckPurview(AllPurview,"productmanage")&">产品管理</td>"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='adddproduct' "&CheckPurview(AllPurview,"adddproduct")&">添加产品</td>"  
	Response.Write "          <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='productcheck' "&CheckPurview(AllPurview,"productcheck")&">审核产品</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='productimg' "&CheckPurview(AllPurview,"productimg")&">产品图片管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg1"">"
    Response.Write "            <td width='16%'>下载中心管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg"">"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='downloadtclass' "&CheckPurview(AllPurview,"downloadtclass")&">下载程序类别</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='downloadmanage' "&CheckPurview(AllPurview,"downloadmanage")&">管理下载程序</td>"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='adddownload' "&CheckPurview(AllPurview,"adddownload")&">添加下载程序</td>"  
	Response.Write "          <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='downloadcheck' "&CheckPurview(AllPurview,"downloadcheck")&">下载审核</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='downloadimg' "&CheckPurview(AllPurview,"downloadimg")&">下载上传文件管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg1"">"
    Response.Write "            <td width='16%'>公司新闻管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg"">"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='newsclass' "&CheckPurview(AllPurview,"newsclass")&">管理新闻类别</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='addnews' "&CheckPurview(AllPurview,"addnews")&">添加新闻内容 </td>"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='newsmanage' "&CheckPurview(AllPurview,"newsmanage")&">管理全部新闻</td>"  
	Response.Write "          <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='newsping' "&CheckPurview(AllPurview,"newsping")&">新闻评论管理</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='newsimg' "&CheckPurview(AllPurview,"newsimg")&">新闻上传文件管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
	Response.Write "          <tr>"
		Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg1"">"
    Response.Write "            <td width='16%'>人才招聘管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr class=""tdbg"">"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='jobmanage' "&CheckPurview(AllPurview,"jobmanage")&">招聘管理</td>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='addjob' "&CheckPurview(AllPurview,"addjob")&">发布招聘 </td>"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='pingmanage' "&CheckPurview(AllPurview,"pingmanage")&">应聘管理 </td>"  
	Response.Write "          <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='jobStrategy' "&CheckPurview(AllPurview,"jobStrategy ")&">人才策略</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
	Response.Write "            <td width='16%' height='20'></td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
    Response.Write "            <td width='16%'>其它权限管理</td>"
    Response.Write "          </tr>"
	Response.Write "          <tr>"
    Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='MovieAdd' "&CheckPurview(AllPurview,"MovieAdd")&">视频中心管理</td>"
	Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='HonorAdd' "&CheckPurview(AllPurview,"HonorAdd")&">荣誉形象管理</td>"
	 Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Market' "&CheckPurview(AllPurview,"Market")&">营销网络管理</td>"
	 'Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='HrDemandAdd' "&CheckPurview(AllPurview,"HrDemandAdd")&">人才招聘管理</td>"
 Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Class_Menu' "&CheckPurview(AllPurview,"Class_Menu")&">顶部菜单管理</td>"
Response.Write "<td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_Skin' "&CheckPurview(AllPurview,"Admin_Skin")&">模板设置管理</td>"
 Response.Write "            <td width='16%'><input name='AllPurview' type='checkbox' id='AllPurview' value='Admin_Sql' "&CheckPurview(AllPurview,"Admin_Sql")&">数据库管理</td>"	 
    Response.Write "          </tr>"	
    Response.Write "        </table>"
End Function
Function CheckPurview(AllPurview,PurviewValue)
    If FoundInArr(AllPurview,PurviewValue,",") then CheckPurview=" Checked"
End Function
%>