[PDF] Probleme dans le feuilleteur
Bonjour j'arrive à récupérer les pages pdf souhaités mais lorsque je souhaite les enregistrez en un seul pdf sa marche sa écrase les pages précédente ainsi de suite
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
<?php
require_once('fpdf.php');
require_once('fpdi.php');
mkdir("Loisirs", 0700);
echo "Entrez votre chemin : ";
$dir_nom=trim (fgets(STDIN));
echo "Votre chemin est $dir_nom \n";
function ScanDirectory($dir_nom){
$dir = opendir($dir_nom) or die('Erreur de listage : le répertoire n\'existe pas');
$fichier= array();
$dossier= array();
while($element = readdir($dir)) {
if($element != '.' && $element != '..'){
if (!is_dir($dir_nom.'/'.$element)){
if(substr($element,-4,4)==".pdf"){
// on ne met que du PDF
$fichier[] = $element;
}
}else {$dossier[] = $element;}
}
}
closedir($dir);
if(!empty($dossier)){
sort($dossier);
//echo "Liste des dossier disponible dans $dir_nom : \n\n";
foreach($dossier as $lien){
ScanDirectory("$dir_nom\\$lien");
}
}
if(!empty($fichier)){
sort($fichier);
//echo "Liste des fichiers/documents accessibles dans '$dir_nom' : \n\n";
foreach($fichier as $lien) {
Recup_caractere($lien,$dir_nom);
}
}
}
ScanDirectory($dir_nom);
?>
<?php
function Recup_caractere($chaine,&$dir_nom){
if(substr_count($chaine,'LOISIRS-4') != 0||
substr_count($chaine,'LOISIRS_GARD-4') != 0){
Copy_PDF($chaine,$dir_nom);
}
}
?>
<?php
function Copy_PDF($chaine,&$dir_nom){
$pdf = new FPDI();
$file = "$dir_nom\\".$chaine;
$pdf->setSourceFile($file);
$import = $pdf->importPage(1);
$taille = $pdf->getTemplatesize($import);
$pdf->addPage('P', array($taille['w'], $taille['h']));
$pdf->useTemplate($import);
$pdf->SetDisplayMode('fullpage');
$pdf->Output("Loisirs\\".'Les_balade_du_languedoc.pdf', 'F');
$pdf->close();
}
?> |
