Es posible con vfp6 enviar email sin utilizar outlook ??

On Tue, 22 Mar 2005 17:09:37 -0500, "Jose Luis Lopez"
wrote:

Mostrar la cita

Me dicen que utilizando aspxp.mail puedo enviar email directamente desde
vfp6 , es esto posible ? en donde lo encuentro y como se utiliza ? es gratis
??

Sin Outlook puedes enviar usando MAPI, o SMTP o CDO o programas
externos como Blat o como el que mencionas (que no conozco)

Ver:
http://fox.wikis.com/wc.dll?Wiki~SendMapiEmail

Ejemplo de CDOSYS: (viene con Win2K y WinXP, CDONTS viene con NT).

#DEFINE cdoSendUsingPort 2
#DEFINE smtpserverport 25
#DEFINE smtpserver "mail.yourmailserver.net"

LOCAL loMsg
loMsg = NEWOBJECT("CDO.Message")
WITH loMsg
.FROM = ""
.TO = ""
.BCC = ""
.Subject = "Mi Asunto"
.TextBody = "Mensaje va aqui"

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...sing").VALUE
= cdoSendUsingPort

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...rver").VALUE
= smtpserver

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...port").VALUE
= smtpserverport
.Configuration.FIELDS.UPDATE
.SEND
ENDWITH
loMsg = NULL



Ejemplo de SMTP, con la clase wwIPStuff de Rick Strahl,
(http://www.west-wind.com/wwIPStuff.asp) para email (hace mucho mas
que eso):
Set Procedure to wwUtils
Set Classlib to wwIPStuff.Vcx
local loSMTP
loSMTP = CreateObject("wwIPStuff")
loSMTP.cMailServer = "mail.yourmailserver.net"
loSMTP.cSenderEmail = ""
loSMTP.cSenderName = "Moe Howard"
loSMTP.cRecipient = ","
loSMTP.cCCList = ","
loSMTP.cSubject = "Mi Asunto"
loSMTP.cMessage = "Mensaje va aqui"
loSMTP.cAttachment="c:\config.sys,c:\temp\vfpprog.prg"
loSMTP.SendMailAsync()




Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(address munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net

Alex muchisimas gracias

Jose Luis



"Alex Feldstein" escribió en el mensaje
news:
Mostrar la cita

On Tue, 22 Mar 2005 17:09:37 -0500, "Jose Luis Lopez"
wrote:

>Me dicen que utilizando aspxp.mail puedo enviar email directamente desde
>vfp6 , es esto posible ? en donde lo encuentro y como se utiliza ? es

gratis
Mostrar la cita

>??

Sin Outlook puedes enviar usando MAPI, o SMTP o CDO o programas
externos como Blat o como el que mencionas (que no conozco)

Ver:
http://fox.wikis.com/wc.dll?Wiki~SendMapiEmail

Ejemplo de CDOSYS: (viene con Win2K y WinXP, CDONTS viene con NT).

#DEFINE cdoSendUsingPort 2
#DEFINE smtpserverport 25
#DEFINE smtpserver "mail.yourmailserver.net"

LOCAL loMsg
loMsg = NEWOBJECT("CDO.Message")
WITH loMsg
.FROM = ""
.TO = ""
.BCC = ""
.Subject = "Mi Asunto"
.TextBody = "Mensaje va aqui"

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...ion/sendus
ing").VALUE
Mostrar la cita

= cdoSendUsingPort

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...ion/smtpse
rver").VALUE
Mostrar la cita

= smtpserver

.Configuration.FIELDS("http://schemas.microsoft.com/cdo/co...ion/smtpse
rverport").VALUE
Mostrar la cita

= smtpserverport
.Configuration.FIELDS.UPDATE
.SEND
ENDWITH
loMsg = NULL



Ejemplo de SMTP, con la clase wwIPStuff de Rick Strahl,
(http://www.west-wind.com/wwIPStuff.asp) para email (hace mucho mas
que eso):
Set Procedure to wwUtils
Set Classlib to wwIPStuff.Vcx
local loSMTP
loSMTP = CreateObject("wwIPStuff")
loSMTP.cMailServer = "mail.yourmailserver.net"
loSMTP.cSenderEmail = ""
loSMTP.cSenderName = "Moe Howard"
loSMTP.cRecipient = ","
loSMTP.cCCList = ","
loSMTP.cSubject = "Mi Asunto"
loSMTP.cMessage = "Mensaje va aqui"
loSMTP.cAttachment="c:\config.sys,c:\temp\vfpprog.prg"
loSMTP.SendMailAsync()




Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(address munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net