]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/noticias.php
Se agregan imagenes para pruebas.
[mecon/intranet.git] / sistema / www / noticias.php
1 <?
2   require_once '../local_lib/HTML_DietMarco.php';
3   require_once '../local_lib/intranetdb.php';
4   require_once 'MECON/HTML/Arbol/ArbolDB.php';
5   require_once '../local_lib/HTML_Titulares.php';
6
7   $m = new HTML_DietMarco('noticias');
8   $m->addTitle('Noticias');
9   
10   $noticias = new HTML_Table(array('width' => '760', 'border' => '0'));
11   //Esto va a cambiar...
12   $db = IntranetDB::connect();
13   $dbdata = array(
14                 'db' => $db,
15                 'tabla' => 'grupo_secciones',
16                 'id' => 'grupo',
17                 'nombre' => 'nombre',
18                 'id_padre' => 'grupo_padre',
19                 'prepend_link' => 'noticias.php?grupo=');
20   $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
21
22   $grupo = null;
23   if(isset($_GET['grupo']))
24     $grupo = $_GET['grupo'];
25   $titulares = new HTML_Titulares($grupo, 7);
26   $noticias->addRow(array($arbol,$titulares));
27   $noticias->updateCellAttributes(0, 0, array('valign'=>'top', 'width'=>'160'));
28   $noticias->updateCellAttributes(0, 1, array('width'=>'600'));
29
30   $m->addBodyContent($noticias);
31   $m->display();
32 ?>