Bonjour,
la question est certainement très simple.
j'ai une liste de contacts avec un champ qui contient une adresse email que
j'affiche. Quand je clique dessus, j'aimerais pouvoir ouvrir un nouveau mail
avec l'adresse indiquée.
J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet, mais ce
n'est pas ce que je veux.
Private Sub email_Click()
?????
End Sub
Merci de votre aide.
Arnaud. (enlever le "-" dans le mail)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Anor
Bonjour, Si le formulaire n'est pas en mode continu, personnellement, je fais comme ça :
une table avec un champ MailContact un formulaire lié à cette table une étiquette indépendante LblAdresseMail et le code suivant :
Private Sub Form_Current() If Not IsNull(MailContact) Then Me!LblAdresseMail.Caption = MailContact Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _ & "?CC=" & "" _ & "&Subject=" & "Le sujet du Message" _ & "&Body=" & "Corps du message au kilomètre :-(" Else Me!LblAdresseMail.Caption = "" Me!LblAdresseMail.HyperlinkAddress = "" End If End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject -- à+ Arnaud -------------------------------------------------- Avant toute chose : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## -------------------------------------------------- Arnaud : | Bonjour, | la question est certainement très simple. | j'ai une liste de contacts avec un champ qui contient une adresse | email que j'affiche. Quand je clique dessus, j'aimerais pouvoir | ouvrir un nouveau mail avec l'adresse indiquée. | J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet, | mais ce n'est pas ce que je veux. | | Private Sub email_Click() | ????? | End Sub | | Merci de votre aide. | Arnaud. (enlever le "-" dans le mail)
Bonjour,
Si le formulaire n'est pas en mode continu, personnellement, je fais comme ça :
une table avec un champ MailContact
un formulaire lié à cette table
une étiquette indépendante LblAdresseMail
et le code suivant :
Private Sub Form_Current()
If Not IsNull(MailContact) Then
Me!LblAdresseMail.Caption = MailContact
Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _
& "?CC=" & "" _
& "&Subject=" & "Le sujet du Message" _
& "&Body=" & "Corps du message au kilomètre :-("
Else
Me!LblAdresseMail.Caption = ""
Me!LblAdresseMail.HyperlinkAddress = ""
End If
End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject
--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Arnaud <green-cove@wanadoo.fr> :
| Bonjour,
| la question est certainement très simple.
| j'ai une liste de contacts avec un champ qui contient une adresse
| email que j'affiche. Quand je clique dessus, j'aimerais pouvoir
| ouvrir un nouveau mail avec l'adresse indiquée.
| J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet,
| mais ce n'est pas ce que je veux.
|
| Private Sub email_Click()
| ?????
| End Sub
|
| Merci de votre aide.
| Arnaud. (enlever le "-" dans le mail)
Bonjour, Si le formulaire n'est pas en mode continu, personnellement, je fais comme ça :
une table avec un champ MailContact un formulaire lié à cette table une étiquette indépendante LblAdresseMail et le code suivant :
Private Sub Form_Current() If Not IsNull(MailContact) Then Me!LblAdresseMail.Caption = MailContact Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _ & "?CC=" & "" _ & "&Subject=" & "Le sujet du Message" _ & "&Body=" & "Corps du message au kilomètre :-(" Else Me!LblAdresseMail.Caption = "" Me!LblAdresseMail.HyperlinkAddress = "" End If End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject -- à+ Arnaud -------------------------------------------------- Avant toute chose : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## -------------------------------------------------- Arnaud : | Bonjour, | la question est certainement très simple. | j'ai une liste de contacts avec un champ qui contient une adresse | email que j'affiche. Quand je clique dessus, j'aimerais pouvoir | ouvrir un nouveau mail avec l'adresse indiquée. | J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet, | mais ce n'est pas ce que je veux. | | Private Sub email_Click() | ????? | End Sub | | Merci de votre aide. | Arnaud. (enlever le "-" dans le mail)
Arnaud
Ok, ça marche : DoCmd.SendObject acSendNoObject, , , email
Merci pour l'info. Arnaud.
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de news:
Bonjour, Si le formulaire n'est pas en mode continu, personnellement, je fais comme ça :
une table avec un champ MailContact un formulaire lié à cette table une étiquette indépendante LblAdresseMail et le code suivant :
Private Sub Form_Current() If Not IsNull(MailContact) Then Me!LblAdresseMail.Caption = MailContact Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _ & "?CC=" & "" _ & "&Subject=" & "Le sujet du Message" _ & "&Body=" & "Corps du message au kilomètre :-(" Else Me!LblAdresseMail.Caption = "" Me!LblAdresseMail.HyperlinkAddress = "" End If End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject -- à+ Arnaud -------------------------------------------------- Avant toute chose : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## -------------------------------------------------- Arnaud : | Bonjour, | la question est certainement très simple. | j'ai une liste de contacts avec un champ qui contient une adresse | email que j'affiche. Quand je clique dessus, j'aimerais pouvoir | ouvrir un nouveau mail avec l'adresse indiquée. | J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet, | mais ce n'est pas ce que je veux. | | Private Sub email_Click() | ????? | End Sub | | Merci de votre aide. | Arnaud. (enlever le "-" dans le mail)
Ok,
ça marche :
DoCmd.SendObject acSendNoObject, , , email
Merci pour l'info.
Arnaud.
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news: erjVOFFqDHA.964@TK2MSFTNGP09.phx.gbl...
Bonjour,
Si le formulaire n'est pas en mode continu, personnellement, je fais comme
ça :
une table avec un champ MailContact
un formulaire lié à cette table
une étiquette indépendante LblAdresseMail
et le code suivant :
Private Sub Form_Current()
If Not IsNull(MailContact) Then
Me!LblAdresseMail.Caption = MailContact
Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _
& "?CC=" & "" _
& "&Subject=" & "Le sujet du Message" _
& "&Body=" & "Corps du message au kilomètre :-("
Else
Me!LblAdresseMail.Caption = ""
Me!LblAdresseMail.HyperlinkAddress = ""
End If
End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject
--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Arnaud <green-cove@wanadoo.fr> :
| Bonjour,
| la question est certainement très simple.
| j'ai une liste de contacts avec un champ qui contient une adresse
| email que j'affiche. Quand je clique dessus, j'aimerais pouvoir
| ouvrir un nouveau mail avec l'adresse indiquée.
| J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet,
| mais ce n'est pas ce que je veux.
|
| Private Sub email_Click()
| ?????
| End Sub
|
| Merci de votre aide.
| Arnaud. (enlever le "-" dans le mail)
Ok, ça marche : DoCmd.SendObject acSendNoObject, , , email
Merci pour l'info. Arnaud.
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de news:
Bonjour, Si le formulaire n'est pas en mode continu, personnellement, je fais comme ça :
une table avec un champ MailContact un formulaire lié à cette table une étiquette indépendante LblAdresseMail et le code suivant :
Private Sub Form_Current() If Not IsNull(MailContact) Then Me!LblAdresseMail.Caption = MailContact Me!LblAdresseMail.HyperlinkAddress = "Mailto:" & Me.MailContact _ & "?CC=" & "" _ & "&Subject=" & "Le sujet du Message" _ & "&Body=" & "Corps du message au kilomètre :-(" Else Me!LblAdresseMail.Caption = "" Me!LblAdresseMail.HyperlinkAddress = "" End If End Sub
sinon, utiliser la paramètre AcSendNoObject avec docmd.sendobject -- à+ Arnaud -------------------------------------------------- Avant toute chose : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## -------------------------------------------------- Arnaud : | Bonjour, | la question est certainement très simple. | j'ai une liste de contacts avec un champ qui contient une adresse | email que j'affiche. Quand je clique dessus, j'aimerais pouvoir | ouvrir un nouveau mail avec l'adresse indiquée. | J'ai vu qu'avec docmd...., on pouvait envoyer directement un objet, | mais ce n'est pas ce que je veux. | | Private Sub email_Click() | ????? | End Sub | | Merci de votre aide. | Arnaud. (enlever le "-" dans le mail)
