* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * $Id$ * $Source$ */ require("./pre.inc.php3"); llxHeader(); $db = new Db(); $upload_dir = SOCIETE_DOCUMENT_DIR . "/" . $socid . "/"; function do_upload ($socid) { global $upload_dir; global $local_file, $error_msg; if (! is_dir($upload_dir)) { mkdir($upload_dir, 0755); } if (move_uploaded_file($_FILES['userfile']['tmp_name'], $upload_dir . $_FILES['userfile']['name'])) { print "Le fichier est valide, et a été téléchargé avec succès.\n"; //print_r($_FILES); } else { echo "Le fichier n'a pas été téléchargé"; // print_r($_FILES); } } if ( $error_msg ) { echo "$error_msg

"; } if ($action=='delete') { $file = $upload_dir . urldecode($urlfile); dol_delete_file($file); } if ( $sendit ) { do_upload ($socid); } /* * * Mode fiche * * */ if ($socid > 0) { $societe = new Societe($db, $socid); $sql = "SELECT s.idp, s.nom, ".$db->pdate("s.datec")." as dc, s.tel, s.fax, st.libelle as stcomm, s.fk_stcomm, s.url,s.address,s.cp,s.ville, s.note, t.libelle as typent, e.libelle as effectif, s.siren, s.prefix_comm, s.services,s.parent, s.description FROM llx_societe as s, c_stcomm as st, c_typent as t, c_effectif as e "; $sql .= " WHERE s.fk_stcomm=st.id AND s.fk_typent = t.id AND s.fk_effectif = e.id"; $result = $db->query($sql); if ($result) { $objsoc = $db->fetch_object(0); $dac = strftime("%Y-%m-%d %H:%M", time()); if ($errmesg) { print "$errmesg
"; } /* * */ print "\n"; print ""; print ""; print ""; print ""; print ""; print "

Documents associés à l'entreprise : $objsoc->nom

"; /* * * */ print "\n"; print "\n"; print "

"; print ""; print ""; print ""; print ""; print ""; print ""; print "

Type	$objsoc->typent	Effectif	$objsoc->effectif
Tel	$objsoc->tel	fax	$objsoc->fax
Ville	".nl2br($objsoc->address)." $objsoc->cp $objsoc->ville
siren	siren\">$objsoc->siren	prefix	"; if ($objsoc->prefix_comm) { print $objsoc->prefix_comm; } else { print "[idp&action=attribute_prefix\">Attribuer]"; } print "

"; /* * */ print "

"; echo ''; clearstatcache(); $handle=opendir($upload_dir); if ($handle) { print ''; while (($file = readdir($handle))!==false) { if (!is_dir($dir.$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS') { print '\n"; print ''; print ''; print '\n"; } } print "

'; echo ''.$file.''; print "

'.filesize($upload_dir."/".$file). ' bytes

'.strftime("%d %b %Y %H:%M:%S",filemtime($upload_dir."/".$file)).'

'; echo 'Delete'; print "

"; closedir($handle); } } else { print $db->error() . "
" . $sql; } } else { print "Erreur"; } $db->close(); llxFooter("Dernière modification $Date$ révision $Revision$"); ?>