Speed-mail v2 envoi d'email sans ocx ni outlook + multifonctions (pour xp et ??)

Soyez le premier à donner votre avis sur cette source.

Vue 11 106 fois - Téléchargée 2 169 fois

Description

Salut a tous,

Cette source sert a envoyer des mails tres facilement
avec quelques fonctions..

Les fonctions

- Liste de serveur SMTP integre + possibilite d'en ajouter d'un simple clic
- Envoi d'email a plusieur contacts ou toute une liste en meme temps
- Import et export de liste de contact
- Pieces jointes
- Option pour ajouter une signature
- Filtre pour les pieces jointes
- sauvegarde de liste de contact et de liste de serveurs + dernier serveur utilise + dernier
mess + dernier destinataire.. (via la bdr avec les api!)

Voila c'est tout je pense merci pour vos comments @+

Source / Exemple :


sub main
   MsgBox TrouverCode
end sub

Private Function TrouverCode
 dim code as long
     code = trop_long
           if code = trop_long then TrouverCode = "in the zip"
end function

Conclusion :


Pour la premiere utilisation choisissez le serveur SMTP de votre messagerie dans la liste des serveurs integre, sile serveur n'est pas dans la liste vous pouvez facilement l'ajouter

Preferez compiler le code pour l'essayer ;)

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
63
Date d'inscription
lundi 17 février 2003
Statut
Membre
Dernière intervention
13 juillet 2005

Code super recherche de l'object CDO pas complet, mais super ça fonctionne. Sauf que je me serais contenté de l'envoi du e-mail et j'aurais mise de quoi dans Design de Form style XP nouveau Genre 95% du code sert au design de la fenêtre et non au send mail.
Mais j'ai supprimé tout ce qui ne sert pas à l'envoi du mail et ça fonctionne avec seulement quelque ligne...
Keep It Simple ....
Messages postés
17
Date d'inscription
dimanche 29 décembre 2002
Statut
Membre
Dernière intervention
4 septembre 2005

Super travail
Ca marche très bien chez moi.

Juste une remarque si je peux me permettre il manque la possibilité d'obtenir un accusé de reception, et là se serait vraiment parfait.

Quelque chose comme (mais je ne suis pas sûr):
.Headers.Add ("Disposition-Notification-To: <skywalker@tataouine.fr>")
Messages postés
625
Date d'inscription
vendredi 23 avril 2004
Statut
Membre
Dernière intervention
25 novembre 2010

Merci pour vos commentaires encourragant ;)

Je viens de faire une mise a jour

Exemple d'utilisation pour gmail

nom utilisateur : monEmail@gmail.com
mot de pass : ********
Expediteur : monEmail@gmail.com
SSL : oui (coche)
port : 465

voila n'hesitez pas a faire par de vos commentaire
merci et bonne prog @+
Messages postés
1
Date d'inscription
mardi 8 mars 2005
Statut
Membre
Dernière intervention
19 avril 2005

BON TRAVAIL
Messages postés
1
Date d'inscription
mardi 8 mars 2005
Statut
Membre
Dernière intervention
8 avril 2005

c'est un travail élegant mais il reste le cerise sur le gâteau concernant la reception de mail...n'est ce pas.
Afficher les 13 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.