source: admin/WebConsole/varios/consulta_programaciones.php @ 87a7a799

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 87a7a799 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: 1.8 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: Noviembre-2005
7// Nombre del fichero: consulta_programacion.php
8// Descripción :
9//              Muestra un calendario para elegir una fecha
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/comunes.php");
14include_once("../includes/CreaComando.php");
15//_________________________________________________________________________________________________________
16?>
17<HTML>
18<HEAD>
19        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
20<BODY>
21<?
22 // Toma parametros
23 $idprogramacion=0;
24 if (isset($_GET["idprogramacion"]))    $idprogramacion=$_GET["idprogramacion"];
25
26// Abre conexiones
27$cmd=CreaComando($cadenaconexion); // Crea objeto comando
28$rs=new Recordset; // Recupero acciones anidadas
29$cmd->texto="SELECT * FROM programaciones WHERE idprogramacion=".$idprogramacion;
30$rs->Comando=&$cmd;
31if (!$rs->Abrir()){ // Error al abrir recordset
32        $reporerr=$cmd->UltimoError();
33        $repordes=$cmd->DescripUltimoError();
34        echo '<SCRIPT language="javascript">';
35        echo '          window.parent.error_programacion('.$reporerr.',"'.$repordes.'")';
36        echo '</SCRIPT>';
37}
38else{
39        $cadena_campos=$rs->campos[0];
40        for($i=1;$i<$rs->numerodecampos;$i++)
41                $cadena_campos.=";".$rs->campos[$i]; // Usa el caracter ; para delimitar
42
43        echo '<SCRIPT language="javascript">';
44        echo '          window.parent.muestra_programacion("'.$cadena_campos.'")';
45        echo '</SCRIPT>';
46}
47$rs->Cerrar();
48?>
49</BODY>
50</HTML>
Note: See TracBrowser for help on using the repository browser.