No ha ido mal del todo, he puesto este codigo exactamente y me a petado en el Send True, tengo outlook 2003 y he agregado los dos componentes pero no les he tocado ninguna opción, lo comento por si hay que tocar algo.
Una pregunta que te queria hacer es: ¿UserName para que es? el nombre del perfil, el otro dia cuando hacia pruebas con el codigo me salio que el perfil seleccionado era erronio, y me mostro luego mi perfil, que en mi caso es Outlook, no se si estara relacionado con eso, hoy con tu codigo me ha salido otra ver, pero solo me sale la primera ver que ejecuto el codigo, mil gracias!
Cita: Private Sub cmdmail_Click()
'sesion de correo
With MAPISession1
.UserName = "Outlook"
.NewSession = True
.DownLoadMail = False
.SignOn
End With
With MAPIMessages1
.SessionID = MAPISession1.SessionID
.MsgIndex = -1
.RecipIndex = 0
.RecipType = mapToList
.MsgNoteText = tbcliente.Text & vbCr & tbreclam.Text
.Send True ' Para enviar el email
End With
MAPISession1.SignOff 'Cerrar sesión
End Sub