envoi de mail

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : envoi de mail

romrai

Salut!
voilà, mon programme est en vba access; il doit envoyer un mail à un destinataire, mais à chaque fois l'objet send echoue, pourtant je pense avoir fait une bonne configuration. voici le programme:

Code :

Public Sub mail()
Set oMail = CreateObject("CDO.Message" )
Set oMailConfig = CreateObject("CDO.Configuration" )
oMail.subject = "Example CDO Message"
oMail.From = "dongmor@caramail.com"
oMail.To = "dongmor23@hotmail.com"
oMail.TextBody = "This is some sample message text."
oMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver" ) = "NOM SERVEUR MESSAGERIE"
oMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport" ) = 25
oMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing" ) = 2
'oMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout" ) = 60
oMail.Configuration.Fields.Update
'Set oMail.Configuration = oMailConfig
oMail.Send
Set oMailConfiguration = Nothing
Set oMailConfig = Nothing
Set oMail = Nothing
End Sub

si quelqu'un voit où ça bloque.
merci

Publicité

majid7

Dim config As CDO.Configuration
Dim email As CDO.Message
Set config = New CDO.Configuration
With config.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing" ) = CDO.cdoSendUsingPort
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver" ) = "smtp.serveur.com"
.Update
End With

Set email = New CDO.Message
With email
Set .Configuration = config
.From = votrelogin@serveur.com
.To = "emaildestinataire"
.Subject = "Sujet"
.Textbody = "Blabla"
.Send

End With

NB : le serveur dans (votrelogin@serveur.com) doit correspondre au nom serveur de "smtp.serveur.com" saisi plus haut

normalement ça marche

email : l_abdelmjid@yahoo.com

FORUM HardWare.fr

Programmation

VB/VBA/VBS

envoi de mail

Sujets relatifs
envoi de mail html avec images	Envoi de mail html avec un include en php impossible?
script mail - Envoi à deux destinataires	envoi de mail html avec piece jointe
Formulaire d'inscription qui envoi tout par mail?	Envoi d'un mail à l'internaute si "Oui" est coché
Envoi d'un formulaire par mail	[javamail]envoi de mail simple
formulaire envoi mail asp	Problème envoi mail avec fonction mail() [Résolu]
Plus de sujets relatifs à : envoi de mail

Page générée en 0.037 secondes