Visual Basic - Agregar adjunto como parte del mensaje en VB 6

Life is soft - evento anual de software empresarial
 
Vista:

Agregar adjunto como parte del mensaje en VB 6

Publicado por Harold (2 intervenciones) el 01/07/2009 19:15:18
Estimados,

Favor alguien que me ayude... necesito enviar mail por medio de mi aplicacion VB 6 lo hago con el siguiente codigo.

Mi problema viene porque quiero agragar una imagen o texto e imagen de un richtextbox o de cualquier aplicacion que lo deje en la papeleria despues de copiar.

He probado poniendolo en el Body pero no me pasa lo que adjunto y ya he probado con Attachments.Add pero esto lo adjunta y lo que deseo es que forme parte del mensaje y no como adjunto.

Dim myRecipient As Outlook.Recipient
Dim objOutlook As Outlook.Application
Dim New_Email As Object
Set objOutlook = New Outlook.Application
Set New_Email = objOutlook.CreateItem(olMailItem)
Set myRecipient = New_Email.Recipients.Add(TO_PARAM)
Set myRecipient = New_Email.Recipients.Add(CC_PARAM)
myRecipient.Type = olCC
New_Email.Body = MSG_PARAM
New_Email.Subject = SUBJECT_PARAM
New_Email.Display

Desde ya le quedo agradecido
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder