ECS
/
repos_ecs


			
				
					
						
						
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116
							<!--#include file="Inc/common.asp"-->
<!--#include file="Inc/MD5.asp"-->
<!--#include file="Inc/Function.asp"-->
<!--#include file="Admin_Common.asp"-->
<%
Dim uid, rse, width, rsRole, isAdmin
uid = trim(request("uid"))

if trim(Lcase(AdminName)) = "admin" then
	isAdmin = true
else
	isAdmin = false
end if

Dim areaname, areaid, rschild
areaid = request("id")
set areaname = conn.execute("select classname from t_area where t_classid = " & areaid)
if not areaname.bof and areaname.eof then areaname = areaname(0)

set rschild = conn.execute("select child from t_area where t_classid = " & areaid)
if not rschild.bof and rschild.eof then child = rschild(0)

function getdClass(uid)
	dim rse2
	set rse2 = conn.execute("select devicename from t_dev_property where uid = '" & uid & "'")
	response.write "<strong>"
	if instr(rse2(0),"(") <> 0 then
		response.write left(rse2(0),instr(rse2(0),"(")-1)
	else
		response.write rse2(0)
	end if
	response.write "</strong>"
end function

dim sql
%>
<!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>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title><%=systemPageTitle%></title>
<link href="bs2010.css" rel="stylesheet" type="text/css" />
<script type="text/javascript" src="js/share.js"></script>
<script type="text/javascript" src="js/prototype.js"></script>
<script language="javascript">
function GetData()
{
	url="itroom_<%=areaid%>.asp?id=<%=areaid%>";//调用页面

	var xmlhttp=null;

	if(window.XMLHttpRequest)
	{
        xmlhttp=new XMLHttpRequest(); 
	}
	if(!xmlhttp&&window.ActiveXObject)
	{
	try
	{ 
		xmlhttp=new ActiveXObject("Msxml2.XMLHTTP.5.0")
	}
	catch(e)
	{
   try
   {
 		xmlhttp=new ActiveXObject("Msxml2.XMLHTTP.4.0")
   }
   catch(e){
    try
    {
 		new ActiveXObject("Msxml2.XMLHTTP") 
    }
    catch(e)
    {
	try{
		new ActiveXObject("Microsoft.XMLHTTP")
     }catch(e)
	{
     }
    }
    }
    }
	}

	if(!xmlhttp){alert("XMLHTTP不可用，请升级安装。");location="support/msxml.msi"}
	
	xmlhttp.open("GET",url,false);
	xmlhttp.send();
	var str = xmlhttp.responseText;
	document.getElementById("loadcontent").innerHTML=str;
	
	setTimeout("GetData()",<%=refreshRate%>);
}
</script>
<style>
	html{background:url(images/bg.jpg) center center no-repeat}
</style>
</head>
<body onLoad="javascript:GetData();">
<div class="mainbg">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td valign="top">
        <div id="loadcontent">
            <p></p>
            数据载入中……</div>
    </td>
  </tr>
</table>
<p>&nbsp;</p>
</div>
</body>
</html>
<%
	Call CloseConn
%>