]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/noticias.php
Abstraccion de los titulares en el objeto HTML_Titulares
[mecon/intranet.git] / sistema / www / noticias.php
1 <body bgcolor="#FFFFFF" class="subtitulo" link="#003366" vlink="#660066" alink="#0066FF" topmargin="0">
2 <?
3   require_once '../local_lib/copete.php';
4   $c = new Copete('noticias');
5   $c->display();
6   $noticias = new HTML_Table(array('width' => '760', 'border' => '0'));
7   require_once '../local_lib/intranetdb.php';
8   require_once 'MECON/HTML/Arbol/ArbolDB.php';
9   $db = IntranetDB::connect();
10   $dbdata = array(
11                 'db' => $db,
12                 'tabla' => 'grupo_secciones',
13                 'id' => 'grupo',
14                 'nombre' => 'nombre',
15                 'id_padre' => 'grupo_padre',
16                 'prepend_link' => 'noticias.php?grupo=');
17   $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
18
19   require_once '../local_lib/HTML_Titulares.php';
20   $titulares = new HTML_Titulares(null, 7);
21   $noticias->addRow(array($arbol,$titulares));
22   $noticias->updateCellAttributes(0, 0, array('valign'=>'top', 'width'=>'160'));
23   $noticias->updateCellAttributes(0, 1, array('width'=>'600'));
24   $noticias->display();
25 ?>
26 </body>