Quelle application dans le code pour ouvrir Win Picture & Fax Viewer

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Quelle application dans le code pour ouvrir Win Picture & Fax Viewer

Berg1910

Bonjour,

Dans une base Access je stocke des chemins d'accès à des fichiers que je souhaite ouvrir (autre formulaire) via un bouton. Pas de problème quant aux fichiers excel et word mais je ne sais pas quoi mettre pour ouvrir les images avec Windows Picture and Fax Viewer! Le code que j'utilise pour excel et word ressemble à ça:

Dim objGraph As Object

Set objGraph = CreateObject("XXX.Application" )
objGraph.XXX.Open FileName:=XXX
objGraph.Visible = True

QUESTIONS:
Que faut-il mettre à la place des XXX?
Est-ce la meilleure façon de faire?
Quel application utiliser si Windows Picture Viewer ne fonctionne pas?

Merci de vos réponses.

---------------
Il est souvent nécessaire d'entreprendre pour espérer et de persévérer pour réussir.

Publicité

olivthill

Une application permettant de voir des images et pouvant s'interfacer par le moyen d'activeX est Internet Explorer. Donc, essayer :

Code :

Dim objGraph As Object
Set objGraph = CreateObject("InternetExplorer.Application" )
objGraph.Navigate("xxxx" )
objGraph.Visible = True

Je ne sais pas si Open marche avec IE, donc je l'ai remplacé par Navigate.

Berg1910

Hello!
Ca fonctionne mais l'image est un peu déformé.
Ca fera l'affaire quand même, merci.

---------------
Il est souvent nécessaire d'entreprendre pour espérer et de persévérer pour réussir.

otobox

Maison fondée en 2005

Sous Access 97, pour ouvrir un fichier avec l'appli par défaut, quelque soit son extension, j'utilise cette fonction :

Code :

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

(elle est à placer en tête de module où est le bouton qui déclenche l'évènement)

Ensuite, dans la procédure du bouton tu mets :

Code :

ShellExecute Me.hwnd, vbNullString, txtURL, "", vbNullString, 1

Le txtURL étant la variable définissant le chemin complet du fichier que tu veux ouvrir.

---------------
OtObOxBlOg - - - Etre seul à avoir tort c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Quelle application dans le code pour ouvrir Win Picture & Fax Viewer

Sujets relatifs
Flash CS3 et CS4 dans application C++	Problème code javascript
Reprise du code de Supercopier	[WORD/code champ] modifier nombre de pages d'un doc
JFileChooser & Ouvrir un ficher avec son extension	[JS ] Conflit ***.js avec prototype.js
Problème de cryptage code source	Ouvrir lightbox au chargement d'une page
Accès Application Web Java
Plus de sujets relatifs à : Quelle application dans le code pour ouvrir Win Picture & Fax Viewer

Page générée en 0.060 secondes