OVH Cloud OVH Cloud

Envoi de mail en VB

3 réponses
Avatar
Benoît
Je recherche une proc=E9dure pour envoyer des messages=20
depuis mon apppli VB.
D'avance merci
Ben

3 réponses

Avatar
Ledev
Benoît wrote:
Je recherche une procédure pour envoyer des messages
depuis mon apppli VB.



Cette article te donne plusieurs technique, a toi de voir celle qui te
conviens le mieux:
http://faq.vb.free.fr/index.php?question=2

a+
Avatar
Stéphanie
si tu envoies un mail via Outlook, voici ce que
j'utilise :
Référencer la Dll de Microsoft Outlook dans le projet
puis voici le code :

Dim OutlookApp As New Outlook.Application
Dim NewMail As Outlook.MailItem
Set NewMail = OutlookApp.CreateItem(olMailItem)
NewMail.Recipients.Add (adresses mails séparés par ;)
NewMail.Subject = objet
NewMail.Body = texte
NewMail.Send

J'espère avoir pu t'aider
Bonne journée
Stéphanie
-----Message d'origine-----
Je recherche une procédure pour envoyer des messages
depuis mon apppli VB.
D'avance merci
Ben
.



Avatar
Benoit
Merci de tes conseils ça marche parfaitement.
J'ai juste un pb sur l'acheminement des messages. Ils
mettent 1/4 h pour être acheminer alos qu'une utilisation
normale d'outlook c'est immédiat. Y a t-il un paramétre à
ajouter au moment du "send"?
Benoît
-----Message d'origine-----
si tu envoies un mail via Outlook, voici ce que
j'utilise :
Référencer la Dll de Microsoft Outlook dans le projet
puis voici le code :

Dim OutlookApp As New Outlook.Application
Dim NewMail As Outlook.MailItem
Set NewMail = OutlookApp.CreateItem(olMailItem)
NewMail.Recipients.Add (adresses mails séparés par ;)
NewMail.Subject = objet
NewMail.Body = texte
NewMail.Send

J'espère avoir pu t'aider
Bonne journée
Stéphanie
-----Message d'origine-----
Je recherche une procédure pour envoyer des messages
depuis mon apppli VB.
D'avance merci
Ben
.



.