Les Trucs & Astuces Informatiques de Michel

http://michel.vergriete.perso.sfr.fr/accueil.htm
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  

Partagez | 
 

 Comment envoyer un message Outlook à partir d'Access ?

Aller en bas 
AuteurMessage
Michel



Nombre de messages : 7
Date d'inscription : 30/05/2006

MessageSujet: Comment envoyer un message Outlook à partir d'Access ?   Ven 13 Oct - 9:56

Comment envoyer un message Outlook à partir d'Access ?

Private Sub envoi_Click()
Dim Envol As New Outlook.Application
Dim Env As MailItem

' Création d'un objet de type message
Set Env = Envol.CreateItem(olMailItem)

'destinataires
Env.to = "b g"
' copie de message
Env.CC = "p e"

' sujet du message
Env.Subject = "Envoi d'un message à partir d'Access"
'le corps du message est récupéré sur le formulaire
Env.Body = Me![message]

' envoi du message
Env.Send ----------------Bogage a ce niveau Qui peut m'aider? merci

' libération de l'objet
Set Env = Nothing
End Sub
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 
Comment envoyer un message Outlook à partir d'Access ?
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Comment envoyer un message de Bienvenue aux nouveaux membres qui s'inscrivent ?
» Comment envoyer un message de bienvenu à un nouveau utilisateur?
» Envoyer un message à un groupe
» comment personnaliser le message d'accueil de son forum ?
» Comment deplacer un message ?

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Les Trucs & Astuces Informatiques de Michel :: Bureautique-
Sauter vers: