source: admin/WebConsole/varios/informacion_servidorrembo.php @ 81e9ef3

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 81e9ef3 was a6b881e, checked in by alonso <alonso@…>, 16 years ago

primeros archivos de administración

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