OVH Cloud OVH Cloud

Mailto

5 réponses
Avatar
zulutango07
Bonjour,
Dans un formulaire j'ai une zone de texte contenant une=20
adresse Email. Je voudrai en cliquant sur cette adresse=20
envoyer un mail =E0 cette personne. O=F9 et comment r=E9alise-t-
on le lien hypertexte comportant "Mailto :" ?
J'ai essay=E9 la procedure
Dim e_mail As New RS_Office
e_mail.Outlook_Message "adresse@wanadoo.fr", "le=20
sujet", "Ci-dessous message de " & "M. Untel" & ",=20
du " & Now & vbCrLf & "Mon message"
Set e_mail =3D Nothing
C=E0 bloque sur Dim e_mail As New RS_Office

J'ai une erreur de compilation "Type d=E9fini par=20
l'utilisateur non d=E9fini". Je pense que c'est une erreur=20
de d=E9claration. O=F9 doit-on faire les d=E9clarations ?
MERCI

5 réponses

Avatar
Raymond
Bonjour.

c'est une erreur de déclaration, il faut cocher le fichier dans VBE.

Il existe d'autres versions sur mon site plus interessantes et sans
librairies.
lis la page: http://access.seneque.free.fr/envoi_message.htm

dans ce cas tu n'as pas besoin d'indiquer mailto: dans ton champ.
il faut cocher la référence microsoft outlook.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"zulutango07" a écrit dans le message de
news:081101c37b88$7987fdb0$
Bonjour,
Dans un formulaire j'ai une zone de texte contenant une
adresse Email. Je voudrai en cliquant sur cette adresse
envoyer un mail à cette personne. Où et comment réalise-t-
on le lien hypertexte comportant "Mailto :" ?
J'ai essayé la procedure
Dim e_mail As New RS_Office
e_mail.Outlook_Message "", "le
sujet", "Ci-dessous message de " & "M. Untel" & ",
du " & Now & vbCrLf & "Mon message"
Set e_mail = Nothing
Cà bloque sur Dim e_mail As New RS_Office

J'ai une erreur de compilation "Type défini par
l'utilisateur non défini". Je pense que c'est une erreur
de déclaration. Où doit-on faire les déclarations ?
MERCI
Avatar
zulutango07
Bonjour Raymond,
J'ai vu ton Carnet "Nathalie Dupont" avec en bas ton
adresse Email (avec mailto: inclus) . C'est ce genre de
truc qui me manque. Je pensais que c'était plus simple à
réaliser. Bon , je visite le lien que tu m'as indiqué et
si je capte pas tout, je te dérange encore ? En tout cas
merci.
-----Message d'origine-----
Bonjour.

c'est une erreur de déclaration, il faut cocher le
fichier dans VBE.


Il existe d'autres versions sur mon site plus
interessantes et sans

librairies.
lis la page:
http://access.seneque.free.fr/envoi_message.htm


dans ce cas tu n'as pas besoin d'indiquer mailto: dans
ton champ.

il faut cocher la référence microsoft outlook.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"zulutango07" a écrit dans
le message de

news:081101c37b88$7987fdb0$
Bonjour,
Dans un formulaire j'ai une zone de texte contenant une
adresse Email. Je voudrai en cliquant sur cette adresse
envoyer un mail à cette personne. Où et comment réalise-
t-

on le lien hypertexte comportant "Mailto :" ?
J'ai essayé la procedure
Dim e_mail As New RS_Office
e_mail.Outlook_Message "", "le
sujet", "Ci-dessous message de " & "M. Untel" & ",
du " & Now & vbCrLf & "Mon message"
Set e_mail = Nothing
Cà bloque sur Dim e_mail As New RS_Office

J'ai une erreur de compilation "Type défini par
l'utilisateur non défini". Je pense que c'est une erreur
de déclaration. Où doit-on faire les déclarations ?
MERCI

.



Avatar
zulutango07
J'ai testé la procédure "SendMessage". Cà fonctionne
super bien. C'est " Etonnammant Beau". Mais comment faire
disparaître le message Outlook demandant si on autorise
la sortie pendant "x" minutes?. Et comment récupérer la
valeur "ADREMAIL1" que j'ai dans un champ pour la
remplacer dans les paramètres de SendMessage
(Destinataire)?. En clair je veux remplacer "tonadresse"
par la valeur du champ ADREMAIL1 qui se trouve dans mon
formulaire
Merci pour le dévouement.
Avatar
Raymond
tu peux faire comme ça:
SendMessage Me.ADREMAIL1 , _
"Test d'automation avec Outlook", _
"Ci-joint notre test d'automation." & vbCrLf & vbCrLf,
_
"", _
Me.Mondocument
par exemple.

Pour les messages de outlook, tu en fais ton deuil. on peut en supprimer un
mais pour le second personne a encore trouvé. Que fait la police ?
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"zulutango07" a écrit dans le message de
news:096701c37b96$dbab3fd0$
J'ai testé la procédure "SendMessage". Cà fonctionne
super bien. C'est " Etonnammant Beau". Mais comment faire
disparaître le message Outlook demandant si on autorise
la sortie pendant "x" minutes?. Et comment récupérer la
valeur "ADREMAIL1" que j'ai dans un champ pour la
remplacer dans les paramètres de SendMessage
(Destinataire)?. En clair je veux remplacer "tonadresse"
par la valeur du champ ADREMAIL1 qui se trouve dans mon
formulaire
Merci pour le dévouement.
Avatar
zulutango07
Muchas Gracias y hasta luego