Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sending mail through VFP APPLICATION
Message
 
 
À
02/09/2005 17:01:00
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows Server 2003
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01046410
Message ID:
01046967
Vues:
17
>I am currently using a code in which it launches outlook Compose message form with all the text I want and then I send it.
>DECLARE INTEGER ShellExecute IN shell32.dll ;
>INTEGER hndWin, STRING cAction, STRING cFileName, ;
>STRING cParams, STRING cDir, INTEGER nShowWin
>
>
>
>but!... I really want to send the mail automatically, without having to use the outlook form as a bridge to sending the mail... is there anyway to send it, without opening the outlook, but still it using outlook account?

Object example...
* OUTLOOKEMAIL, when not useing system-BLAT
PROCEDURE OUTLOOKEMAIL
*___ Microsoft OUTLOOK EMAIL 
   oApp=CreateObject("Outlook.Application")
   NameSpace= oApp.GetNameSpace("MAPI")
   MailItem = oApp.CreateItem(0)
   With MailItem
       .Subject = "Automatic fff Notification!"
       .body= CHR(10)+"Today "+TTOC(DATETIME( ))+ CHR(10)+CHR(13);
              +FILETOSTR("C:\fff\Error.Txt")+ CHR(13)
          .Recipients.Add (lcEmail)
          .Send
             .Recipients.Add ("8004059999@pageme.teletouch.com")
             .Send
   EndWith
   NameSpace.Logoff
ENDPROC
Edgar L. Bolton, B.S. B.B.A.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform