Abrir archivos Excel y PDf con Tcl Tk

Question

Tengo problemas para abrir un archivo Excel existente con Tcl Tk. Puedo abrir un archivo existente de MS Word sin problemas. El código que estoy usando es el siguiente, también mi aplicación de prueba tiene "paquete requiere tcom" incluido:

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
}

Este código se ejecuta mediante un botón. Básicamente, Test.doc se abre después de presionar el botón.

Intenté cambiar el archivo a un archivo Excel existente, y cuando presiono el botón, el archivo se abre por una fracción de segundo y luego se cierra. Esto también sucede con los archivos de MS Access, también.

¿Alguien sabe cómo abrir un archivo Excel existente con Tcl Tk y hacer que permanezca abierto? Además, para archivos PDF y archivos de texto, entiendo que no puedo usar Tcom para abrir estos archivos. ¿Alguien sabe cómo abrir archivos PDF, de texto y otros archivos que no sean MS con Tcl Tk?

¡Realmente aprecio tu ayuda!

Gracias,

DFM

Answer 1

Suponiendo que está en Windows y solo desea abrir un archivo (.xls, .pdf, ...) con su aplicación habitual (es decir, sin modificar el archivo desde su secuencia de comandos), puede usar " start " ; así:

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