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
| $date = date("Y-m-d-H-i-s");
$Fichier = $date;
fopen("$Fichier.xls","w+");
$file = ("$Fichier.xls");
//on ouvre le fichier
if(!$myfile = fopen($file, "w+"))
{
print("erreur: ");
print("'$Fichier' n'existe pas!\n");
exit;
}
//====================================
// Traitement
//====================================
// on selectionne la base
mysql_select_db($sql_bdd,$db_link);
// on selectionne les enregistrements
$sql = "SELECT nom,prenom,ville,adresse,cp,telephone,portable,email,genre FROM contacts where ville like \"$ville2\" order by
nom";
$req = mysql_query($sql);
if(mysql_errno() != 0)
{
exit();
}
else
{
// on fait une boucle qui va faire un tour pour chaque enregistrement
$i=0;
$Nmax = 1000; // nombre par page
$Ncur = 0; // n° de la fiche courante
$Ndeb = 0; // 1ère fiche transmise par l'URL
if(isset($num))
$Ndeb=intval($num);
// tant qu'il y a des fiches
while(($data = mysql_fetch_array($req)) && ($Ncur<$Nmax+$Ndeb)) {
if($Ncur>=$Ndeb) {
$nom=$data['nom'];
$prenom=$data['prenom'];
$ville=$data['ville'];
$adresse=$data['adresse'];
$cp=$data['cp'];
$telephone=$data['telephone'];
$email=$data['email'];
$text = "<html><body>
<table border=\"1\" width=\"800\">
<tr>
<td width=\"50\" valign=\"top\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><b>$ville</b></font></td>
<td width=\"200\" valign=\"top\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$nom</font></td>
<td width=\"100\" valign=\"top\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$prenom</font></td>
<td valign=\"top\" width=\"450\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$adresse</font></td>
</tr>
<tr>
<td width=\"50\" valign=\"top\"></td>
<td width=\"200\" valign=\"top\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$cp</font></td>
<td width=\"100\" valign=\"top\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$telephone</font></td>
<td valign=\"top\" width=\"450\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">$email</font></td>
</tr>
</table></body></html>";
}
// une de plus
$Ncur++;
fwrite($myfile,$text,strlen($text));
}
}
//fermeture fichier
fclose($myfile); //on ferme le fichier
chmod ("$Fichier.xls", 0777); |
Partager