]> git.llucax.com Git - mecon/intranet.git/blobdiff - sistema/www/sistemas.php
Correcciones en los style sheets
[mecon/intranet.git] / sistema / www / sistemas.php
index 3897cfc4d2925a1da543e1e51361750160109195..2ec1d8abae8bed95660013e576473c65fec8e8e0 100644 (file)
@@ -1,7 +1,19 @@
-<body bgcolor="#FFFFFF" class="subtitulo" link="#003366" vlink="#660066" alink="#0066FF" topmargin="0">
 <?
-  require_once '../local_lib/copete.php';
-  $c = new Copete('sistemas');
-  echo $c->toHTML();
+  require_once '../local_lib/HTML_DietMarco.php';
+  require_once '../local_lib/intranetdb.php';
+  require_once 'MECON/HTML/Arbol/ArbolDB.php';
+  $m = new HTML_DietMarco('sistemas');
+  $m->addTitle('Sistemas');
+  
+  $db = IntranetDB::connect();
+  $dbdata = array(
+       'db' => $db,
+       'tabla' => 'sistema',
+       'id' => 'sistema',
+       'nombre' => 'sistema',
+       'link' => 'link');
+  $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
+  
+  $m->addBodyContent($arbol);
+  $m->display();
 ?>
-</body>