Hola maialenlopez,
No estoy seguro con que a lo que te refieres con que se envíe mas de una cosa dentro del contenido del
objMail.Body sea más líneas dentro del cuerpo o que si lo quieras cargar con varios contenidos desde una base de datos o algo así, pero pues
objMail.Body es una propiedad de tipo string, y por ende aquí le puedes cargar casi todo lo que quieras, es más podrías pasar el cuerpo del correo como un parámetro del método, así ya lo traes cargado con lo que tu quieras...
Te dejo el ejemplo
Código vb:
Ver originalPrivate Sub SendMail(ByVal _to As String, ByVal _subject As String, ByVal _Body As String)
Dim m_OutLook As Outlook.Application
Try
'* Creamos un Objeto tipo Mail
Dim objMail As Outlook.MailItem
'* Inicializamos nuestra apliación OutLook
m_OutLook = New Outlook.Application
'* Creamos una instancia de un objeto tipo MailItem
objMail = m_OutLook.CreateItem(Outlook.OlItemType.olMailItem)
'* Asignamos las propiedades a nuestra Instancial del objeto
'* MailItem
objMail.To = _to
objMail.Subject = _subject
objMail.Body = _Body
'* Enviamos nuestro Mail y listo!
objMail.Send()
'* Desplegamos un mensaje indicando que todo fue exitoso
MessageBox.Show("Mail Enviado", "Integración con OutLook", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Catch ex As Exception
'* Si se produce algun Error Notificar al usuario
MessageBox.Show("Error enviando mail")
Finally
m_OutLook = Nothing
End Try
End Sub
Espero te sirva
Saludos