source: admin/WebConsole/varios/informacion_servidorrembo.php @ dbc9bab

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3
Last change on this file since dbc9bab was 1b92629, checked in by ramon <ramongomez@…>, 16 years ago

Reorganización directorios OpenGNSys Admin.

git-svn-id: https://opengnsys.es/svn/trunk@455 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 5.7 KB
Line 
1<?
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Copyright 200-2005 José Manuel Alonso. Todos los derechos reservados.
5// Fecha Creación: Año 2003-2004
6// Fecha Última modificación: Febrero-2005
7// Nombre del fichero: informacion_servidorrembo.php
8// Descripción :
9//              Muestra los ordenadores que están gestionados por un servidore rembo
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../clases/XmlPhp.php");
15include_once("../clases/ArbolVistaXML.php");
16include_once("../idiomas/php/".$idioma."/informacion_servidorrembo_".$idioma.".php");
17//________________________________________________________________________________________________________
18$idservidorrembo=0;
19$descripcionservidor="";
20if (isset($_GET["idservidorrembo"])) $idservidorrembo=$_GET["idservidorrembo"]; // Recoge parametros
21if (isset($_GET["descripcionservidor"])) $descripcionservidor=$_GET["descripcionservidor"]; // Recoge parametros
22
23$cmd=CreaComando($cadenaconexion);
24if (!$cmd)
25        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
26else
27        $arbolXML=CreaArbol($cmd,$idservidorrembo); // Crea el arbol XML
28
29// Creación del árbol
30$baseurlimg="../images/tsignos";
31$clasedefault="tabla_listados_sin";
32$titulotabla=$TbMsg[3]; 
33$arbol=new ArbolVistaXml($arbolXML,0,$baseurlimg,$clasedefault,1,20,130,1,$titulotabla);
34?>
35<HTML>
36<TITLE>Administración web de aulas</TITLE>
37<HEAD>
38        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
39        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXml.js"></SCRIPT>
40</HEAD>
41<BODY>
42        <P align=center class=cabeceras><?echo $TbMsg[0]?><BR>
43        <SPAN align=center class=subcabeceras><?echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/servidoresrembo.gif"><BR><BR>
44        <IMG src="../images/iconos/servidorrembo.gif"><SPAN class=presentaciones>&nbsp;&nbsp;<U><?echo $TbMsg[2]?></U>:<? echo $descripcionservidor?></SPAN></P>
45        <?echo $arbol->CreaArbolVistaXml(); // Crea arbol de configuraciones?>
46<?
47//________________________________________________________________________________________________________
48include_once("../includes/iframecomun.php");
49//________________________________________________________________________________________________________
50?>
51</BODY>
52</HTML>
53<?
54/**************************************************************************************************************************************************
55        Devuelve una cadena con formato XML de toda la información de los servidores rembo
56        Parametros:
57                - cmd:Una comando ya operativo ( con conexión abierta) 
58                - idservidorrembo: El identificador del perfil servidor rembo
59________________________________________________________________________________________________________*/
60function CreaArbol($cmd,$idservidorrembo){
61        $cadenaXML=SubarbolXML_Servidoresrembo($cmd,$idservidorrembo);
62        return($cadenaXML);
63}
64//________________________________________________________________________________________________________
65function SubarbolXML_Servidoresrembo($cmd,$idservidorrembo){
66        global $TbMsg;
67        $cadenaXML="";
68        $rs=new Recordset;
69        $cmd->texto="SELECT idservidorrembo,nombreservidorrembo,comentarios FROM servidoresrembo WHERE idservidorrembo=".$idservidorrembo ;
70        $rs->Comando=&$cmd;
71        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
72        $rs->Primero();
73        while (!$rs->EOF){
74                $cadenaXML.='<SERVIDORREMBO';
75                // Atributos                   
76                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_ServidorRembo'" .')"';
77                $cadenaXML.=' imagenodo="../images/iconos/servidorrembo.gif" ';
78                $cadenaXML.=' infonodo="'.$rs->campos["nombreservidorrembo"].'"';
79                $cadenaXML.='>';
80                if($rs->campos["comentarios"]>" "){
81                        $cadenaXML.='<PROPIEDAD';
82                        $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
83                        $cadenaXML.=' infonodo="[b]'.$TbMsg[4].' :[/b] '.$rs->campos["comentarios"].'"';
84                        $cadenaXML.='>';
85                        $cadenaXML.='</PROPIEDAD>';
86                }
87                $cadenaXML.=SubarbolXML_grupos_servidoresrembo_ordenadores($cmd,$rs->campos["idservidorrembo"]);
88                $cadenaXML.='</SERVIDORREMBO>';
89                $rs->Siguiente();
90        }
91        $rs->Cerrar();
92        return($cadenaXML);
93}
94//-------------------------------------------------------------------------------------------------------------------------------------------
95function SubarbolXML_grupos_servidoresrembo_ordenadores($cmd,$idservidorrembo){
96        $cadenaXML="";
97        $gidaula="";
98        $rs=new Recordset;
99        $cmd->texto="SELECT aulas.idaula,aulas.nombreaula,ordenadores. idordenador,ordenadores.nombreordenador FROM ordenadores INNER JOIN aulas ON  ordenadores.idaula=aulas.idaula WHERE ordenadores.idservidorrembo=".$idservidorrembo." order by aulas.idaula,ordenadores.nombreordenador";
100        $rs->Comando=&$cmd;
101        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
102        $rs->Primero();
103        while (!$rs->EOF){
104                if ($gidaula!=$rs->campos["idaula"]){
105                        if ($gidaula!="")
106                                $cadenaXML.='</AULA>';
107                        $cadenaXML.='<AULA ';
108                        // Atributos           
109                        $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
110                        $cadenaXML.=' infonodo="'.$rs->campos["nombreaula"].'"';
111                        $cadenaXML.='>';
112                        $gidaula=$rs->campos["idaula"];
113                }
114                // Visualiza los ordenadores de cada aula ( temporalmente desabilitado por rendimiento )
115                $cadenaXML.='<ORDENADOR';
116                // Atributos                   
117                $cadenaXML.=' imagenodo="../images/iconos/ordenador.gif"';
118                $cadenaXML.=' infonodo="'.$rs->campos["nombreordenador"].'"';
119                $cadenaXML.='></ORDENADOR>';
120                $rs->Siguiente();
121        }
122        if ($gidaula!="")
123                $cadenaXML.='</AULA>';
124        $rs->Cerrar();
125        return($cadenaXML);
126}
127?>
Note: See TracBrowser for help on using the repository browser.