Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/09/2007, 06:13
Avatar de dogduck
dogduck
 
Fecha de Ingreso: enero-2006
Ubicación: ¿Atlantida, Hesperides, Islas afortunadas?
Mensajes: 2.231
Antigüedad: 19 años, 2 meses
Puntos: 19
Re: Crear correos electrónicos desde VBA con varios archivos adjuntos

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