Ocx envoie email version 2
Soyez le premier à donner votre avis sur cette source.
Vue 11 345 fois - Téléchargée 2 089 fois
Description
Une nouvelle mouture de mon ocx d'envoie d'Email, cette ocx utilise un control winsock afin de faciliter l'envoie d'email avec piéces jointes. Récement je me suis servir de cette ocx, mais je me suis aperçu qu'il fonctionné trés mal, voila pourquoi je le repost en version 2, aprés qq test il m'apparait trés stable.
J'ai joint un exemple complet d'utilisation de l'ocx.
PS: attention pour les comptes Hotmail le courrier arrive parfois dans le courrier indésirable, alors verifier avant de de dire qu'il ne fonctionne pas!!!!!!
Ps : Maitenant je pense y inclure une partie protocole Pop pour la lecture d'Email.
J'espére que ce controle vous sera utilise......
++
J'ai joint un exemple complet d'utilisation de l'ocx.
PS: attention pour les comptes Hotmail le courrier arrive parfois dans le courrier indésirable, alors verifier avant de de dire qu'il ne fonctionne pas!!!!!!
Source / Exemple :
'Commandes : '*********** 'Email1.SeveurSmtp = le serveur smtp (Generalement Smtp.Fai.fr) 'Email1.PieceJointeAjout "C:\fichier.ext" 'Email1.PieceJointeSuppr "C:\fichier.ext" 'Email1.Envoie Email Expediteur,Email Destinataire, Sujet , Message 'Cette Ocx posséde les Evenements Suivant : '************************************ 'Private Sub Email1_Reponse(Evenement As String, TxtServeur As String) 'Evenement : interprétation de la reponse du serveur 'TxtServeur : la reponse du serveur 'Private Sub Email1_Progression(Encours As Long, Total As Long, Pourcent As Integer) 'Encours : renvoie le nb octects envoyé 'Total : le nb total d'octects a envoyer 'Pourcent : le pourcentage effectué 'Private Sub Email1_FichiersJoints(nb As Integer, Liste As String) 'nb : renvoie le nb total de fichier(s) joint(s) 'liste : renvoie le path des fichiers joints avec pour séparateur la virgule 'Exemple "c:\fichier.txt , d:\image.jpg" 'Private Sub Email1_Encodage(Enabled As Boolean, Fichier As String, Pourcent As Integer) 'Enabled : renvoie true si encodage en cours sinon false 'fichier : le nom du fichier en cours d'encodage 'Pourcant : le pourcentage d'encodage effectué du fichier 'PS pour joindre un fichier il est nécéssaire de faire un ecodageUU 'mais la fonction d'encodageUU du controle n'est pas optimisé 'si qq peu m'aider a l'optimiser car je la trouve assez longue...
Conclusion :
Ps : Maitenant je pense y inclure une partie protocole Pop pour la lecture d'Email.
J'espére que ce controle vous sera utilise......
++
Codes Sources
A voir également
- Ocx envoie email version 2
- Visual Basic / VB.NET : Ocx meta texte - version 1.2 finie - CodeS SourceS - Guide
- Mscomctl.ocx version 2.2 - Forum - Visual Basic 6
- Horloge version 2 - Codes sources - Visual Basic / VB.NET (SPECIAL CONCOURS ! (ARCHIVE 1er Concours))
- Jeux - othello version 2 - Codes sources - Visual Basic / VB.NET (Jeux)
- Quicklauchtray(version 2.02.0001) - Codes sources - Visual Basic / VB.NET (Souris, Clavier, etc…)
Commentaires
Votre code est super mais j'ai un problème avec l'encodage des pièces jointes sur certains équipements de type Iphone (begin 664 et des signes cabalistiques).
Les e-mails reçus sur Outlook fonctionnent très bien.
Avez vous eu ce type de problème ?
Merci
Cdt
Regis
Toutes mes félicitations.
ce problème a-t-il été résolu?
Je sais pas si tu es toujours sur ce programme mais je voudrais comprendre si je fais quelque chose d'incorrect ?
J'utilise ton soft donc pour envoyer 2 mails avec les mêmes paramètres (dont un fichier attaché), exceptés le destinataire !!
Lorsque j'envoies sur un hotmail.fr, pas de souci, lorsque c'est un gmail.com, le fichier n'est pas attaché, mais encodé dans le texte du message !!
Est-ce normal ?
Merci de ton aide, ou de toute autre personne :) !
Stef
ça m'interesse pour recuperer des pieces jointes et les copier dans un autre rep
a propos allez voir ce source il fait tout !!! je viens de le tester c'est fantastique mais peut etre un peu trop compliqué pour moi réutiliser
je pense que votre methode est plus simple , plus lisible
http://www.vbfrance.com/code.aspx?ID=33521
merci
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.