source: admin/WebConsole/propiedades/propiedades_servidoresdhcp.php @ 10023eb

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 10023eb was b0dc2e4, checked in by alonso <alonso@…>, 16 years ago

git-svn-id: https://opengnsys.es/svn/trunk@489 a21b9725-9963-47de-94b9-378ad31fedc9

  • Property mode set to 100644
File size: 6.4 KB
Line 
1<? 
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
5// Fecha Creación: Año 2003-2004
6// Fecha Última modificación: Marzo-2005
7// Nombre del fichero: propiedades_servidoresdhcp.php
8// Descripción :
9//               Presenta el formulario de captura de datos de un servidor dhcp para insertar,modificar y eliminar
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../includes/opciones.php");
13include_once("../includes/CreaComando.php");
14include_once("../clases/AdoPhp.php");
15include_once("../idiomas/php/".$idioma."/propiedades_servidoresdhcp_".$idioma.".php");
16//________________________________________________________________________________________________________
17$opcion=0;
18$opciones=array($TbMsg[0],$TbMsg[1],$TbMsg[2],$TbMsg[3]);
19//________________________________________________________________________________________________________
20$idservidordhcp=0;
21$nombreservidordhcp="";
22$ip="";
23$grupoid=0;
24$comentarios="";
25$ordenadores=0; // Número de ordenador a los que da servicio
26
27if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
28if (isset($_GET["idservidordhcp"])) $idservidordhcp=$_GET["idservidordhcp"];
29if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"];
30if (isset($_GET["identificador"])) $idservidordhcp=$_GET["identificador"];
31//________________________________________________________________________________________________________
32$cmd=CreaComando($cadenaconexion); // Crea objeto comando
33if (!$cmd)
34        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
35if  ($opcion!=$op_alta){
36        $resul=TomaPropiedades($cmd,$idservidordhcp);
37        if (!$resul)
38                Header('Location: '.$pagerror.'?herror=3'); // Error de recuperación de datos.
39}
40//________________________________________________________________________________________________________
41?>
42<HTML>
43<TITLE>Administración web de aulas</TITLE>
44<HEAD>
45        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
46        <SCRIPT language="javascript" src="../jscripts/propiedades_servidoresdhcp.js"></SCRIPT>
47        <SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
48        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/propiedades_servidoresdhcp_'.$idioma.'.js"></SCRIPT>'?>
49</HEAD>
50<BODY>
51<DIV  align=center>
52<FORM name="fdatos"> 
53        <INPUT type=hidden name=idservidordhcp value=<?=$idservidordhcp?>>
54        <INPUT type=hidden name=grupoid value=<?=$grupoid?>>
55        <INPUT type=hidden name=ordenadores value=<?=$ordenadores?>>
56        <P align=center class=cabeceras><?echo $TbMsg[4]?><BR>
57        <SPAN align=center class=subcabeceras><? echo $opciones[$opcion]?></SPAN></P>
58        <TABLE  align=center border=0 cellPadding=1 cellSpacing=1 class=tabla_datos >
59<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
60                <TR>
61                        <TH align=center>&nbsp;<?echo $TbMsg[5]?>&nbsp;</TD>
62                        <?
63                                if ($opcion==$op_eliminacion)
64                                        echo '<TD>'.$nombreservidordhcp.'</TD>';
65                                else   
66                                        echo '<TD><INPUT  class="formulariodatos" name=nombreservidordhcp style="width:200" type=text value="'.$nombreservidordhcp.'"></TD>';
67                        ?>
68                        <TD colspan=2 valign=top align=left rowspan=3><CENTER><IMG border=3 style="border-color:#63676b" src="../images/aula.jpg"><BR>&nbsp;Ordenadores:&nbsp;<? echo $ordenadores?></CENTER></TD>
69                </TR>
70<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
71                <TR>
72                        <TH align=center>&nbsp;<?echo $TbMsg[6]?>&nbsp;</TD>
73                        <?
74                        if ($opcion==$op_eliminacion)
75                                        echo '<TD>'.$ip.'</TD>';
76                        else   
77                                echo'<TD><INPUT  class="formulariodatos" name=ip type=text style="width:200" value="'.$ip.'"></TD>';
78                        ?>
79                </TR>
80<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
81                <TR>
82                        <TH align=center>&nbsp;<?echo $TbMsg[7]?>&nbsp;</TD>
83                        <?
84                        if ($opcion==$op_eliminacion)
85                                        echo '<TD>'.$comentarios.'</TD>';
86                        else   
87                                echo '<TD><TEXTAREA   class="formulariodatos" name=comentarios rows=2 cols=50>'.$comentarios.'</TEXTAREA></TD>';
88                        ?>
89                </TR>   
90<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
91        </TABLE>
92</FORM>
93</DIV>
94<?
95//________________________________________________________________________________________________________
96include_once("../includes/opcionesbotonesop.php");
97//________________________________________________________________________________________________________
98//________________________________________________________________________________________________________
99include_once("../includes/iframecomun.php");
100//________________________________________________________________________________________________________
101?>
102</BODY>
103</HTML>
104<?
105//________________________________________________________________________________________________________
106//      Recupera los datos de un servidor dhcp
107//              Parametros:
108//              - cmd: Una comando ya operativo (con conexión abierta) 
109//              - id: El identificador del servidor
110//________________________________________________________________________________________________________
111function TomaPropiedades($cmd,$id){
112        global $nombreservidordhcp;
113        global $ip;
114        global $comentarios;
115        global $ordenadores;
116
117        $rs=new Recordset;
118        $cmd->texto="SELECT * FROM servidoresdhcp WHERE idservidordhcp=".$id;
119        $rs->Comando=&$cmd;
120        if (!$rs->Abrir()) return(0); // Error al abrir recordset
121        $rs->Primero();
122        if (!$rs->EOF){
123                $nombreservidordhcp=$rs->campos["nombreservidordhcp"];
124                $ip=$rs->campos["ip"];
125                $comentarios=$rs->campos["comentarios"];
126                $rs->Cerrar();
127                $cmd->texto="SELECT count(*) as numordenadores FROM ordenadores WHERE idservidordhcp=".$id;
128                $rs->Comando=&$cmd;
129                if (!$rs->Abrir()) return(0); // Error al abrir recordset
130                $rs->Primero();
131                if (!$rs->EOF)
132                        $ordenadores=$rs->campos["numordenadores"];
133                $rs->Cerrar();
134                return(true);
135        }
136        else
137                return(false);
138}
139?>
Note: See TracBrowser for help on using the repository browser.