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