Discussion :

[tototwin]

Bonjour à tous,

Dans un formulaire j'aimerai obtenir ceci :

Coller une image du presse papier dans un champ, et que sur un déclenchement cette image soit enregistrée au format jpg dans un dossier désigné sous un nom défini dans un champ texte indépendant.

Voilà tout tient dans une phrase mais alors pour moi quel casse-tête !

J'ai créé un champ objet ole indépendant pour coller l'image, ça fonctionne.
Et j'ai essayé avec ce code :

Code :

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

DoCmd.OutputTo acOutputForms, Forms!NomDuForm.ChampOleIndependant, acformatjpg, "C:\CheminDacces\essai.jpg"

Est-ce que je suis complètement à coté de mes pompes ? J'imagine que c'est faisable.

Merci à vous, par avance.

[tototwin]

Bonjour,

J'ai beau chercher je ne trouve pas.

J'ai trouvé ce code qui m'a donné de l'espoir :

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
Private Sub CmdExportJPG_Click()
 
    Dim oleGrf As Object
 
    Dim strFileName As String
 
    Set oleGrf = Me!MonGraphique.Object
 
    strFileName = "C:\Mes Documents\MonGraphique.jpg"
 
    oleGrf.export FileName:=strFileName
 
    Set oleGrf = Nothing
 
End Sub

Il fonctionne sur un champs graphique, mais je n'arrive pas à le faire fonctionner sur un objet ole indépendant.

Quelqu'un aurait une idée ?

[tototwin]

Je vais reformuler ma question :

Est-il possible d'exporter l'image contenue dans un formulaire dans un format image ? Et de la sauvergarder sur un disque quelconque Access sait-il faire ça ?

Merci