Visual Basic - Envio de correo

Hola a todos, alguien me podría decir como puedo hacer para enviar correo electronico con Visual Basic 6?

gracias de antemano.

Pues puedes hacerlo de varias maneras, una de ellas sería hacerlo con el Outlook:

Dim objOutlook As Object
Dim objOutlookMsg As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(0)
With objOutlookMsg
.To = "[email protected]
.Cc = "[email protected]"
.Subject = "Hola"
.Body = "Aquí va el cuerpo"
.HTMLBody = "versión HTML del mensaje"
.Attachments.Add ("c:\archivo.txt") 'Adjuntos
.Send
End With
Set objOutlookMsg = Nothing
Set objOutlook = Nothing

Un saludo.

Gracias, lo probare y te cuento si tengo algun problema.

Sale error en esta línea: Set objOutlook = CreateObject("Outlook.Application")
ActiveX Component no puede crear el objeto.