]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/attach.php
Arreglos varios de las noticias
[mecon/intranet.git] / sistema / www / attach.php
1 <?
2 /*
3   Este es el archivo que reemplaza a get_file de la herramienta vieja
4   No esta terminado por que mientras obtenga los datos de la vieja herramienta
5     no puedo leer directamente del directorio donde esta guardado
6 */
7 require_once '../../lib/mecondavdb.php';
8
9 $db = MEconDAVDB::Connect();
10 $sql = "SELECT mimetype, filename, size
11         FROM FilesForArticle
12         WHERE file_for_article_id = ".$_GET['numero'];
13 $row = $db->getRow($sql);
14 $mime = $row[0];
15 $filename = $row[1];
16 $size = $row[2];
17
18 header('Location Content-Type='.$mime);
19 header('Location Content-Disposition= attachment; filename='.$filename);
20 header('Location Pragma=no-cache');
21 header('Location Expires=0');
22 header('Location Content-Length='.$size);
23 ?>
24