Envoyer un e-mail avec attachement

Soyez le premier à donner votre avis sur cette source.

Snippet vu 16 031 fois - Téléchargée 30 fois

Contenu du snippet

pour envoyer un e-mail avec attachement Vous devrez ajouter une référence à la bibliothèque de Microsoft Outlook

Source / Exemple :


Dim o As Outlook.Application
    
    Set o = New Outlook.Application
    
    Dim mail As Outlook.MailItem
    
    Set mail = o.CreateItem(olMailItem)
    
    With mail
        .Subject = "Subjet"
        .To = "nix@codes-sources.com"
        .Body = "Message"
        .Attachments.Add "adrrese du fichier a attacher"
        .Send
    End With
    
    Set mi = Nothing
    Set o = Nothing

A voir également

Ajouter un commentaire Commentaires
Messages postés
30
Date d'inscription
jeudi 15 juillet 2004
Statut
Membre
Dernière intervention
7 mars 2012

Mon programme tourne en tâche planifié, et celui a besoin d'emettre une notification à d'autres gens !!!!!!!!!!!!!!!!
Messages postés
30
Date d'inscription
jeudi 15 juillet 2004
Statut
Membre
Dernière intervention
7 mars 2012

Salut Tout le monde,
Je n'arrive pas à désactiver le messagebox suivant: Ce message d'avertissement vous informe qu'un programme tente d'envoyer un message sous votre identité et vous demande si vous autorisez l'envoi de ce message. Ce message d'avertissement contient un bouton Oui et un bouton Non.
Ca m'énerve énormément, surtout que j'ai cherché partout sans succès ):):):
Messages postés
24
Date d'inscription
vendredi 29 juin 2007
Statut
Membre
Dernière intervention
9 mai 2010

Est ce dans la zone text tu fichier a envoyer qu'on doit inserer ce code ou bien sur le bouton parcourir
Messages postés
9
Date d'inscription
mardi 10 juillet 2007
Statut
Membre
Dernière intervention
7 juillet 2008

salut,

meme probleme que toi AFRICABOURESA.
si t as trouver une solution STP n hesite pas a me la donner.
à part le ExpressClickYes il le fai par default mais il ne marche pas quand le PC est verrouiller et moi il me faut un truc qui marche meme si le PC est verrouiller.

merci d avance pour ton aide.
Messages postés
2
Date d'inscription
samedi 3 février 2007
Statut
Membre
Dernière intervention
8 février 2007

Je crois k'il fo disposer de exchange server pour faire cette confuguration de sécurité !
Afficher les 10 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.

Du même auteur (spaa05)