FoxPro/Visual FoxPro - Enviar correos electronicos (eMail) desde GMail o

Para que funcione correctamente debes tener abierto el puero 587 para
el envio de correos.
Por lo general la mayoria de los proveedores de servico de intenet lo
tienen abierto
o en su caso configurar el proxy o modem o firewall para que permitan
la salida de
los correos.

Hago un atento llamado a todos los miembros del foro para ver quien se
apunta para
aportar los seriales del componente 'Chilkat.MailMan2'

---------------------------------------------------------------------------­----------------
* Halcón Divino.
*---------------------
* Programa VFP 6.0 para enviar correos electronicos (eMail) desde
GMail o HotMail
* usando el Componente ChilKat MailMan2
*
* Descarga el componente
* Chilkat Email ActiveX (POP3/SMTP) • v8.0.0 • 30-July-2010
* http://www.chilkatsoft.com/downloads_ActiveX.asp
*

LOCAL Mailman
LOCAL email

Mailman = CreateObject('Chilkat.MailMan2')
email = CreateObject("Chilkat.Email2")

Mailman.UnlockComponent("Anything for 30-day trial")
Mailman.SmtpSsl = 1 && el 1 significa que debe de utilizar
autenticación
Mailman.SmtpPort = 587 && este es el puerto que utilizará para el
env{io en smtp

* usando H O T M A I L
Mailman.SmtpHost = "smtp.live.com" && este es el servidor smtp de
hotmail
Mailman.SmtpUsername = "[email protected]" && usuario de smtp,
cuenta de correo de hotmail de donde se enviaran los correos
Mailman.SmtpPassword = "XXXXXXXXX" && contraseña de la cuenta de
correo de hotmail de donde se enviaran los correos

* usando G M A I L
*Mailman.SmtpHost = "smtp.gmail.com" && este es el servidor smtp de
gmail
*Mailman.SmtpUsername = "[email protected]" && usuario de smtp,
cuenta de correo de gmail de donde se enviaran los correos
*Mailman.SmtpPassword = "XXXXXXXXX" && contraseña de la cuenta de
correo de gmail de donde se enviaran los correos
*email.From="<[email protected]>"

email.From="<[email protected]>"
email.AddTo("Juan Perez", "[email protected]")
email.AddTo("Pedro Sanchez", "[email protected]")

email.AddFileAttachment ("C:\factura.xml")
email.AddFileAttachment ("C:\factura.pdf")
email.AddFileAttachment ("C:\Reporte.xls")

email.subject = "Esta es una prueba"
email.Body = "Correo de prueba enviado con componente chilkat con un
programa VFP"

mError = mailman.SendEmail(email)

If (mError = 0) Then
MESSAGEBOx (mailman.LastErrorText)
Else
MESSAGEBOx("Correo enviado!")
EndIf

Return

Hago un atento llamado a todos los miembros del foro para ver quien se
apunta para
aportar los seriales del componente 'Chilkat.MailMan2'

Saludos
Halcón Divino
Monterrey, México

Hola Halcon, ahi te van los numeros de serie:

Mailman.UnlockComponent("MAILT34MB34N_3ED277200UHK")
*Mailman.UnlockComponent("MAILT34MB34N_515618270UGL"
*Mailman.UnlockComponent("MAILT34MB34N_6B4BD2280UGX"
*Mailman.UnlockComponent("MAILT34MB34N_6B8AF6180UGR"

Oye Halcon, descargue tu aplicacion de FE, me fue de gran utilidad,
solo tengo una duda con el repor de factura.

Me podrias decir como se ajusta la banda de detalles, y tambien comentarte
que en la factura no imprimes la cadena original.

A ver si me puedes enviar por correo la duda que tengo (ajustar la banda de detalle, o en su defecto si me puedes decir donde descargar un manual del report de vfp)

Gracias por tu ayuda.

Reynosa, Tam

Hola Luis Gutierrez, leí tu comentario sobre los reportes de VisualFox y noté que tienes dudas
sobre ajustar la banda de detalles.

Si pudieras enviarme mas detalle sobre el problema que tienes, creo que te podría ayudar.

Otra dato que noté en tu comentario es sobre FE, te comento que ya incorporé a mi sistema de Facturación, la generación CFD, ahora me hace falta el CFDI, no se si tengas información sobre este asunto, ya que ahora necesito es el timbrado con un PAC.

Si mepudireas dar algunas referencias te lo agradecería.

Saludos de Cancún Mexico

Ing. Vega

Ya baje el CHILKAT por Internet, mi pregunta es si este tiene un tiempo limite de uso y debo comprar alguna licencia o como hago para seguirlo usando. Gracias.

Hola que tal, excelente solucion, se los agradezco mucho,
Gracias buen día