Envoyer un mail tres simplement

Soyez le premier à donner votre avis sur cette source.

Snippet vu 8 064 fois - Téléchargée 46 fois

Contenu du snippet

aucune critique ne sera acceptée :P

Source / Exemple :


Private Sub Command1_Click()
Winsock1.Connect "serveur", 25
End Sub

Private Sub Winsock1_Connect()
Winsock1.SendData "HELO seveur" & vbCrLf
Winsock1.SendData "MAIL FROM:<envoyeur>" & vbCrLf
Winsock1.SendData "RCPT TO:<cible>" & vbCrLf
Winsock1.SendData "DATA" & vbCrLf & "blablabla" & vbCrLf & "." & vbCrLf & "QUIT" & vbCrLf
End Sub

A voir également

Ajouter un commentaire

Commentaires

Messages postés
87
Date d'inscription
samedi 6 décembre 2003
Statut
Membre
Dernière intervention
7 novembre 2016

Qqun arrive a envoyer un mail sur une adresse aol ? j'ai essayé avec le smtp de aol (smtp.fr.aol.com) mais y'a rien qui passe.. J'suis connecté sur aol mais j'pense pas que ca puisse venir d'un proxy ou bien ?
Si qqun y arrive merci de me refilé le code pour ca s'rai sympa...
@+++ et bon dvpment !
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
3
Ok pour cette méthode, mais qd on envoie trop de texte dans mon cas une variable contenant un fichier txt de + de 8k ben on recoit rien!!

Alors si qq peu me dire comment attacher un fichier??? Sera sympa!!
Messages postés
47
Date d'inscription
mardi 18 mars 2003
Statut
Membre
Dernière intervention
29 août 2004

mais si on pe ùmettre du winsock sous XP
Messages postés
6
Date d'inscription
samedi 20 avril 2002
Statut
Membre
Dernière intervention
3 avril 2006

Comment faire pour metre une variable ds

Winsock1.SendData "MAIL FROM:Mavariable" & vbCrLf

merci pour ce Bon code.
Messages postés
2
Date d'inscription
jeudi 4 septembre 2003
Statut
Membre
Dernière intervention
29 janvier 2005

comment faire pour envoyer un fichier joint ?
Afficher les 16 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.