<!--#include file="../inc/DAL.asp"-->
<!--#include file="Check.asp"-->
<!--#include file="../inc/page.asp"-->
<%
Dim ConfigRS
Set ConfigRS=DB_CONN.EXECUTE("select *,(select [i_User_InComeLevel_Style] from [i_User_IncomeLevel] where [i_User_IncomeNum]>=[i_User_IncomeLevel_MinNum] and [i_User_IncomeNum]<[i_User_IncomeLevel_MaxNum]) as 'incomeclass' from [i_User_Info] a join [i_Sys_Room] b on a.[i_User_ID]=b.[i_Sys_Room_AdminUserID] where ([i_User_LastLiveTime] is not null  and DateDiff(n,[i_User_ForUpdateTime],getdate())<2) or [i_Sys_Room_Monitor]=1 order by [i_Sys_Room_Monitor],[i_Sys_Room_OnlineNum] desc")
ConfigRS.pagesize=10
if isempty(request("page")) or request("page")="" then curpage=1 else curpage=Cint(request("page")) end if
if not ConfigRS.eof then ConfigRS.absolutepage = curpage
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>iShow Manage System</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="styles/layoutContent.css" rel="stylesheet" type="text/css" />
<link href="themes/blue/styles.css" rel="stylesheet" type="text/css" />
<script language="javascript" type="text/javascript" src="/i/v2/js/Jq.js"></script>
<script language="javascript" type="text/javascript" src="/i/v2/js/base_Monitor.js"></script>
<script>
	iInfo.IsLogin=true;
	iInfo.UserID='100001';//用户userid
	iInfo.RoomID='100001';//确保存在并正确
	iInfo.UserNickName='巡管';
	iInfo.FacePic='';
	iInfo.LevelClass='';
	iInfo.VIPIcon='';
	iInfo.InComeClass='';
	iInfo.LevelID=100001;
	iInfo.LoginTime='';
	iInfo.LoginIP='';
	iInfo.Live_NG_ID='';//这项保证一致
	
	function DisLive(e,paramstr)
	{
		var strtime = getDataTimes();
		var swfVersionStr = "11.1.0";
		var xiSwfUrlStr = "/swf/playerProductInstall.swf";
		var flashvars = {};
		var params = {};
		params.quality = "high";
		params.wmode = "Opaque";
		params.bgcolor = "#000000";
		params.allowscriptaccess = "sameDomain";
		params.allowfullscreen = "true";
		var attributes = {};
		attributes.id = "iLivePlayer"+paramstr;
		attributes.name = "iLivePlayer"+paramstr;
		attributes.align = "middle";
		var PlayerType="LivePlayer_2.3";
		//iInfo.Live_NG_ID=paramstr;
		swfobject.embedSWF("/swf/"+PlayerType+".swf?Live_Type=2&Live_NG_ID="+paramstr+"&"+strtime, e,"350", "260", swfVersionStr, xiSwfUrlStr, flashvars, params, attributes);
	}
	function CloseRoom(e)
	{
		$.get("SetMonitor.asp",{ac:"CloseRoom",rid:e,t:GetSendTime},function(){
		},"script");
		var iPlayer = getSWF("iLivePlayer"+e);
		var o=new Object();
		o.ReceiveRID=e;
		o.Type="CloseRoom";
		iPlayer._PostInfo(o);
	}
</script>
<script language="javascript" type="text/javascript" src="/i/v2/js/SwfObject.js"></script>
</head>
<body>
<div class="contentcontainer">
    <div class="headings alt">
        <h2>巡管查房&nbsp;&nbsp;&nbsp;<a href="javascript:history.back();" style="text-decoration:none;">返回</a>&nbsp;&nbsp;&nbsp;<a href="javascript:\\" onclick="location.reload();" style="text-decoration:none;">刷新</a></h2>
    </div>
    <div class="contentbox">
            <table class="CB" width="100%" cellpadding="0" cellspacing="0" border="0">
                
				<tr>
                <%
				dim iPage:iPage=0
				while (not ConfigRS.eof and iPage<ConfigRS.pagesize )
				%>
                    <td width="350">
                        <label for="RtmfpUrl"><strong>用户名:<a href="EditUser.asp?UID=<%=ConfigRS("i_User_ID")%>"><%=Get_SafeStr(ConfigRS("i_User_NickName"))%></a></strong></label>
                        <div id="Video_<%=iPage%>"></div>
						<script>
							DisLive("Video_<%=iPage%>","<%=ConfigRS("i_Sys_Room_ID")%>");
						</script>
						<div><a href="javascript:CloseRoom('<%=ConfigRS("i_Sys_Room_ID")%>')">关闭房间</a><%if Cstr(ConfigRS("i_Sys_Room_Monitor"))="1" then RW "&nbsp;&nbsp;<font color=red>[被举报]</font>&nbsp;&nbsp;<a href='DisReport.asp?ac=DisReport&rid="&ConfigRS("i_Sys_Room_ID")&"'>取消举报</a>"%></div>
                    </td>
					
				<%
				iPage=iPage+1
				ConfigRS.MoveNext
				wend
				%>
                </tr>
				<tr>
					<td colspan="10"><%=ExportPageInfo(ConfigRS,curpage,iPage,"Gift_Manage.asp?1=1"&replace(Request.QueryString,"page","1")&"&")%></td>
				</tr>
            </table>
    </div>
</div>
</body>
</html>
