Ouvrir une image dans l'aperçu d'image windaube?Résolu

Question

Salut &#224; tous,
J'ai int&#233;gr&#233; dans ma base de donn&#233;e Access un aper&#231;u d'image associ&#233; &#224; mes enregistrements. Comme ce n'est qu'un aper&#231;u, j'aimerai que l'utilisateur puisse cliquer sur l'image pour voir les images sur "l'aper&#231;u des images et t&#233;l&#233;copies Windows".
1e question: Quel est le nom de ce fouttu programme (pas moyen de le trouver!!)?
2e question: comment formule-t-on la commande shell qui va avec?
Merci d'avance du coup de main...

turlututuchapopointu · Accepted Answer

J'ai plac&#233; &#231;a dans le code de mon formulaire et j'ai une erreur (sans num&#233;ro!). Dois-je le placer ans un module?

michelxld · Answer

bonjour

j'espere que cet exemple pourra t'aider

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


Sub afficherImage_ApercuWindows()
'force l'affichage de l'image avec "L'aper&#231;u des images et des t&#233;l&#233;copies windows".
Dim Img As String


Img = "C:\Documents and Settings\michel\dossier\LeChat.bmp" 'adapter le chemin
ShellExecute 0, "open", "rundll32.exe", "C:\WINDOWS\System32\shimgvw.dll,ImageView_Fullscreen " & Img, 0, 1
End Sub

bonne soiree
michel

michelxld · Answer

rebonjour 

oui tu peux placer la procedure dans un module

bonne soiree
michel