Lotus Notes - Automatizacion Lotus Notes

Buenas, he realizado un programa en visual foxpro 9, para enviar correo con el Notes.
Pero tengo un problema, tengo mi base de datos y ahora me han asociado otra base de datos con un buzon generico para que lo vean los demas compañeros, lo que pasa es que me conecto con mi usuario a la base de datos del buzon generico con el programa, y ocurre que envio los email con mi direccion de correo eletronico, no con la direccion del buzon generico, de tal forma que si un cliente responde a ese email, me va a venir a mi ,
y la idea es que venga al generico para que cualquiera pueda responder.

se os ocurre algo.la parte del codigo del envio del mensaje es asi:

lt = CREATEOBJECT("Lotus.NotesSession")


lt.Initialize(loClave)

mdir=lt.GetDatabase(loServidor,loNfs) *!* loServidor=servidor Notes,loNfs=base datos.

loMail=mdir.CreateDocument

WITH loMail
.AppendItemValue("form","memo")
.AppendItemValue("SendTo",direccion de correo destino)
.SaveOptions=.T.

.AppendItemValue("Subject",ASUNTO)
.CreateRichTextItem("Body").AppendText(TEXTO DEL CUERPO)
****añadir ficheros adjuntos*****
IF !EMPTY(thisform.archivo.value)
loRichText = .CreateRichTextItem("loAttachment")
loAttachment = loRichText.EmbedObject(1454,"",NOMBRE DEL ARCHIVO)
ENDIF

*****enviamos
.SaveMessageOnSend = .T.
.send(0)

ya lo he solucionado yo.

salu2 :-)

Dinos comoooooooooooooo

Facil

Solo tienes que crear el documento directamente en la nsf mail.box y asi el router no pone quien lo envia sino el remitente que tu digas..

Cuidadin hacer esto si deja traza de quien lo hace en el correo aunque al responder al correo lo hace a quin tu digas