RE: enviar emails desde visual basic
Hola.No te he entendido bien lo que quieres pero espero que esto te sirva.Es para enviar un email desde vb utilizando outlook 2000
==> Herramientas / Referencias / Microsoft Outlook 9.0...
Dim Emaila As Outlook.Application
Dim mens As MailItem
Set Emaila = CreateObject("Outlook.application"
Set mens = Emaila.CreateItem(olMailItem)
Email.setfocus Caja de texto del formulario donde poner la direccion de correo
With mens
.Display Para abrir outlook (Si no pones esto lo hace automaticamente)
.To = Email.text Si siempre es la misma direccion poner la direccion entre "
.Subject = " " Asunto
.Body = " " Lo que quieras escribir
.send
.Attachments.Add("ruta"

Para adjuntar algo
End With
==>No se si esto es obligatorio: Emaila.Quit
Set Mens=Nothing
*Si lo que va en el body lo quieres poner usando algunos campos de la tabla o formulario puedes crear un string y concatenar los campos
ej:Text1.setfocus campo del formulario
Cuerpo = "Para quien: " & text1.text & VbCr
Text2.setfocus
Cuerpo= Cuerpo & "Problema: " & text2.text
esto ultimo yo no lo he utilizado pero me han dicho que funciona,puedes hacer la prueba
Espero que te sirva
</TR>