Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

integration auto d'images dans access depuis le net

2 réponses
Avatar
edouard muller
bonjour,

Private Sub Commande76_Click()
Lien = "http://194.2.120.77/ImagesCinefil/AffichePetitFormat/" &
Me.RefCinefil & ".jpeg"
Me.Affiche.LoadPicture (Lien)
'Application.FollowHyperlink Lien
End Sub

Cette procedure ne fonctionne pas. Le lien est correct et Followhyperlink
fonctionne
Existe t il une autre commande que 'LoadPicture' ?
Le but de la manoeuvre est d'integrer automatiquement l'image dans un onjet
OLE sans copier/coller

Merci d'avance

2 réponses

Avatar
Gafish
Bonjour,

Et si tu passes par là :
http://access.seneque.free.fr/images.htm
au lieu d'OLE, ca peut marcher et te convenir.

Arnaud

"edouard muller" a écrit dans le
message news:
bonjour,

Private Sub Commande76_Click()
Lien = "http://194.2.120.77/ImagesCinefil/AffichePetitFormat/" &
Me.RefCinefil & ".jpeg"
Me.Affiche.LoadPicture (Lien)
'Application.FollowHyperlink Lien
End Sub

Cette procedure ne fonctionne pas. Le lien est correct et Followhyperlink
fonctionne
Existe t il une autre commande que 'LoadPicture' ?
Le but de la manoeuvre est d'integrer automatiquement l'image dans un
onjet

OLE sans copier/coller

Merci d'avance


Avatar
Raymond [mvp]
Bonjour.

ça ne convient pas du tout pour aller chercher une image sur le net et la
placer dans un objet.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Gafish" a écrit dans le message de news:

Bonjour,

Et si tu passes par là :
http://access.seneque.free.fr/images.htm
au lieu d'OLE, ca peut marcher et te convenir.

Arnaud