Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Envois mail sans outlook office et avec un message.

  • Initiateur de la discussion Initiateur de la discussion carlos
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

carlos

XLDnaute Impliqué
Bonjour

j'ai recherché sur les forums plusieurs solutions mais aucune ne me convient véritablement.
Pour simplifier , je souhaiterais envoyé un mail et un fichier joint ( ca c'est bon , j'ai trouvé) mais pas avec outlook office car les personnes qui me repondront n'auront pas forcement outlook office.
J'aimerai aussi pouvoir ajouter un message ( Le "Body" ne marche pas ).

Merci

Carlos
 

Pièces jointes

Re : Envois mail sans outlook office et avec un message.

Salut kiki29

j'ai testé ce code du lien :
Sub CDO_Mail_Small_Text()
Dim iMsg As Object
Dim iConf As Object
Dim strbody As String
' Dim Flds As Variant

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

' iConf.Load -1 ' CDO Source Defaults
' Set Flds = iConf.Fields
' With Flds
' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
' = "Fill in your SMTP server here"
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
' .Update
' End With

strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"

With iMsg
Set .Configuration = iConf
.To = "karl.longlune@free.fr"
.CC = ""
.BCC = ""
.From = "karl.longlune@free.fr" '"""Ron"" <ron@something.nl>"
.Subject = "New figures"
.TextBody = strbody
.Sendmessage suivant : 'La valeur de configuration »send using « est non valide
End With

End Sub

J'ai essayé avec mon adresse mail mais ca bloque au meme endroit
j'ai aussi mis a jour la reference CDO 2000 librairy

Ca bloque sur le : .send

Merci pour l'aide

Carlos
 
Re : Envois mail sans outlook office et avec un message.

Bonjour

Je m'incruste un peu, j'ai le même problème.

Mon fichier marche parfaitement sur XP/office 2007, mais j'ai le message d'erreur 'La valeur de configuration »send using « est non valide quand je l'utilise avec W7/office 2007.La référence CDO 2000 library est bien coché.

Utilises tu windows 7 ?

Peut être que le problème vient du fait que windows 7 n'a plus de client mail (outlook express ou windows mails) et qu'il manque du coup quelques dll.

Quelqu'un a une idée ?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
1 K
Réponses
2
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…