Bonjour à toutes et à tous,

Je une application Web faite en Perl. Il y a un module de génération d'un fichier Excel au format XLS. Pour cela on utilise le module Spreadsheet-WriteExcel-1.01. J'essaie de générer ce même fichier Excel mais au format XLSX.
Au niveau de mon module, actuellement, il y a le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
print "Content-type: application/vnd.ms-excel\n";
print "Content-Disposition: ; filename=$descr - Récap.xls\n";
print "\n";
Pour la génération au format XLSX j'ai fais le changement suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
print "Content-type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet\n";
print "Content-Disposition: attachment;Filename=$descr-Récap.xls\n";
print "\n";
Au moment de l'ouverture du fichier Excel, j'obtiens un message d'erreur qui dit :
"Impossible d'ouvrir le fichier <Nom du fichier.xlsx car son format ou son extension n'est pas valide".
La génération au format XLS marche sans problème.
J'utilise ActivePerl 5.8.7 Build 813 et le module Spreadsheet-WriteExcel-1.01.
Est-ce que vous pouvez me dire, s'il vous plait, d'où vient ce problème ?

Cordialement
Dimitri.