Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
David Frankenbach's SPYIN class - sending email
Message
De
28/06/1998 17:02:58
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Titre:
David Frankenbach's SPYIN class - sending email
Divers
Thread ID:
00112333
Message ID:
00112333
Vues:
52
I downloaded David's classes for SPYIN and was quite impressed; there is much to learn from them.

I am presently trying to use the Shellexecute code to send email and go to a website simply by clicking. This worked with little-to-no effort. I would like to go further though. I would like to allow the user to enter a subject, any cc's (carbon copy to's), and a message body (the outer two are the most important) and THEN call the default email program and automatically fill those corresponding fields.

Is this possible with his class? If so, how do I reference the code or object?

I'm using this bit of code which he provided:

if !empty(thisform.address)
loObject = createobject( "ShellExecute", thisform.address )
debug
suspend
loObject.Execute()
endif

The code below I got from the web. It has the types of items I'm interested in setting; copied here as reference:

declare SendQuickEmailMesg in c:\vfp\rsi\activex\QuickSMT.dll as email;
STRING @ smtp_yourname,;
STRING @ smtp_youremailhostname,;
STRING @ smtp_youremailaddress,;
STRING @ smtp_subject,;
STRING @ smtp_messagebody,;
STRING @ smtp_mailtoemail,;
INTEGER @ smtp_timeout


email.SMTP_YourName = "Bill Gates"
email.SMTP_YourEmailHostName = "mail.microsoft.com"
email.SMTP_YourEmailAddress = "billg@microsoft.com"
email.SMTP_Subject = "This is a test message"
email.SMTP_MessageBody = "test... test.... test...."
email.SMTP_MailToEmail = "jdoe@somehost.com"
email.SMTP_Timeout = 30000
email.email


Thanks for any assistance out there!

Sincerely,

Mark W. Mitchell
mark@remarkable-systems.com
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform