Visual Basic - como mandar un mail desde una aplicacion?

gracias

Si tienes Outlook lo más fácil es que en referencias lo cojas, abras una aplicación y lo uses:

Para probar el código añadir en las referencias Outlook y crear formulario con un botón y 3 cajas de texto:

txtFichero.Text -> Fichero que quieres vaya con el correo (opcional)
txtDestinatario.Text -> E-mail del destinatario del correo
txtMensaje.Text -> Mensaje que deseas enviar

Private Sub Command1_Click()

Dim Aplicacion As New Outlook.Application
Dim mensaje As Outlook.MailItem

On Error GoTo err_Mensaje

Set mensaje = Aplicacion.CreateItem(olMailItem)
mensaje.Attachments.Add txtFichero.Text
mensaje.To = txtDestinatario.Text
mensaje.Subject = "Prueba de correo"
mensaje.Body = txtMensaje.Text
mensaje.Send

Set mensaje = Nothing
Set Aplicacion = Nothing

Exit Sub

err_Mensaje:
MsgBox Err.Number & " - " & Err.Description
Set mensaje = Nothing
Set Aplicacion = Nothing

End Sub

Puedes utilizar MAPI, en http://my.execpc.com/~dg/tutorial/howmapi/howmapi.htm tienes un pequeño tutorial.

http://www.macroheavy.com/vb/leccion37/leccion37.htm