[AC-2007] Envoi de mail périodique [Résolu]

[julius26]

Bonjour à tous,

j'ai une requête pour l'évolution de mon appli Access qui gère le suivi de production d'un événement.

Je souhaite envoyer un mail tous les vendredis à 18h à certains utilisateurs avec un export excel d'une requête en PJ.

Savez-vous comment je peux faire cela ?

[Eaques]

Salut,

Si tu travailles avec ACCESS, il y a une chance que tu as aussi outlook.
donc tu peux envoyer des mails par pilotage d'outlook du style

Code :

1
2
3
4
5
6
7
8
9
10
11
12
 
   Dim ol As New Outlook.Application
   Dim olmail As MailItem
   Dim myRecipient As Recipient
 
   Set ol = New Outlook.Application
   Set olmail = ol.CreateItem(olmailitem)
 
   With olmail
   .Attachments.Add fichier
    .Subject = ...
    .....

mais avant d'envoyer l'email, il faut generer le fichier excel en passant par la méthode :

Code :

1
2
 
DoCmd.OutputTo acReport, "etat12f_s", "MicrosoftExcelBiff8(*.xls)", b$, False, "", 0

voila quelques pistes pour t'aider
a+

[julius26]

Merci pour la réponse,

au cas où, existe t-il un moyen d'envoyer ces mails périodiques sans que Access ou outlook soient ouverts ?

[Eaques]

attention la 1ere fois qu'access "communique" avec outook celui-ci ouvre une fenetre de sécurité ou l'utilisateur doit valider !!!

pour passer cette étape, il existe aussi la technique CDO mais je ne connais pas !

mais je pense qu'accès doit etre ouvert ! ou utiliser les taches planifiées et une macro autoexec dans access

@+

[pier.antoine]

Bonjour

Pour CDO, il suffit de faire une peteite recherche dans la faq ou dans le forum, et vous devriez trouver votre bonheur.

Je pense aussi qu'Access doit être ouvert.

CDO permet d'envoyer des mels sont passer par un logiciel de messagerie. Toutes les fonctionalité d'Outlook ne seront peut-être pas présente, mais c'est efficace quand même.

Pierre

[julius26]

ok merci beaucoup pour vos réponses.
Je vais aller rechercher les fonctionnalités CDO pour faire cette manip.