Crear correos electrónicos desde VBA con varios archivos adjuntos

[ChivitoLindo]

Hola!!!

Soy de Guatemala. Estoy haciendo una pequeña base de datos en MSAccess y estoy creando funciones desde el código de Visual Basic for Applications (VBA). Estoy tratando de enviar un correo electrónico con Outlook Express con un archivo adjunto, lo cual ya logré. Sin embargo, quiero enviar un correo con dos o más archivos adjuntos. Alguien puede ayudarme??? No sé cómo hacer para que la función detecte varios archivos.

De antemano, gracias.

[dogduck]

Código:

Set objEmail = CreateObject("CDO.Message")
On Error Resume Next
objEmail.From = "usuario" & "@" & "dominio.org"
objEmail.To = "[email protected]"
objEmail.Subject = "el tema"
objEmail.Textbody = "el cuerpo"
objEmail.AddAttachment "C:\fichero.ext"
objEmail.AddAttachment "C:\otrofichero.ext"
objEmail.Send

salu2

[ChivitoLindo]

Muchas gracias por la ayuda... Me funciona perfecto en MSOutlook. Pero yo necesito enviar el correo con los adjuntos desde Outlook Express. Si alguien pudiera ayudarme, se los agradecería muchísimo.

[Taribo007]

date una vuelta por aqui:

http://www.mvp-access.com/foro

tienes muchos ejemplos.

un saludo

[ChivitoLindo]

Ok, muchas gracias. Si en algo puedo ayudarlos, estoy a la orden.