Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem with .send using CDO from VFP
Message
De
06/07/2004 14:35:30
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Titre:
Problem with .send using CDO from VFP
Divers
Thread ID:
00921121
Message ID:
00921121
Vues:
361
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform