source: admin/WebConsole/gestores/gestor_perfilcomponente_hard.php @ dc00c0f

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 dc00c0f was a6b881e, checked in by alonso <alonso@…>, 15 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: 3.0 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: gestor_perfilcomponente_hard.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de perfileshard_hardwares
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/opciones.php");
15//________________________________________________________________________________________________________
16$opcion=0; // Inicializa parametros
17$idperfilhard=0;
18$idhardware=0;
19
20if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
21if (isset($_GET["idperfilhard"])) $idperfilhard=$_GET["idperfilhard"];
22if (isset($_GET["idhardware"])) $idhardware=$_GET["idhardware"];
23
24$cmd=CreaComando($cadenaconexion); // Crea objeto comando
25$resul=false;
26if ($cmd){
27        $resul=Gestiona();
28        $cmd->Conexion->Cerrar();
29}
30//________________________________________________________________________________________________________
31?>
32<HTML>
33<HEAD>
34        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
35<BODY>
36<?
37$literal="";
38switch($opcion){
39        case $op_alta :
40                $literal="resultado_insertar_perfilcomponente_hard";
41                break;
42        case $op_eliminacion :
43                $literal="resultado_eliminar_perfilcomponente_hard";
44                break;
45        default:
46                break;
47}
48if ($resul){
49        echo '<SCRIPT language="javascript">'.chr(13);
50        if ($opcion==$op_alta )
51                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idhardware.");".chr(13);
52        else
53                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idhardware.");".chr(13);
54        echo '</SCRIPT>';
55}
56else{
57        echo '<SCRIPT language="javascript">';
58        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idhardware.")";
59        echo '</SCRIPT>';
60}
61?>
62</BODY>
63</HTML>
64<?
65// *************************************************************************************************************************************************
66function Gestiona(){
67        global  $cmd;
68        global  $opcion;
69        global  $idperfilhard;
70        global  $idhardware;
71        global   $urlimgth;
72        global  $op_alta;
73        global  $op_eliminacion;
74
75        $cmd->CreaParametro("@idperfilhard",$idperfilhard,1);
76        $cmd->CreaParametro("@idhardware",$idhardware,1);
77
78        switch($opcion){
79                case $op_alta :
80                        $cmd->texto="INSERT INTO perfileshard_hardwares (idperfilhard,idhardware) VALUES (@idperfilhard,@idhardware)";
81                        $resul=$cmd->Ejecutar();
82                        break;
83                case $op_eliminacion :
84                        $cmd->texto='DELETE  FROM perfileshard_hardwares WHERE idperfilhard='.$idperfilhard.' AND idhardware='.$idhardware;
85                        $resul=$cmd->Ejecutar();
86                        break;
87                default:
88                        break;
89        }
90        return($resul);
91}
92?>
Note: See TracBrowser for help on using the repository browser.