Visual Basic.NET - Envío de email con vb.net

 
Vista:

Envío de email con vb.net

Publicado por Marcos (5 intervenciones) el 24/01/2003 08:34:58
Estoy desarrollando una aplicación y necesito poder mandar mensajes de email. Lo estoy haciendo con vbasic .net. He encontrado un control en www.ambsoftware.com, pero no consigo que funcione. Por favor, sabe alguien cómo hacerlo?. Muchas gracias de antemano.
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

RE:Envío de email con vb.net

Publicado por Ernesto (26 intervenciones) el 30/01/2003 17:04:23

Para el envío de mail te conviene utilizar la librería de Outlook (Referencias - Microsoft outlook 8.0 ú 9.0 library)

El archivo al que hace referencia es msoutl8.tlb

No es muy difícil, creás un objeto de tipo Application, etc

Dim j As New Outlook.Application

Dim m As New Outlook.MailItem

m = j.CreateItem(olMailItem)

m.To = "[email protected]"
m.Attachments.Add ("C:\Archivo1")
m.Subject = "Prueba"
m.Body = "Hola" & vbCrLf & "línea 2"
m.Send

j = nothing
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Envío de email con vb.net

Publicado por marc (1 intervención) el 20/07/2005 10:58:39
Estoy haciendo un programa en windows forms que se encarga de buscar en una tabla unos expedientes y enviarselos via e-mail a los agentes correspondientes.

Mi problema es que a la hora de enviar el email me aparace un mensaje del outlook que dice que un programa esta intentando mandar un email con su nombre y pide la confirmación del envio.

El problema es que este programa tendría que ser automatico y no debería pedir ninguna confirmación.

Mi pregunta es ¿hay alguna forma de desactivar esa opcion o si no mas de que no te pida la confirmación del envio?

El Código para enviar el email es el siguiente.

'* Creamos un Objeto que hará referencia a nuestra aplicación

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 = "[email protected]" 'Email

objMail.Subject = "Notificación Apertura Siniestros"

'* Envio de mail en formato HTML

objMail.BodyFormat = Outlook.OlBodyFormat.olFormatHTML

objMail.HTMLBody = mailBody

'objMail.Body = mailBody

'* 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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar