Le Vendredi 27 Août 2004 14:22, Heurtaux Vincent a écrit :
> J'ouvre le csv avec OO.o1.1.1 sans problème. Sous mdk 10.0, je crois me
> souvenir que je n'ai pas pu mettre en marche les drivers ODCB, pour
> permettre à OO.o les conversions de... et vers MySql. A règler plus
> tard.
un bon petit script vaut mieux qu'un pilote qui marche pas
essaie avec ça (brut de fonderie..)
#!/usr/bin/perl
$file = "$ARGV[0]";
if (!$file){ print ("tu as oublié de donner le nom du fichier\n");}else{
open (FILE, "<$file") or die "impossible d'ouvrir $file : $!";
while (<FILE>)
{
my ($numero, $parution, $description, $page) = split ',', $_;
chomp($page);
$description=~ s/\'/\\'/g;
$description=~ s/\"//g;
print ("insert into magazines values
('$numero','$parution','$description','$page')\n");
}
}
@+
--
Marc BERLIOUX
Banquier : Homme secourable qui vous prête un parapluie quand il fait
beau, et qui vous le réclame dès qu'il commence à pleuvoir.
