1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    Urbaniste
    Inscrit en
    janvier 2018
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Urbaniste

    Informations forums :
    Inscription : janvier 2018
    Messages : 3
    Points : 1
    Points
    1

    Par défaut Envoyer un mail des que je lance le logiciel

    Bonjour,
    Je vous explique j'aimerez pouvoir des que je lance le logiciel que sa envoye un fichier sur ma boite mail.
    Exemple:
    J'ouvre le logiciel sa choisis dans le code se chemin d'accès
    (C:\Mes documents\fichier.txt)
    Et que sa l'envoye directement sur mon adresse hotmail.
    Mais qu'il n'y est aucun bouton.
    Des que je lance le logiciel sa l'envoye et par exemple si le 'fichier.txt' n'éxiste pas alors sa quitte le logiciel.

    Bref je c'est pas si vous avez compris se que je voulais vous faire comprendre, merci de bien vouloir m'aider si possible.
    Bonne journée et n’hésiter pas a me poser des questions.

  2. #2
    Expert éminent sénior Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    avril 2007
    Messages
    13 060
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 36
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : avril 2007
    Messages : 13 060
    Points : 23 749
    Points
    23 749

    Par défaut

    ​system.net.mail.*
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

  3. #3
    Membre à l'essai
    Homme Profil pro
    Étudiant
    Inscrit en
    janvier 2018
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : janvier 2018
    Messages : 13
    Points : 24
    Points
    24

    Par défaut

    Bonsoir,

    J'ouvre le logiciel sa choisis dans le code se chemin d'accès
    (C:\Mes documents\fichier.txt)
    Et que sa l'envoye directement sur mon adresse hotmail.
    Mais qu'il n'y est aucun bouton.
    Des que je lance le logiciel sa l'envoye et par exemple si le 'fichier.txt' n'éxiste pas alors sa quitte le logiciel.
    Voici un exemple pour envoyer un email avec pièces jointes sans bouton :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    Imports System.Net.Mail
    Public Class Form1
     
        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
            Dim open As New OpenFileDialog
            open.Multiselect = False
            open.Title = "Veuillez choisir un fichier texte"
            open.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments
            open.Filter = "Fichier texte (*.txt)|*.txt"
            If open.ShowDialog = Windows.Forms.DialogResult.OK Then
                SendMail("VOTRE_EMAIL_ICI", "VOTRE_MOT_DE_PASSE_ICI", open.FileName)
            Else
                Application.Exit()
            End If
        End Sub
     
        Private Sub SendMail(MonMail As String, Password As String, Fichier As String)
            Dim client As New System.Net.Mail.SmtpClient
            Dim message As New System.Net.Mail.MailMessage
            client.Credentials = New System.Net.NetworkCredential(MonMail, Password) '
            Try
                client.Port = 25 'définition du port 
                client.Host = "smtp.live.com" 'définition du serveur smtp
                client.EnableSsl = True 'chiffrer la connexion
                message.From = New System.Net.Mail.MailAddress(MonMail) 'ADRESSE_DE_LEMETTEUR_ICI"
                message.To.Add(MonMail) 'ADRESSE_DU_DESTINATAIRE_ICI
                Dim item As New System.Net.Mail.Attachment(Fichier) 'LIEN_DE_LA_PIECE_JOINTE_EVENTUELLE_ICI
                message.Attachments.Add(item) 'ajout de la pièce jointe au message
                message.Subject = "SUJET_DU_MESSAGE_ICI" 'comme titre du message
                message.Body = "CONTENU_DU_MESSAGE_ICI" ' un texte dans le message
                client.Send(message) 'envoi du mail
                MsgBox("l'émail à etait envoyé avec succès!") 'msg avec succés
            Catch ex As Exception
                MsgBox(ex.ToString) ' message d'erreur
            End Try
        End Sub

  4. #4
    Nouveau Candidat au Club
    Homme Profil pro
    Urbaniste
    Inscrit en
    janvier 2018
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Urbaniste

    Informations forums :
    Inscription : janvier 2018
    Messages : 3
    Points : 1
    Points
    1

    Par défaut Erreur

    Merci de ta réponse Miska59 mais je tombe sur un message d'erreur qui est impossible pour a comprendre

    http://prntscr.com/hzjuug

    A tu une idée d'ou cela proviendrais ?

  5. #5
    Membre à l'essai
    Homme Profil pro
    Étudiant
    Inscrit en
    janvier 2018
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : janvier 2018
    Messages : 13
    Points : 24
    Points
    24

    Par défaut

    Bonsoir,
    le problème vient de du Serveur SMTP et PORT :
    nouveau serveur stmp e port :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Voici leurs adresses :
     
    Serveur POP3 : pop-mail.outlook.com (SSL, port 995)
     
    Serveur SMTP : smtp-mail.outlook.com (TSL, port 587)
    exemple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    client.Port = 587 'définition du port 
                client.Host = "smtp-mail.outlook.com" 'définition du serveur smtp
    Je l'ai tester ,il fonctionne très bien.

  6. #6
    Nouveau Candidat au Club
    Homme Profil pro
    Urbaniste
    Inscrit en
    janvier 2018
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Urbaniste

    Informations forums :
    Inscription : janvier 2018
    Messages : 3
    Points : 1
    Points
    1

    Par défaut Merci

    Merci beaucoup et bonne soirée

Discussions similaires

  1. Réponses: 4
    Dernier message: 23/06/2008, 11h47
  2. [Mail] affichage des images dans des mail envoyés avec mail()
    Par moustique95 dans le forum Fonctions
    Réponses: 2
    Dernier message: 04/06/2008, 14h51
  3. Envoyer un mail avec des photos
    Par maverick91 dans le forum VBA Access
    Réponses: 1
    Dernier message: 18/07/2007, 01h17
  4. Réponses: 3
    Dernier message: 19/06/2007, 16h46
  5. Réponses: 2
    Dernier message: 04/07/2006, 10h26

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo