ECS
/
repos_ecs


			
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129
							<!--#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)
areaname = areaname(0)

set rschild = conn.execute("select child from t_area where t_classid = " & areaid)
child = rschild(0)

function getdClass(uid)
	dim rse2
	set rse2 = conn.execute("select devicename from t_dev_property where uid = '" & uid & "'")
	response.write "<strong>" & rse2(0) & "</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="alarm.asp";//调用页面

	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>
</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>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
            <td>&nbsp;</td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td align="center">
                      <%
					filename = "\images\area\"&areaid&".jpg"
					if not fso.fileExists(server.mappath(filename)) then
						response.write "<img src='images/area/area_eg.jpg'>"
					else
						response.write "<img src='images/area/"&areaid&".jpg'>"
					end if 
				  %>
                  </td>
                </tr>
              </table></td>
          </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>
<%
	Call CloseConn
%>