Mailto: Subject & attachment & body
Jeg ønsker at automatisere rapportering af musik forbrug til Koda med nedenstående kode.EmailTekst := 'Mailto:' + Global.HentNogleVardi('Koda Email');
EmailTekst := EmailTekst + '?Subject=Radio rapportering';
EmailTekst := EmailTekst + '&attachment="' + 'C:\Koda-rap.txt' + '"';
EmailTekst := EmailTekst + '&body=' + Radio.Text + ' ';
EmailTekst := EmailTekst + Global.HentRadioId('Radio.Text');
ShellExecute(Handle,'open', PChar(EmailTekst), nil, nil, SW_SHOWNORMAL);
Den åbner skam også fint Outlook og forudfylder nogle af felterne, men.
Hvis &attachment står før &body, så kommer body ikke med.
Hvis derimod &body står før &attachment, så kommer filen til at stå som en del af body teksten.
Er der nogle anførselstegn eller andet der mangler, jeg har søgt her på eksperten og på html.dk uden at finde svaret.
