Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem with .send using CDO from VFP
Message
 
À
06/07/2004 14:35:30
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
00921121
Message ID:
00921134
Vues:
51
And recipients?
oMSG.Recipients.Add("display name","SMTP:Email@address",1)
MartinJ

>I am currently doing this:
>
>
lcsubject="Commissary Run Info fm Date: "+lcdatestr+" Jail: "+lcjailabbrev+" Cart: "+lccartabbrev
>
>oMSG = createobject("CDO.Message")
>oMSG.To = ALLTRIM(this.oapplication.osyssetup.cwhemail)
>oMSG.From = ALLTRIM(this.oapplication.osyssetup.cexpemailfm)
>oMSG.Subject = (lcsubject)
>FOR lnloopctr=1 TO 4
>IF NOT EMPTY(lafiles2(lnloopctr))
>oAtt=oMSG.AddAttachment(lafiles2(lnloopctr))
>IF lnloopctr=4
>llemailed=.t.
>ENDIF
>ENDIF
>ENDFOR
>oMSG.TextBody = ("Sent: "+TTOC(DATETIME()))
>
>&& Need to add a confirmation here somehow
>oMSG.Send()
>
>
>Problem: Above works fine when run from the server.
>Now I am running the EXE from a workstation. Get OLE error when hits oMsg.Send()
>
>Ideas?
>Thanks,
>John
"Navision is evil that needs to be erazed... to the ground"

Jabber: gorila@dione.zcu.cz
Jabber? Jabbim
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform