Rutina enviar mail con dato adjunto
Hola experto mi correo es [email protected] me podrías enviar la rutina enviar mail con dato adjunto. Mil Gracias
1 Respuesta
Respuesta de Hector Cevallos
1
El código para enviar mail es
**ENVIAR EL EMAIL
cAdjunto = "C:\archivo.jpg"
ObjetoMail = CREATEOBJECT("Outlook.Application")
Mail = ObjetoMail.CreateItem(0)
Mail.Subject = "Asunto del Mail"
Mail.To = "[email protected]"
Mail.Body = "mensaje de prueba"
** Para enviar copias..
Mail.bcc = "[email protected];[email protected]"
** Para Adjuntar archivos
Mail.Attachments.Add(cAdjunto)
** Envía El Mail
Mail.Send
ObjetoMail = .Null.
