FoxPro/Visual FoxPro - mailto + adjunto

   
Vista:

mailto + adjunto

Publicado por Ángel I. (86 intervenciones) el 28/12/2007 11:39:08
Hola:

Intento enviar un e-mail al cliente de correo predeterminado con un fichero adjunto.
He encontrado información, con ShellExecute... para hacerlo vía API. Pero ninguna de estas opciones me deja incluir un fichero adjunto.

¿Cómo puedo enviar un mensaje (crear), en el cliente de correo predeterminado con un adjunto? (No es necesario enviarlo, sólamente que me abra la ventana con el adjunto incluido)

Trabajo con la versión 7 de Visual FoxPro,
¿En las versiones posteriores está incluida una función "mailto:" que soporte ficheros adjuntos?

Muchas gracias por adelantado.
Un cordial saludo.
Ángel I.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:mailto + adjunto

Publicado por enrique (1041 intervenciones) el 28/12/2007 15:15:21
Revisa los objetos MAPISession y MAPIMessage que se encuentran en VFP
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:mailto + adjunto

Publicado por Miguel (115 intervenciones) el 30/12/2007 17:59:22
para adjuntar archivos utilice esta rutina.

m.cuenta=iif(empty(m.cuenta),"registrar cuenta",alltrim(m.cuenta))
m.sujeto="orden de compra #: "+m.sujeto
m.ruta="c:vsoc mp"+&archivo_adjunto
local lnMaxLength,lcMessageText,lvFieldValue
IF !ThisForm.OleMSess.signon()
RETURN
ENDIF
IF LogSession
thisForm.OleMMess.sessionid=thisForm.OleMSess.sessionid
This.parent.OleMMess.compose
thisform.OleMMess.RecipAddress = m.cuenta
thisform.OleMMess.AttachmentType=mapdata
thisform.OleMMess.AttachmentPathName=m.ruta
ThisForm.OleMMess.msgnotetext = "Adjunto encontrara la orden de compra."
ThisForm.OleMMess.msgsubject=m.sujeto
ThisForm.OleMMess.send(1)
IF logsession
ThisForm.OleMSess.signoff
ENDIF
ENDIF
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar