VB6 envoie des mails. Mais comment ?

Signaler
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009
-
 Utilisateur anonyme -
Salut !
& Bonsoir !

Je fais un petit programme qui sert de bon de commande pour 20 commandes.

Seulement lorsque que l'on valide les commandes, elle s'enregistre dans un fichier.log, et j'aimerais qu'à la fin de la saisie le programme me renvoie la commande dans ma boite mail à l'aide d' un boutton "command2" cliquer par l'utilisateur .

Pouvez-vous m'aider sur ce point

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __

12 réponses

Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
16
Look my source :

http://www.vbfrance.com/code.aspx?ID=27208

Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009

ok mais serait-il possible d'avoir un peut plus de détails sur ta source.

- Comment fonctionne-t-elle ?

- Quel objet faut-il à la form ?

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __

Salut, moi j'utilise un service gratos de OVH depuis 10 ans +/- et qui fonctionne à merveille sans avoir à regler des serveurs SMTP etc, c'est à dire que tu peux l'installer sur n'importe quel ordi sans reglages
Tu fais une form avec un WebBrowser1 et une command1 et tu remplaces l'adresse email
A+

Private Sub Command1_Click()

WebBrowser1.Navigate "http://www.ovh.net/cgi-bin/reponse.pl?cava2=HTTP://ACIVE.FREE.FR&email_master1=" & "acive@free.fr" & "&url=" & "http://aucunsite.com" & "&subject=" & Replace("Essai d'envoi d'un mail", " ", "%20") & "&message=" & Replace("Voila voila c'était moi encore...", " ", "%20")

End Sub
Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
16
Acive> j'ai essayé le :

"http://www.ovh.net/cgi-bin/reponse.pl?cava2=HTTP://ACIVE.FREE.FR&email_master1=" & "acive@free.fr" & "&url=" & "http://aucunsite.com" & "&subject=" & Replace("Essai d'envoi d'un mail", " ", "%20") & "&message=" & Replace("Voila voila c'était moi encore...", " ", "%20")

Mais marche pas, IE me retourne un résultat de recherche avec MSN Search

Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009

oki mais c'est où que l'on a le WebBrowser si cela et un objet ?

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __
Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
16
Dans le contrôle : Microsoft Internet Control

Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009

Si ca marche dans une form mais un boutton nommer command1 et un WebBrowser1 et met cette source :
Private Sub Command1_Click()

WebBrowser1.Navigate "http://www.vbfrance.com/forum.v2.aspx?ID=323804" & "acive@free.fr" & "&url=" & "http://aucunsite.com" & "&subject=" & Replace("Essai d'envoi d'un mail", " ", "%20") & "&message=" & Replace("Voila voila c'était moi encore...", " ", "%20")

End Sub


Tu vas arriver sur la page des topic du forum.
quand command1 et cliquer

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009

Seul problème : c'est pas du tout ça que je cherche
Mon problème est :

J'ai un programme qui écrit dans un fichier.log et je veux que quand l'utilisateur clique le boutton command3, le programme envoie le fichier.log sur une boîte mail. (plus précisement la mienne moacolyte@hotmail.com)

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __
Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
16
Donc ma source te conviendrais.

Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]

Si ca marche moi j'ai recu ca :

Date: Sun, 31 Oct 2004 22:59:23 +0100
De: acive@free.fr
À: acive@free.fr
Objet: Essai d'envoi d'un mail
Bonjour,
Date: 31/10/104 à 22:59:22.

Le site :

message = Voila voila c'était moi encore...


JE T'AVAIS DIT DE CHANGER L'ADRESSE E-MAIL
Messages postés
81
Date d'inscription
dimanche 17 octobre 2004
Statut
Membre
Dernière intervention
28 mars 2009

on le sait qu'il marche !
Merci à toi mais cela n'était pas mon but. dsl :'(

++

et bonne prog.

____________________________________
Acolyte vous remercie...


_______________________by Acolyte __

dslé alors...
a+