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
| <?php
function xls2kml($xls,$kml)
{
// Pas de paramétres requis
$empty = new VARIANT();
/* Supression du kml si il existe */
if(file_exists ($kml))
@unlink($kml);
echo "kiki";
/* Démarrage de excel */
$w = new COM("excel.application") or die("Impossible d'instancier l'application excel");
/* Test de excel 2007 */
if($w->Version > 11)
{
/* Amener excel devant */
$w->Visible = 1;
/* Test du fichier */
if(file_exists ($xls))
$w->Documents->Open($xls);
else
return false;
/* Quelques commandes */
$w->Documents[1]->SaveAs($kml,17);
/* Fermeture de excel */
$xls->Documents[1]->Close(false);
}
$w->Quit($empty,$empty,$empty);
/* Libération des ressources */
$w = null;
unset($w);
/* Test du fichier */
if(file_exists ($kml))
return true;
else
return false;
}
?> |
Partager