Visual Basic - Enviar Mail

Hola amigos: de vuelta por acá con un problema a ver si me pueden dar una mano.
Tengo una aplicación en Visual basic 6.0 que envia unos mail, utilizo MAPI y como programa Outlook express, hasta acá no hay problema y funciona correctamente , el problema es cuando quiero enviar mail utilizando como programa Microsoft Outlook 2000 el mansaje de error es "error 32002 en tiempo de ejecución: ocurrio un fallo inesperado.".
Gracias de antemano y un saludo a todos

Es necesario q envies por Outlook express, seria mejor q envies por visual basic, si quieres yo tengo el codigo para enviar mail y te puedo enviar, bueno cuenta conmigo para lo q quieras

Eduardo, por favor envíame en còdigo para enviar mail por VB6.

Gracias.

Alx.

a q correo quieres q te envie el codigo para enviar mail. ojo en windows XP no funciona pero en windows 98 si.

Private Sub Command1_Click()
'This procedure uses Automation to place a test message in
'the Microsoft Outlook outbox. (If you are online and
'Outlook is open, Outlook will also send the message to
'your email service.) The Outlook program is required, and
'you'll find that the send operation is quicker and more
'memory efficient if Outlook is already running.

Dim out As Object 'create object variable
'assign Outlook.Application to object variable
Set out = CreateObject("Outlook.Application")

With out.CreateItem(olMailItem) 'using the Outlook object
'insert recipients one at a time with the Add method
'(these names are fictitious--replace with your own)
.Recipients.Add "[email protected]" 'To: field
.Recipients.Add "[email protected]" 'To: field
'to place users in the CC: field, specify olCC type
.Recipients.Add("[email protected]").Type = olCC
.Subject = "Test Message" 'include a subject field
.Body = Text1.Text 'copy message text from text box
'insert attachments one at a time with the Add method
.Attachments.Add "c:\vb6sbs\less14\smile.bmp"
'finally, copy message to Outlook outbox with Send
.Send
End With

End Sub

Espero te sirva

Me podrias enviar a mi tambien ese codigo, lo necesito por favor.

Muxas gracias, un saludo

epale, si puedes enviarmelo a mi tambien, ese codigo lo he estado buscando y no lo encuentro de la manera que yo lo necesito.
gracias.

para q descargen el codigo para enviar mail entren a esta pagina:

http://vbasic.webcindario.com

Ahi van a encontrar un programa echo en visual basic, y si quieren pueden enviarme su propios programas para publicarlos.

fui a la pagina pero parece q hay un problema con el link porq no descarga el archivo. la direccion del link que aparece es:
file:///E:/FRANCO/Programas/Mail/Mail.zip

no es correcto.

ya reparé el error de la pagina web asi q pueden bajarde es ta pagina web el codigo para enviar mail:

la pagina es httm://vbasic.webcindario.com