Discussion :

[popofpopof]

Bonjour

je vien de crée un base de donée et on me demande de réaliser un envoie par mail au personne qui sont dans notre table

pour cela j'ai réaliser une requete pour sélectionne les adresses mail de ces personne et le Num_Grille a qui ils correspond

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT PRESCRIPTEUR.MAIL_PRESC AS Email, [union grille immo+grille package+renu pr formulaire prescri].NUM_GRILLE
FROM PRESCRIPTEUR INNER JOIN [union grille immo+grille package+renu pr formulaire prescri] ON PRESCRIPTEUR.NUM_PRESC = [union grille immo+grille package+renu pr formulaire prescri].NUM_PRESC;

Je souhaite réalise une automatisation que tout les jour a une heure donnée un mail est envoyer au personne qui sont dans cette requete avec comme critère NUM_GRILLE = 2
mais je en sais comment programme un tel truc et on utilise Outlook 2007 et access 2007

j'ai aussi reusi a réalise la sauvegarde automatique d'un etat en PDF pour le joindre plus tard dans ce mail

qui peux m explique comment faire pour réaliser l'envoi de mail automatique sous access? je débute encore et je souhaite aprendre aide moi SVP

[mike2302]

bonjour popof

Je suis désolé, je ne peut pas t'apporté de reponse car je ne sais pas non plus comment faire et moi aussi je suis débutant...A l'occurence, je cherche un code vba ou une requete SQL qui me permettrai de joindre un fichier à un mail comme tu l'explique dans ton texte avec l'etat en PDF...

connait-tu ce code ou cette requete SQL s'il te plait?

[popofpopof]

voila le code que j'ai trouve pour enregistre un etat en pdf

tu crée un formulaire tu insere un bonton puis tu rentre ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Form_Current()
DoCmd.OutputTo acOutputReport, "imprimer resultat recherche vente", "PDF", "C:\Facture.pdf"
 
End Sub

remplace imprimer resultat recherche vente par le nom de ton formulaire et C:\Facture.pdf par le chemin ou tu soufaite qu'il senregitre avec son nom aussi. Pour info moi j'ai office 2007 et j'ai donc installe le compossant supplementaire pour enregistre en pdf
par contre je cherche toujours pour envoyer des email depuis access de l'aide SVP

[Dolphy35]

Bonsoir,

penser à consulter la

Comment envoyer un état en pièce-jointe d'un email ?

pour automatiser tu peux utiliser le gestionnaire de taches de windows
il y a des posts qui traînent sur le forum http://www.developpez.net/forums/search.php


Dolphy

[popofpopof]

Bonsoir,

penser à consulter la

Comment envoyer un état en pièce-jointe d'un email ?

pour automatiser tu peux utiliser le gestionnaire de taches de windows
il y a des posts qui traînent sur le forum http://www.developpez.net/forums/search.php


Dolphy

mon probleme est que je veux envoi un message mail en utilisant les adresse mail de ma base de donnée et rentre cette etape automatique tu sais comment on peux faire?? merci de votre aide

[Dolphy35]

re,

tu génére ton code dans ta base, ensuite dans Le gestionnaire de tâches plannifiés (de windows) puis lance ton application avec /X "nom de la macro".

la macro éxécute le code d'envoi de mail

ensuite pour générer le code il y a des cours sur le SQL dans la pages des cours

[popofpopof]

re,

tu génére ton code dans ta base, ensuite dans Le gestionnaire de tâches plannifiés (de windows) puis lance ton application avec /X "nom de la macro".

la macro éxécute le code d'envoi de mail

ensuite pour générer le code il y a des cours sur le SQL dans la pages des cours

je ne trouve pas les cours pour m explique correctement la procedure a faire pour faire le code je suis encore débutant tu peux me propose quoi? comme cour? code d'exemple ? que je puise trouve un truc pour comment et continue a cherche et a ameliore

[Dolphy35]

Pour le sql Le Langage SQL appliqué à Access

autre cours intéréssant Création et manipulation des données avec DAO

[Simplifi]

Bonjour popofpopof si tu viens encore sur le forum

je viens juste de réaliser cette fonction:
plusieurs possibilités suivant ce qu'on veut envoyer:
- état en pdf

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
        DoCmd.SendObject acSendReport, Rst_Mail("Nom_état") _
                                     , "PDFFormat(*.pdf) " _
                                     , Mail_Test _
                                     , "", "" _
                                     , Sujet _
                                     , Corps_message _
                                     , False, ""

Rst_Mail est un recordset où j'ai ouvert la table qui enregistre les maillings
mail_test est l'adresse à laquelle j'envoie le test, ensuite cette ligne est remplacée par le champ du recordset de la liste des adresses mail
- un fichier joint

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
        Set Message = CreateObject("CDO.Message")
        'initialisation et configuration de la connexion
        Message.Configuration("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        Message.Configuration("http://schemas.microsoft.com/cdo/configuration/smtpserver") = Serveur
        Message.Configuration("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
        Message.Configuration.Fields.Update
            With Message
            .From = Emetteur
            .TextBody = Corps_message
            .Subject = Sujet
            .To = Mail_Test
            'envoi du mail avec pièce jointe
            .AddAttachment Rst_Mail("Fichier_joint")
            .Send
           End With
           Set Message = Nothing

- du html dans le corps du message avec le même CDO

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
            With Message
            .From = Emetteur
            .TextBody = Corps_message
            .Subject = Sujet
            .To = Mail_Test
            'envoi du mail avec HTML incorporé dans le corps du mail
            .CreateMHTMLBody Fichier_à_incorporer
            .Send
           End With

et j'ai aussi prévu d'éditer le html pour remplacer des balises par des champs pour personnaliser (ex Bonjour <--Prénom--> devient Bonjour Jean)

on peut aussi utiliser une Outlook.application mais le problème est que Outlook demande confirmation à chaque message (en effet je ne sais pas encore signer numériquement mes programmes ....) et pour 800 envois, ça peut être long

Ah, je précise que mon petit bricolage envoie les mails un par un à chaque destinataire (indispensable pour les mails personnalisés)

je peux te filer le code complet de ce que j'ai écrit, mais comme j'y ai passé pas mal de temps, ça risque d'être long à débrouiller

A+

[popofpopof]

Merci bcp pour cette solution j'ai trouve une parade a mon problème, et comme en ce moment je n'ai pas trop de temps pour redevelopper cela je vais attendre un peu merci bcp pour ta solution je compte bien la regarde de plus prés