OVH Cloud OVH Cloud

Ouvrir ou imprimer un fichier

3 réponses
Avatar
Gus
Bonjour,

J'aimerai pouvoir ouvrir un fichier ou l'imprimer. J'ai trouver une solution
avec la commande shell mais cela demande de connaitre le chemin
d'installation du programme à exécuter.

x = Shell("C:\PROGRA~1\toto.exe /p ""c:\temp\Monfichier.tot"")
x = Shell("C:\PROGRA~1\toto.exe ""c:\temp\Monfichier.tot"")

ou en utilisant fHandleFile (apiShellExecute) trouvé sur mvps.org, mais je
ne sais qu'ouvrir le fichier mais pas l'imprimer

x = fHandleFile("c:\temp\Monfichier.tot", WIN_NORMAL)

Auriez vous une solution à me proposer?

ps : Access 2000 et les fichiers à ouvrir sont de type excel, solidworks,
...

Merci

3 réponses

Avatar
Raymond
Bonjour.

un début de réponse peut-être:
http://access.seneque.free.fr/executer_selon_ext.htm qui donne une api pour
exécuter un fichier selon son extension, sans savoir où se trouve le
programme d'exécution.

pour les applications Office je te conseille de passer directement par
automation qui te permet en plus de gérer le document ouvert:
http://access.seneque.free.fr/impression.htm
http://access.seneque.free.fr/impression1.htm
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Gus" a écrit dans le message de
news:
Bonjour,

J'aimerai pouvoir ouvrir un fichier ou l'imprimer. J'ai trouver une
solution

avec la commande shell mais cela demande de connaitre le chemin
d'installation du programme à exécuter.

x = Shell("C:PROGRA~1toto.exe /p ""c:tempMonfichier.tot"")
x = Shell("C:PROGRA~1toto.exe ""c:tempMonfichier.tot"")

ou en utilisant fHandleFile (apiShellExecute) trouvé sur mvps.org, mais je
ne sais qu'ouvrir le fichier mais pas l'imprimer

x = fHandleFile("c:tempMonfichier.tot", WIN_NORMAL)

Auriez vous une solution à me proposer?

ps : Access 2000 et les fichiers à ouvrir sont de type excel, solidworks,
...

Merci




Avatar
Jessy SEMPERE
Bonjour

Perso je préfère utiliser l'automation...
une piste ici :
http://access.jessy.free.fr/index.html?Menu=7&Page=PrintFileExcel

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Gus" a écrit dans le message news:

Bonjour,

J'aimerai pouvoir ouvrir un fichier ou l'imprimer. J'ai trouver une
solution

avec la commande shell mais cela demande de connaitre le chemin
d'installation du programme à exécuter.

x = Shell("C:PROGRA~1toto.exe /p ""c:tempMonfichier.tot"")
x = Shell("C:PROGRA~1toto.exe ""c:tempMonfichier.tot"")

ou en utilisant fHandleFile (apiShellExecute) trouvé sur mvps.org, mais je
ne sais qu'ouvrir le fichier mais pas l'imprimer

x = fHandleFile("c:tempMonfichier.tot", WIN_NORMAL)

Auriez vous une solution à me proposer?

ps : Access 2000 et les fichiers à ouvrir sont de type excel, solidworks,
...

Merci




Avatar
Gus
Merci à Raymond et à Jessy .


"Gus" a écrit dans le message de
news:
Bonjour,

J'aimerai pouvoir ouvrir un fichier ou l'imprimer. J'ai trouver une
solution

avec la commande shell mais cela demande de connaitre le chemin
d'installation du programme à exécuter.

x = Shell("C:PROGRA~1toto.exe /p ""c:tempMonfichier.tot"")
x = Shell("C:PROGRA~1toto.exe ""c:tempMonfichier.tot"")

ou en utilisant fHandleFile (apiShellExecute) trouvé sur mvps.org, mais je
ne sais qu'ouvrir le fichier mais pas l'imprimer

x = fHandleFile("c:tempMonfichier.tot", WIN_NORMAL)

Auriez vous une solution à me proposer?

ps : Access 2000 et les fichiers à ouvrir sont de type excel, solidworks,
...

Merci