Envoyer simplement un mail avec winsock !

Question

Salut &#224; tous !

J'ai trouver bon nombre de sources pour envoyer un mail avec Winsock, mais pas une seule qui ne fonctionne... A se tirer une balle !

Voil&#224; ce que je cherche &#224; faire:

   Envoyer un mail avec Winsock, avec une adresse d'expediteur, une adresse destinataire, l'objet du message, le corps du message, et c'est tout !!!
   Choisir mon serveur smtp serait un plus.
   Je voudrais mettre le tout dans un module, en faire une fonction et c'est partit !

Quelqu'un peux m'expliquer comment je peux faire cela ?

Merci d'avance !

cs_Jack · Answer

Salut
Le site regorge de ce genre de programme. S'il ne marchent pas, essaye de comprendre d'o&#249; &#231;a vient ! Viens sur le Chat en discuter ...

Tu as la possibilit&#233; aussi d'utiliser le gestionnaire de mail par d&#233;faut en utilisant l'API ShellExecute.
Cherche ce ShellExecute en mot cl&#233; parmi les codes sources et/ou le forum : pleins d'exemples

Et cette api ShellExecute, tu lui donne cette ligne &#224; dig&#233;rer :
[mailto:toto@wawa.com?Subject=mes%20vacances%20au%20bord%20de%20la%20mer&Body=Tout%20va%20bien%20!%0D%0ABises mailto:toto@wawa.com?Subject=mes%20vacances%20au%20bord%20de%20la%20mer&Body=Tout%20va%20bien%20!%0D%0ABises]
qui se d&#233;coupe en :
mailto:      mot cl&#233;
toto@wawa.com   l'adresse du destinataire
?Subject=...   le texte de l'objet du mail (*)
&Body=...    le corps du message (*)

(*) pour les caract&#232;res sp&#233;ciaux comme les espaces, les accents ou les changements de ligne (13 + 10), utiliser la syntaxe %xy o&#249; xy est le code ascii de la lettre, en hexad&#233;cimal :  "%" & Hex(Asc(" "))
Tu peux aussi tout convertir en %xy, &#231;a marchera aussi (plus facile des fois)

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

Reelaxman · Answer

Merci de ta r&#233;ponse !

Je suis tr&#232;s t&#234;tu et je tiens &#224; utiliser Winsock, j'ai de futures projets qui nescessiteront son utilisation, envoyer un mail sera donc en plus d'un projet, le d&#233;but d'une formation &#224; Winsock !

J'ai cherch&#233; un peu &#224; trouver d'o&#249; vienne les probl&#232;mes mais au bou du compte je n'avance pas et j'ai l'impression de perdre tout mon temps :s

J'ai trouv&#233; ce morceau de code:

winsock.senddata "helo serveur" & vbcrlf
winsock.senddata "mail from:expe@diteur.com" & vbcrlf
winsock.senddata "rcpt to:desti@nataire.com" & vbcrlf
winsock.senddata "data" & vbcrlf
winsock.senddata "subject=sujetdumail" & vbcrlf
winsock.senddata "Cequetuveuxdanslecorpsdumail" & vbcrlf
winsock.senddata "." & vbcrlf
winsock.close

Que dois-je rajouter pour choisir mon serveur SMTP et mon port de connexion ? Je me demande aussi &#224; quoi sert "vbclf" ? Je sais ce que c'est mais je ne comprends pas l'int&#234;ret de ca caract&#232;re ?

Merci !

konyaliseref · Answer

vbcrlf ca sert a valider la commander en gros cest la touche "entr&#233;e"
sinon tu peux consulter le rfc821 ca di tout ce kil faut savoir pour envoyer un mail
le probleme cest que maintenant les fournisseurs (hotmail, free ou autres) ne laissent plus lacces exterieur car avant mon soft fonctionnait tres bien
ce ke tu peu faire cest te connecter au serveur mail de la boite ou tu bosses car theoriquement tu y a acces... sinon ce nest plus possible
ciao

C* Konyali$eref C*
-------------------->

Reelaxman · Answer

Merci pour les infos, je vais jetter  un oeil sur le rfc821 !

Je vais voir &#231;a, pour le moment je n'ai pas jamais eu de probl&#232;me avec le SMTP de Free.

Envoyer simplement un mail avec winsock !

4 réponses

Discussions similaires