Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Group emailing from webpage
Message
General information
Forum:
Visual FoxPro
Category:
Internet applications
Miscellaneous
Thread ID:
00164387
Message ID:
00164452
Views:
24
>John,
>
>once more with gusto...
>
>Here's ShellExecute compatible code:
>
>
* mailto.prg 06-28-98
>
>* this function initiates the default email client
>
>* 29-Jun-98 added clauses based on KB article about IE4
>
>lparameters pcRecipient, pcSubject, pcBody, pcCC, pcBCC
>
>local oShell, lcRecipient, lcSubject, lcBody, lcCC, lcBCC
>
>if ( type( "pcRecipient" ) != "C" )
>   lcRecipient = ""
>else
>   lcRecipient = alltrim( pcRecipient )
>endif
>
>if ( type( "pcSubject" ) != "C" )
>   lcSubject = ""
>else
>   lcSubject = "?subject=" + pcSubject
>endif
>
>if ( type( "pcBody" ) != "C" )
>   lcBody = ""
>else
>   lcBody = "&body=" + strtran( alltrim( pcBody ), chr(13), "%0d" )
>   lcBody = strtran( lcBody, chr(10), "%0a" )
>endif
>
>if ( type( "pcCC" ) != "C" )
>   lcCC = ""
>else
>   lcCC = "&cc=" + alltrim( pcCC )
>endif
>
>if ( type( "pcBCC" ) != "C" )
>   lcBCC = ""
>else
>   lcBCC = "&bcc=" + alltrim( pcBCC )
>endif
>
>set classlib to dfwinapi additive
>
>oShell = createobject( "ShellExecute" )
>with oShell
>   .mcDocApp = "mailto:" + lcRecipient + lcSubject + lcCC + lcBCC + lcBody
>   .Execute()
>endwith
>
>But I think when I was testing this as a link on a page it didn't work quite the same. Anyway here is the tag I was playing with:
>
>>a href=mailto:x@y?subject=test%20subject&body=this%20is%20the%20body%20of%20the%20message%0d%0aI%20sure%20hope%20that%20it%20works&cc=cc@cc.com&bcc=bcc@bcc.com>click it>/a>
>
>>Sorry about that! Anyway does anyone know what the html tag is to populate the cc: for email in IE 4?


Thanks Dave, but I am looking for something that populates the cc or bcc fields of Outlook or OE without usinf VFP. I don't think HTML is going to work, so I may have to use javascript. I want this page to be very light, but very functional- in other words no return trip to the server.
John Harvey
Shelbynet.com

"I'm addicted to placebos. I could quit, but it wouldn't matter." Stephen Wright
Previous
Reply
Map
View

Click here to load this message in the networking platform