Come creare e inviare un rapporto automatico di Microsoft Access in Microsoft Outlook

July 15

Come creare e inviare un rapporto automatico di Microsoft Access in Microsoft Outlook


Microsoft Access fornisce funzioni di reporting per le piccole e grandi imprese. Il software di database Access utilizza una versione leggera di Visual Basic chiamato Visual Basic, Applications Edition (VBA). Questo linguaggio offre opzioni di scripting, tra cui le funzioni necessarie per inviare un report di Access direttamente alla casella di posta elettronica di un utente tramite Microsoft Outlook. Questo è utile quando si dispone di client che richiedono un rapporto ogni giorno, e VBA aiuta ad automatizzare il processo.

istruzione

1 Selezionare il report che si desidera inviare al destinatario. Si seleziona un report utilizzando il seguente codice:

Set thereport = db.OpenRecordset ( "Seleziona thereport dalla relazione dove id = 2")

Il codice di cui sopra recupera un rapporto con un ID di 2.

2 Creare un oggetto e-mail. L'oggetto e-mail è impostato su un'applicazione di Microsoft Outlook. Il codice seguente crea un oggetto di posta elettronica utilizzato per inviare il rapporto tramite Outlook:

Set app = Nuovo Outlook.Application
Set email = app.CreateItem ()

3 Impostare le proprietà di posta elettronica, tra cui l'oggetto, il corpo e l'attaccamento report di Access. Il codice seguente imposta le proprietà email visibile al destinatario e-mail:

email.subject = "rapporto di mattina per 1/1/2010"
email.Recipients.Add "[email protected]"
email.Body = "Si prega di consultare la vostra relazione allegata"
email.Attachments.Add thereport, olByValue, 1, "Morning Report"

4 Invia l'email e chiudere gli oggetti. Chiusura oggetti consente di liberare risorse del computer, compreso lo spazio di memoria. Di seguito finalizza il codice di report di Access:

email.Send
Set e-mail = Nothing
Set app = Nothing