Envio de Mail con Mapi

Estoy intentando enviar Email con mapi con un ejemplo que me bajé de
PortalFox pero cuando envío el primero me dá un mensaje diciendo que un
programa está intentando enviar un Mensaje a mi nombre y me pide
autorización. Si le doy que sí, lo envía a la Bandeja de Salida. Pero si
intento enviar más Emails no lo hace, y tampoco dá ningún error.
El codigo que sigue es el que tengo en el botón "Enviar".
Les agradezco cualquier sugerencia.
Tengo VPF6 SP5 Windows XP y Outlook Express 6

Evento Click:
*
thisform.addobject("MapiSesion", "olecontrol","MSMAPI.MapiSession")
IF Type("thisform.MapiSesion")#"O"
messagebox("No se puede iniciar el programa de Correo")
thisform.release
ENDIF

thisform.addobject("MapiMensaje", "olecontrol","MSMAPI.MapiMessages")
IF Type("thisform.MapiMensaje")#"O"
messagebox("No se puede iniciar el programa de Correo")
thisform.release
ENDIF

thisform.MapiMensaje.AddressResolveUI=.F.

With thisform.MapiSesion
.LogonUI=.T.
.DownLoadMail=.F.
.NewSession=.T.
.SignOn
EndWith

With thisform.MapiMensaje
.msgIndex= -1
.SessionId= thisform.MapiSesion.SessionID
.RecipDisplayName= ALLT(thisform.cDestinatario.value)
.MsgSubject= ALLT(thisform.cAsunto.value)
.MsgNoteText= ALLT(thisform.cTexto.value)
.send()
EndWith

thisform.MapiSesion.SignOff
*


Un saludo para todos.
Diana Borello.-
dborello02@hotmail.com