Discussion :

[nico84]

Bonjour,

Voici ce que je cherche à faire :
J'ai une liste de problèmes et pour chaque problème une liste de noms de fichiers d'images (les photos du problème)
Les photos sont toutes stockées sur un même répertoire du disque

table1 : reserves - champs : ID_res, date_creation, description
table2 : photos - champs : ID_photo, ID_res, fichier

Je voudrais imprimer (en pdf avec pdfcreator) la liste de tous les problèmes avec pour chaque problème ses photos

Il est relativement facile de faire l'état qui imprime la liste des réserves et le nom des photos mais je n'ai pas idée comment remplacer le nom du fichier par la photo elle-même ???

Merci d'avance pour votre aide

PS : j'ai trouvé sur un forum l'expression

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

printer.paintpicture

qui permet d'imprimer sans passer par un état (?) mais il semble que ce soit du VB et pas du VBA !?

[marsouin_89]

Bonjour Nico,

Il te faut ajouter un contrôle image, que tu nomme Img1 par exemple, et sur formatage de la section détail de l'état, tu ajoutes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If Dir(Chemin_du_Fichier)<>"" then 'Si le fichier existe
me.Img1.Picture=Chemin_du_Fichier'On télécharge le fichier
else'Sinon
me.Img1.picture=""'L'image est vide
endif

Pour te faciliter la tache, il est préférable que tes photos soient stockées dans le même répertoire que ta base de données.
Ce qui donne comme chemin du fichier :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim Chemin_du_Fichieras string
Chemin_du_Fichier=CurrentProject.Path & "\Repertoire_Photo\Probleme1.jpg"

En espérant t'avoir aidé

Cordialement

Christophe

[nico84]

Parfait merci beaucoup

Je me préparais à l'idée de le faire à la main avec excel

Je vais essayer de modifier ma requête pour mettre 2 images cote à cote

[Jeannot45]

Pour compléter ton information sur la gestion des images sous Access, je te conseille vivement la lecture du tuto de Caféine.

Bonne continuation

[nico84]

Bonjour,

J'avais commencé par ça
Mais il n'y a rien sur les éditions...

[yoyo88]

super info.

C'est justement se qui me manquais.

Merci bien!