Discussion :

[ddblu]

Bonjour,

J'utilise la fonction c-dessous sur ms access pour récupérer des photos d'un dossier externe ("\GrandePhotos\) et les inclure dans un état (EtatProformaAll_in) en fonction du nom d'un champ (LienImage.Value). J'aimerais que le champ LienImage renvoie vers toutes les occurences de photos existantes pour une catégorie. Par exemple pour le produit1, il y a 4 photos. produit1.jpg, produit1-2.jpg, produit1-3.jpg et produit1-4.jpg. Par conséquent j'aimerais que l'état imprime 4 pages. une pour chaque occurence de photo renvoyant à la même référence. Merci par avance de me dire c'est clair et surtout si techniquement c'est possible.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Function setImagePath()
  Dim strImagePath As String
  Dim strMDBPath As String
  Dim intSlashLoc As String
 
On Error GoTo PictureNotAvailable
 
 'Obtain the full path of the current database or Access Project
 strMDBPath = CurrentProject.Path & "\GrandePhotos\"
   'Find the location of the last backslash
intSlashLoc = InStrRev(strMDBPath, "\", Len(strMDBPath))
 
   'Trim off the database name, leaving the path and append the name of the image file
   strImagePath = Left(strMDBPath, intSlashLoc) & _
   Report_EtatProformaAll_in_Terms.LienImage.Value
 
   'Set ImageFrame to the path of the image file
   Report_EtatProformaAll_in_Terms.Image.Picture = strImagePath
   Exit Function

[ddblu]

Est ce que quelqu'un aurait une idée ?

[ddblu]

Est ce au moins possible ce que nous essayons de faire ?