mailto:[email protected]
Dear Thunderbird When we were running Outlook on Windows XP, we could have the following statement: mailto:[email protected], and it would send a mail through Outlook Now we are running Thunderbird on Windows 10, and this feature don't work. We have a costum built program to adresse our members. if we have to use Thunderbird one mail at a time, instead of a bulk job, it will take oceans of time. Best regards Anton Andersen Radio Ringkøbing
All Replies (8)
You could create a group address list (which seems what you were doing with Outlook).
Hi David Thank you for your answer, thou it does not solve my problem. Some members play radio bingo, others participate in lottery. Some every week, other sometimes. Therefore it is not the same members I address every time. I have a program handling all the accounts, and once a month I send out bills. Until now I have used the code mailto:[email protected], which cycles thru my member list, and generate an email with the correct bill attached.
Hi David
I have attached the picture I get when I try to send these e-mails. Thunderbird is nowhere on the list, how do I get it there? Regards Anton Andersen
Normally, that is achieved by setting Thunderbird as default email client at Settings>General.
Since you are using a custom program to interact with an email client, you would need to give explicit detail on the process and interaction for anyone here to give constructive feedback, if it's possible.
ShellExecute(Handle, 'open', PChar('Mailto:' + EmailTxt), nil, nil, SW_SHOWNORMAL);
I use Delphi as a programing tool. The above is the code that works on Windows XP and Outlook from Office 2000 As Outlook from Office 2000 will not work on Windows 10, I use Thunderbird.
If I put this code om my webpage, I get the same problem. Send <a href="mailto:[email protected]">mail</a> Regards Anton Andersen
It works on Windows 7, thou the attachment doesn't get included.
PdfFil := Global.HentLokal('PDF.') + 'Faktura' + IntToStr(OrdreData.FakturaNr) + '.pdf';
EmailTekst := 'Mailto:' + Global.HentKunde(KundeData.FaktAdr).FakturaMail + '?Subject=Reklame faktura'
EmailTekst := EmailTekst + '&attachment="' + PdfFil + '"';
ShellExecute(Handle,'open', PChar(EmailTekst), nil, nil, SW_SHOWNORMAL);
It worked flawless on Windows XP and Office 2000.