Jorge
Use esto hace bastante tiempo, luego se discontinuó ya que nadie respondía.
Es lo usual: para mantener la privacidad el cliente de correo NO responde.
-- codigo // simplificado --
loCfg := createobject("cdo.configuration")
... completar
loMsg := createobject("cdo.message")
loMsg:configuration := loCfg
... completar
// read receipt
loMsg:fields("urn:schemas:mailheader:disposition-notification-to"):value := remitente
loMsg:fields("urn:schemas:mailheader:return-receipt-to"):value := remitente
loMsg:fields:update()
lomsg:sender := "otradireccion @
demail.com" // para el <read receipt>
lomsg:organization := "MI EMPRESA CORP SA" // nombre de la empresa
loMsg:mdnrequested := .T. // esto activa el read receipt
...
loMsg:send()
-- codigo --
Proba y fijate... deje de usarlo y no se si aun funciona (mi cliente paso a usar un servicio pago para sus envios masivos).
Saludos
--
Claudio Voskian
Buenos Aires - Argentina