1
Abra Microsoft Access y abra la base de datos en la que desea automatizar el mensaje de correo electrónico . Haga clic en la pestaña o la cinta " desarrolladores" y haga clic en el botón " VBA " para abrir el archivo de código.
2
Crear el miembro objeto de archivo para su función y establecer su propiedad con el correo electrónico Groupwise el archivo que desea enviar. Agregue el código siguiente al archivo de acceso:
archivo Set
= New FileSystemObjectemail = file.GetFile ("file " )
Reemplazar "file " con el nombre del archivo de correo electrónico de GroupWise que desea enviar.
3
Crear el cuerpo del correo electrónico , el asunto y las "a" propiedades de la dirección . El siguiente código crea el objeto VBA email :
Set perspectivas = New Outlook.Applicationoutlook.To = MailList ( "email" ) outlook.Subject = "Enviar correo electrónico Groupwise " outlook.Body = " reenviado correo electrónico "email outlook.Attachments.Add , olByValue , 1 ", Groupwise email "
Reemplace cada propiedad correo electrónico con sus propios valores.
4
enviar el correo electrónico . El código siguiente se envía el correo electrónico con el archivo adjunto Groupwise :
outlook.Send