Il y a quelque j'ai demandé de l'aide pour envoyer un message avec microsoft
outlook 2003, sans avoir de message de la par de celui-ci.
On a dit utiliser se code:
Public Sub SendMessage(destinataire As String, _
Sujet As String, _
Corps As String, _
Optional CopieCC As String, _
Optional PièceJointe As String)
Dim message As New CDO.message
With message
.To = destinataire
.Subject = Sujet
.TextBody = Corps
.CC = CopieCC
.AddAttachment (PièceJointe)
.Send
End With
Set message = Nothing
End Sub
Mais ce code envoie les messages avec outlook express au lieu de microsoft
outlook 2003. Merci de bien vouloir m'aider à resoudre ce probleme.
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
Gilbert
Bonjour,
Regarde peut-être du coté du programme de messagerie par défaut. Et va voir chez 3stone http://www.3stone.be/access/articles.php?lng=fr&pg
Gilbert
"BL" a écrit dans le message de news:43e1d0c4$0$6647$
bonjours,
Il y a quelque j'ai demandé de l'aide pour envoyer un message avec microsoft
outlook 2003, sans avoir de message de la par de celui-ci. On a dit utiliser se code: Public Sub SendMessage(destinataire As String, _ Sujet As String, _ Corps As String, _ Optional CopieCC As String, _ Optional PièceJointe As String) Dim message As New CDO.message With message .To = destinataire .Subject = Sujet .TextBody = Corps .CC = CopieCC .AddAttachment (PièceJointe) .Send End With Set message = Nothing End Sub
Mais ce code envoie les messages avec outlook express au lieu de microsoft outlook 2003. Merci de bien vouloir m'aider à resoudre ce probleme.
Bonjour,
Regarde peut-être du coté du programme de messagerie par défaut.
Et va voir chez 3stone
http://www.3stone.be/access/articles.php?lng=fr&pg
Gilbert
"BL" <bl@sidiac.com> a écrit dans le message de
news:43e1d0c4$0$6647$8fcfb975@news.wanadoo.fr...
bonjours,
Il y a quelque j'ai demandé de l'aide pour envoyer un message avec
microsoft
outlook 2003, sans avoir de message de la par de celui-ci.
On a dit utiliser se code:
Public Sub SendMessage(destinataire As String, _
Sujet As String, _
Corps As String, _
Optional CopieCC As String, _
Optional PièceJointe As String)
Dim message As New CDO.message
With message
.To = destinataire
.Subject = Sujet
.TextBody = Corps
.CC = CopieCC
.AddAttachment (PièceJointe)
.Send
End With
Set message = Nothing
End Sub
Mais ce code envoie les messages avec outlook express au lieu de microsoft
outlook 2003. Merci de bien vouloir m'aider à resoudre ce probleme.
Regarde peut-être du coté du programme de messagerie par défaut. Et va voir chez 3stone http://www.3stone.be/access/articles.php?lng=fr&pg
Gilbert
"BL" a écrit dans le message de news:43e1d0c4$0$6647$
bonjours,
Il y a quelque j'ai demandé de l'aide pour envoyer un message avec microsoft
outlook 2003, sans avoir de message de la par de celui-ci. On a dit utiliser se code: Public Sub SendMessage(destinataire As String, _ Sujet As String, _ Corps As String, _ Optional CopieCC As String, _ Optional PièceJointe As String) Dim message As New CDO.message With message .To = destinataire .Subject = Sujet .TextBody = Corps .CC = CopieCC .AddAttachment (PièceJointe) .Send End With Set message = Nothing End Sub
Mais ce code envoie les messages avec outlook express au lieu de microsoft outlook 2003. Merci de bien vouloir m'aider à resoudre ce probleme.
