close Warning: Failed to sync with repository "ogBrowser-Git": (1366, "Incorrect string value: '\\xF0\\x9F\\x93\\xA6 I...' for column 'message' at row 1"); repository information may be out of date. Look in the Trac log for more information including mitigation strategies.

source: admin/WebConsole/gestores/gestor_entornos.php @ 5792125

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 5792125 was 3ec149c, checked in by alonso <alonso@…>, 15 years ago

git-svn-id: https://opengnsys.es/svn/trunk@1314 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 2.9 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 2009-2010
6// Fecha Última modificación: Agosto-2010
7// Nombre del fichero: gestor_entornos.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de entornos
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/opciones.php");
15//________________________________________________________________________________________________________
16
17$identorno=0;
18
19$ipserveradm="";
20$portserveradm=0;
21$protoclonacion="";
22
23
24if (isset($_POST["ipserveradm"])) $ipserveradm=$_POST["ipserveradm"];
25if (isset($_POST["portserveradm"])) $portserveradm=$_POST["portserveradm"];
26if (isset($_POST["protoclonacion"])) $protoclonacion=$_POST["protoclonacion"];
27
28$tablanodo=""; // Arbol para nodos insertados
29$cmd=CreaComando($cadenaconexion); // Crea objeto comando
30$resul=false;
31if ($cmd){
32        $resul=Gestiona();
33        $cmd->Conexion->Cerrar();
34}
35// *************************************************************************************************************************************************
36?>
37<HTML>
38<HEAD>
39        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
40<BODY>
41        <SCRIPT language="javascript" src="../jscripts/propiedades_entornos.js"></SCRIPT>
42        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comunes_'.$idioma.'.js"></SCRIPT>'?>
43       
44<?
45
46$literal="resultado_modificar_entornos";
47
48
49if ($resul){
50        echo '<SCRIPT language="javascript">'.chr(13);
51        echo $literal."(1,'".$cmd->DescripUltimoError()." ',".$identorno.");".chr(13);
52        echo '</SCRIPT>';
53}
54else{
55        echo '<SCRIPT language="javascript">';
56        echo $literal."(0,'".$cmd->DescripUltimoError()."',".$identorno.")";
57        echo '</SCRIPT>';
58}
59
60?>
61</BODY>
62</HTML>
63<?
64/**************************************************************************************************************************************************
65        Inserta, modifica o elimina datos en la tabla entornos
66________________________________________________________________________________________________________*/
67function Gestiona()
68{
69        global  $cmd;
70
71        global  $identorno;
72        global  $ipserveradm;
73        global  $portserveradm;
74        global  $protoclonacion;
75
76
77        $cmd->CreaParametro("@identorno",$identorno,1);
78        $cmd->CreaParametro("@ipserveradm",$ipserveradm,0);
79        $cmd->CreaParametro("@portserveradm",$portserveradm,1);
80        $cmd->CreaParametro("@protoclonacion",$protoclonacion,0);
81
82        $cmd->texto="UPDATE entornos SET ipserveradm=@ipserveradm,portserveradm=@portserveradm,protoclonacion=@protoclonacion";
83        $resul=$cmd->Ejecutar();
84        return($resul);
85}
86?>
Note: See TracBrowser for help on using the repository browser.