Ouverture de fichiers Excel et PDf avec Tcl Tk

Question

Je rencontre des problèmes pour ouvrir un fichier Excel existant avec Tcl Tk. Je suis capable d'ouvrir un fichier MS Word existant sans aucun problème. Le code que j’utilise est le suivant: mon application de test contient également le "package require tcom". inclus:

proc OpenFile {} {
#Path to file
set app [::tcom::ref getobject "C:\\Users\\Me\\Desktop\\Test.doc"] 
#Change path to application
set this [$app Application]
#Open application
$this Visible 1
}

Ce code est exécuté par un bouton. En fait, Test.doc s’ouvre lorsque vous appuyez sur le bouton.

J'ai essayé de remplacer le fichier par un fichier Excel existant. Lorsque j'appuie sur le bouton, le fichier s'ouvre pendant une fraction de seconde, puis se ferme. Cela se produit également avec les fichiers MS Access.

Quelqu'un sait-il comment ouvrir un fichier Excel existant avec Tcl Tk et le maintenir ouvert? De plus, pour les fichiers PDF et les fichiers texte, je comprends que je ne peux pas utiliser Tcom pour ouvrir ces fichiers. Est-ce que quelqu'un sait comment ouvrir des PDF, du texte et d'autres fichiers non-MS avec Tcl Tk?

J'apprécie vraiment votre aide!

Merci,

DFM

Answer 1

En supposant que vous soyez sous Windows et que vous souhaitiez simplement ouvrir un fichier (.xls, .pdf, ...) avec son application habituelle (c’est-à-dire ne pas modifier le fichier à partir de votre script), vous pouvez simplement utiliser le bouton "Démarrer". ; comme ceci:

set TestDoc "My Test.xls"
eval exec [auto_execok start \"\" [list $TestDoc]