Cómo crear y enviar un informe de Microsoft Access automática de Microsoft Outlook

Microsoft Access proporciona funciones para pequeñas y grandes empresas de informes. El software de base de datos Access utiliza una versión ligera de Visual Basic llamado Visual Basic para Aplicaciones ( VBA) . Este lenguaje le proporciona opciones de script , incluyendo las funciones necesarias para enviar un informe de Access directamente al buzón de un usuario a través de Microsoft Outlook. Esto es útil cuando usted tiene clientes que requieren un informe cada día, y VBA ayuda a automatizar el proceso. Instrucciones
1

Seleccione el informe que desea enviar al receptor . Seleccione un informe con el siguiente código :

Establecer theReport = db.OpenRecordset ( "Select theReport del informe donde id = 2 " )

El código anterior recupera un informe con un ID de 2 .
2

Crear un objeto electrónico . El objeto de correo electrónico se establece en una aplicación de Microsoft Outlook. El siguiente código crea un objeto electrónico utilizada para enviar el informe a través de Outlook :

Set app = New Outlook.ApplicationSet email = app.CreateItem ()
3

Ajuste el propiedades de correo electrónico como el asunto, el cuerpo y el apego informe de Access . El código siguiente establece las propiedades de correo electrónico visibles para el destinatario del correo electrónico :

email.subject = "Informe de la mañana por 01/01/2010 " email.Recipients.Add " recipient@domain.com " email.Body = " Por favor consulte a su informe adjunto " email.Attachments.Add theReport , olByValue , 1 , " informe de la mañana "
4

Enviar el correo electrónico y cerca de los objetos. Objetos de cierre libera a los recursos informáticos, incluidos el espacio de memoria . El siguiente informe finaliza su código de acceso:

email email.SendSet = NothingSet app = Nada