code VB6 pour envoyer un mail - Divers / Débutants, Visual Basic, VB6, VB.NET, VB 2005, VB

Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 05 23:06:54

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : PROBLEME DANS BASE DE DONNéES par PCPT

RE : PROBLEME DANS BASE DE DONNéES par Tursiop60

RE : PROBLEME DANS BASE DE DONNéES par PCPT

RE : FUSIONNER 2 PROJETS ? COMMENT FAIRE ? par steeventide

+ de logiciels à télécharger

1 464 910 membres
401 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 095 codes, 1 303 030 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : code VB6 pour envoyer un mail [ Divers / Débutants ] (SPBT57)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Visual Basic 6 / Divers / Débutants / code VB6 pour envoyer un mail
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

mardi 6 janvier 2009 à 15:11:22 | code VB6 pour envoyer un mail

SPBT57	bonjour, je suis à la recherche du code en VB6 qui permet d'envoyer un mail. merci
	Rép. MP 1 msg

mardi 6 janvier 2009 à 15:37:11 | Re : code VB6 pour envoyer un mail

lillith212	Bonjour, Avec un peu de recherche... http://www.vbfrance.com/codes/ENVOYER-MAIL-VB6-AVEC-SMTP-SERVEUR_46211.aspx N'oublis pas le réglement, pas de code tout cuit comme ca un minimum d'effort... Merci S.L.B.
	Rép. MP 1199 msg 1371 msg CS

mardi 6 janvier 2009 à 15:43:32 | Re : code VB6 pour envoyer un mail

nhervagault	Salut, Un peu de recherche sur le site doit de donner la réponse. Pistes à explorer Via pop3 et smpt ou via outlook apres a toi de gérer
	Rép. MP 2138 msg 4600 msg CS

mardi 6 janvier 2009 à 22:59:47 | Re : code VB6 pour envoyer un mail

skyla

Salut,
Voici une fonctions simple pour l'envoi d'email en vb6,simplement et qui marche toujours vu qu'on passe par
sa prope boite mail.

Private Sub SendMail(strFrom as string,strTo as string,strSubject as string,strLogin as string,strPass as string,strMessage as string)
On Error GoTo eRRSending
      MousePointer = 11
      Set objEmail = CreateObject("CDO.Message")
      objEmail.From = strFrom
      objEmail.To = strTo
      objEmail.Subject = strSubject
      objEmail.HTMLbody = strMessage
    'Ici le message est de type HTML pour pouvoir faire des mises en forme
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2    'On precise qu'on veut remplir le formulaire d'envoie
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1        'Que l'on souhaite s'identifier
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/sendusername") = strLogin    'On donne notre Login
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = strPass        'Notre mot de passe
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
      "smtp.mail.yahoo.fr"        'Ici c'est le cas de yahoo                            'SMTP de la boite
      objEmail.Configuration.Fields.Item _
      ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25        'Port defini a 25
      objEmail.Configuration.Fields.Update                                            'On met a jour les champs
      objEmail.Send        'On envoie..
      DoEvents
      MousePointer = 0
      MsgBox "Message envoyé"
      Set objEmail = Nothing
    MousePointer = 0
      Exit Sub
eRRSending:
'Une erreur est survenu,on l'affiche
MousePointer = 0
MsgBox Err.Description
Set objEmail = Nothing
End Sub

'=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=
'Petit inconvenient si on utilise un éditeur Hexa le mot de passe peut sortir en clair
'alors eclate ton mail et ton password dans une chaine avant de la passer a la fonction
'ex: MonMail="M" & "o" & "n" & "M" & ......

Cette discussion est classé dans : mail, code, vb6, envoyer

Répondre à ce message

Sujets en rapport avec ce message

VB6 ---->> Mail au format HTML [ par AlAiN ] s'il vous plait, est il possible d'envoyer des mail au format html avec vb6, pour les mails au format text, le composant mapi fonctionne, mais je cher Envois de mail avec VB6 [ par fada81 ] Salut,J'ai l'intention de faire une petite application en Visual Basic qui permétra d'envoyer des mails sur une adresse donnée. Ma question est: Y a t Envoyer un mail en vb6 [ par dan80 ] Bonjour à tous, J'ai fais une aplli vb6 qui envoi un mail mais il ne me prend pas les passages a la ligne comment faire? Envoi mail par vb6 [ par Sepi62500 ] Bonjour tout le monde Tout d'abord, merci de lire ce message. En fait, je créé un bouton commande sur lequel on clique pour envoyer par mail le fichie envoyer un mail avec vb6 et exchange [ par kam74 ] Bjr à tous,J'ai un petit souci, je desir envoyer un email à partir d'un programme ecrit rn VB6,cependant je n'ai pas de srver smtp, et c'est un server code simple pour envoi d'un txt par mail [ par hastalavista ] bonjour,j'ai une application dont je demande a mes client de remplir un formulaire et de me l'envoyer par mail "juste en cliquant sur envoyer", j'ai e Envoyer un Email en VB6 [ par Dri60 ] Bonjour, je suis en train de créer un site avec du Visual Basic et je voudrais qu'il envoye un e-mail avec le texte du mail défini lorsque je clique s comment envoyer un formulaire vers un mail @yahoo @homail ... [ par hastalavista ] bonjour tout le monde,ca fait un mois que je suis sur la recherche d'un code permettan d'envoyer des informations des machines client "formulaire remp Envoyer un mail avec VB6 [ par piou62 ] BonjourVoila je voudrais via VB6 envoyer un mail à plusieurs personnes dont la liste sera dans un tableau dynamique.J'ai trouvé comme code :Declare Fu plusieur destinataire Mail [ par inraf ] Bonjourj'ai un petit problème j'ai un code pour envoyer un mail via un form.Jusque la pas de problème mais maintenant je voudrais envoyer le mail a pl