Microsoft Access fournit des fonctions de reporting pour les petites et les grandes entreprises. Le logiciel de base de données Access utilise une version allégée de Visual Basic appelé Visual Basic pour Applications (VBA). Cette langue vous fournit des options de script, y compris les fonctions nécessaires pour envoyer un rapport d`accès directement à la boîte de réception d`un utilisateur via Microsoft Outlook. Ceci est utile lorsque vous avez des clients qui nécessitent un rapport chaque jour, et VBA vous aide à automatiser le processus.
Sélectionnez le rapport que vous souhaitez envoyer au destinataire. Vous sélectionnez un rapport en utilisant le code suivant:
Set theReport = db.OpenRecordset ( "Sélectionnez theReport du rapport où id = 2")
Le code ci-dessus récupère un rapport avec un ID de 2.
Créer un objet de courrier électronique. L`objet de messagerie est configuré pour une application Microsoft Outlook. Le code suivant crée un objet de courrier électronique utilisé pour envoyer le rapport via Outlook:
Set app = New Outlook.Application
Set email = app.CreateItem ()Définissez les propriétés de messagerie, y compris le sujet, le corps et l`accès rapport attachement. Le code suivant définit les propriétés de votre e-mail visibles à l`adresse e-mail:
email.subject = "rapport de matin pour 1/1/2010"
email.Recipients.Add "[email protected]"
email.Body = "S`il vous plaît voir votre rapport ci-joint"
email.Attachments.Add theReport, OlByValue, 1, "Morning Report"Envoyer l`e-mail et fermer les objets. Fermeture des objets libère des ressources informatiques, y compris l`espace mémoire. Ce qui suit finalise votre code de rapport d`accès:
email.Send
Set email = Nothing
Régler app = Nothing
