Visual Basic para Aplicaciones - Enviar E-Mail desde VB a varios Destinos

Life is soft - evento anual de software empresarial
   
Vista:

Enviar E-Mail desde VB a varios Destinos

Publicado por Christian Carter (3 intervenciones) el 06/04/2009 13:04:59
Estimados:

tengo el siguiente codigo para poder enviar E-Mail desde VB6 utilizando la referencia a Outlock 11, pero tengo 2 dudas.
1) como enviar a varios destinos el mismo correo, he probado colocando las direcciones de correo separadas por ; (punto y coma), pero solo lo envia a la primera de las direcciones escritas.

2) como agregar al pie la firma predeterminada de Outlock para asi poder personalizar el mensaje, o solo se puede agregar en el .body?

bueno les dejo el codigo para su ayuda.
gracias de antemano
'*********************************************
Dim objOL As Outlook.Application
Dim msg As Outlook.MailItem

Set objOL = New Outlook.Application
Set msg = objOL.CreateItem(olMailItem)

With msg
'Destinatario(s) del Correo
.To = text1.text
.Subject = "Título del email"
.Body = text1.text & vbcr & text2.text
' lo siguiente por si quieres adjuntar cualquier archivo
.Attachments.Add "c:UnArchivo1.jpg"
' Envia el correo
.Send
End With

Set objOL = Nothing
Set msg = Nothing
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