OVH Cloud OVH Cloud

Envoyer un mail à partir d'Access

15 réponses
Avatar
AB
Bonjour,
Est-il possible, dans un formulaire dans lequel figure un champ "e-mail", de
faire unclic droit, et dans le menu contextuel qui s'ouvre, d'avoir une
ligne "envoyer un message", et d'ouvrir OE pour envoyer un message, avec
l'adresse qui s'inscrit automatiquement dans la rubrique "destinataire" ?
AB

5 réponses

1 2
Avatar
Raymond
Vu que c'est un bouton déclaré en hyperlink tu n'as pas besoin de la ligne:
HLK.Follow
supprime-la.

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"AB" a écrit dans le message de
news:%23$
Bonjour Raymond,
Cette fois, ça marche, mais j'ai encore un petit souci !
Lorsque je clique sur le bouton, OE s'ouvre, et je peux rédiger et envoyer
mon message : c'est nickel.
Le souci, c'est que cette manip ouvre DEUX instances d'OE, au lieu d'une
seule !
Pas dramatique, mais pour le moins curieux...
Si tu as une explication...(sachant que l'adresse mail est du simple
texte)

Bien noté ta remarque sur le nom Mail.
Cordialement,
André


Avatar
J-Pierre
Bon, je sais pas ce qui arrive au serveur de news, je réponds au message que j'ai posté à 17h50 et qui n'est pas encore publié....

Vous êtes d'accord, ce bouton, c'est très moche. On peut faire la même chose avec une zone de texte indépendante, et là, on est
vraiment libre pour la présentation.
Et puis, si la propriété Adresse lien hypertexte du bouton ou de la zone de texte est renseignée, le curseur se transforme en main.

Ca donne comme code (à placer à l'endroit adéquat):

If IsNull(Me.monAdresseEmail) then
me.maZoneDeTexte.HyperlinkAdress = ""
me.maZoneDeTexte.Caption = ""
Else
me.maZoneDeTexte.HyperlinkAdress = Me.monAdresseEmail
me.maZoneDeTexte.Caption = Me.monAdresseEmail
End If

Pas de différence sur l'évènement OnClick du bouton ou de la zone de texte, même code, comme Raymond il a dit

J-Pierre
Avatar
AB
Merci J-Pierre,
Effectivement, ton message n'est pas apparu : c'est un peu la m... depuis
quelque temps sur les news.
Du coup, j'ai suivi les conseils de Raymond, et c'est OK.
C'est vrai qu'on peut faire plus élégant, mais j'avoue que n'étant qu'un
très petit amateur sur Access, ça me convient parfaitement comme ça.
J'ai quand même entrevu les possibilités fantastiques de l'outil pour qui
sait, comme vous deux, le maîtriser.
Merci encore.
AB

J-Pierre wrote:
|| Bon, je sais pas ce qui arrive au serveur de news, je réponds au
|| message que j'ai posté à 17h50 et qui n'est pas encore publié....
||
|| Vous êtes d'accord, ce bouton, c'est très moche. On peut faire la
|| même chose avec une zone de texte indépendante, et là, on est
|| vraiment libre pour la présentation.
|| Et puis, si la propriété Adresse lien hypertexte du bouton ou de la
|| zone de texte est renseignée, le curseur se transforme en main.
||
|| Ca donne comme code (à placer à l'endroit adéquat):
||
|| If IsNull(Me.monAdresseEmail) then
|| me.maZoneDeTexte.HyperlinkAdress = ""
|| me.maZoneDeTexte.Caption = ""
|| Else
|| me.maZoneDeTexte.HyperlinkAdress = Me.monAdresseEmail
|| me.maZoneDeTexte.Caption = Me.monAdresseEmail
|| End If
||
|| Pas de différence sur l'évènement OnClick du bouton ou de la zone de
|| texte, même code, comme Raymond il a dit
||
|| J-Pierre
Avatar
J-Pierre
Non non, moi, je ne maîtrise rien, j'attends que Raymond publie du code, et après, je mets les enluminures......

J-Pierre
Avatar
AB
Certes, mais ça veut dire qu'au moins, tu comprends son code, ce qui est
loin d'être mon cas. Mais je me soigne...
A+
AB

J-Pierre wrote:
|| Non non, moi, je ne maîtrise rien, j'attends que Raymond publie du
|| code, et après, je mets les enluminures......
||
|| J-Pierre
1 2