Hello everyone
I have clients, who prefer Thunderbird as a client of e-mail.
Since I can do to use the thunderbird instead of outlook.
it is possible with Fivewin, or some bookstore especially of third.
Regards
Thunderbird
Thunderbird
_ A. Martinez
http://www.multisofthn.com
Honduras, Centro America
xHarbour Enterprise 1.2.2, Fivewin 13.06
http://www.multisofthn.com
Honduras, Centro America
xHarbour Enterprise 1.2.2, Fivewin 13.06
Re: Thunderbird
I am not sure about using Thunderbird via OLE. The below given code should work
Regards
Anser
Code: Select all
Function SendThunderbird(cTo, cSubject, cBody)
// This function can be used to send an e-mail from Mozilla Thunderbird.
// The syntax for calling Thunderbird from a command line (DOS prompt) is:
//
// thunderbird -compose "mailto:somebody@somewhere?cc=address@provider&subject=hi&body=something"
Local cCommand,oShell
cCommand = "C:\Program Files\Mozilla Thunderbird\thunderbird"
cCommand = cCommand + " -compose " + Chr(34) + "mailto:" + cTo + "?"
cCommand = cCommand + "subject=" + Chr(34) + cSubject + Chr(34) + "&"
cCommand = cCommand + "body=" + Chr(34) + cBody + Chr(34)
oShell:=CreateObject("WScript.Shell")
oShell:Run(cCommand,0,.F.)
SysWait(1)
oShell:=NIL
Return
Anser