MANOLO wrote:tienes un ejemplo que como hacer para enviar ficheros adjuntos desde cdo.Hola Manolo y amigos:
Gracias, Manuel. Está mucho mejor.
Saludos.
Hola compañeros.
Con CDOSYS tengo una duda y es que pasa con los emails enviados. Mi pregunta concreta es la siguiente, si con mi usuario me envio a mi mismo desde un programa fivewin no deberia guardar un mensaje en elementos enviados y otro en elementos recibidos. Si ejecuto el ejemplo con mis datos va a las mil maravillas pero sencillamente solo recibo el mail enviado en la carpeta de inbox y no queda constancia para nada en la carpeta send. Alguien sabe como deberia hacer para que me guarde la copia enviada en la carpeta send.
Otra consulta es como tengo que hacer para solicitar el acuse de recibo. Creo que es un procedimiento automatico. Pero no encuentro en ningun lado como se puede hacer.
saludos.
Andy
Otra consulta es como tengo que hacer para solicitar el acuse de recibo. Creo que es un procedimiento automatico. Pero no encuentro en ningun lado como se puede hacer.
:MDNRequested = .T. // Solicitud de reconocimientooEmailMsg := CREATEOBJECT ( "CDO.Message" )
oEmailMsg:MDNRequested = .T. // Solicitud de reconocimientoGracias Anserkk, muy apreciada tu colaboracion.
Un saludo.
Andy
hola,
como puedo sacar el cdo.message de la memória. En VB set = nothing como hacer en fwh?
Abrazos,
Junior
mmercado wrote:MANOLO wrote:tienes un ejemplo que como hacer para enviar ficheros adjuntos desde cdo.Hola Manolo y amigos:
Aquí pueden descargar un ejemplo completamente funcional, incluyo el ejecutable y los fuentes.
http://www.box.net/shared/o7oxcfqlsm
Este ejemplo lo he probado con éxito usando GMail y con el servidor de correo de mi proveedor de internet (smtp.prodigy.net.mx).
Espero les sea de utilidad.
Un abrazo.
Manuel Mercado
Function MANUEL()
Local oDlg, aCtl[ 20 ], oFont
local ctext
Local cMailServer := PadR( "smtp.speedy.com.ar", 60 ), ; // servidor de correo
cFrom := PadR( "luissaenz@speedy.com.ar", 60 ), ; // remitente
cTo := PadR( "surgom@yahoo.com.ar", 180 ), ; // destinatario (uno o varios separados con comas)
cBCC := PadR( "rdsaenz@speedy.com.ar", 180 ), ; // copias ocultas a (uno o varios separados con comas)
cAttach := PadR( "c:\fwh712\bitmaps\fivewin.bmp", 180 ), ;// archivo anexo (uno o varios separados con comas)
cSubject := Space( 60 ), ; // asunto
cBody := Space( 500 ), ; // cuerpo del mensaje
nPort := 25, ; // puerto usado por el servidor de correo
cUser := Space( 60 ), ; // nombre de usuario para autenticación
cPass := Space( 30 ) // contraseña para autenticaciónkarinha wrote:http://www.fivewin.com.br/exibedicas.asp?id=1063
Salu2
A tu ordenes!
Salu2
Gracias Karina esta noche lo pruebo y te comento
Luis
Karina me funcionó en hotmail y yahoo pero no logro hacerlo funcionar con speedy que es justo el que tengo en mis pc y en las empresas. Voy a seguir probando con speedy a ver en que puede estar el error ya que la configuración es sencilla.
Gracias por tu atención.
Bueno Karina, no hay mejor que irse a dormir cuando algo no sale, hoy me levante y cuando iba hacia mi oficina (en otra ciudad), me di cuenta que en mi casa desde dónde estaba probando tengo otro distribuidor de internet (aunque uso el mismo correo), llegue aquí que tengo el mismo proveedor que el correo que utilizo y funcionó perfectamente. No así cdosys.
Gracias a tu ayuda podré enviar las facturas electrónicas sin necesidad de instalar el blat en la empresa.
Muchas gracias nuevamente
Luis
surGom wrote:Bueno Karina, no hay mejor que irse a dormir cuando algo no sale, hoy me levante y cuando iba hacia mi oficina (en otra ciudad), me di cuenta que en mi casa desde dónde estaba probando tengo otro distribuidor de internet (aunque uso el mismo correo), llegue aquí que tengo el mismo proveedor que el correo que utilizo y funcionó perfectamente. No así cdosys.
Gracias a tu ayuda podré enviar las facturas electrónicas sin necesidad de instalar el blat en la empresa.
Muchas gracias nuevamente
Luis
