🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: be.comp.programming
3 messages
3 total messages Started by Guido Van Beul Mon, 15 Nov 2004 21:18
Aankooporders electronish versturen ...
#1857
Author: Guido Van Beul
Date: Mon, 15 Nov 2004 21:18
33 lines
2355 bytes
Ik ben in Delphi 7 een maatapplicatie aan het bouwen waarin ook een 
onderdeeel "Aankooporders" zit.

De gebruiker kan dus een aankooporder aanmaken. Bedoeling is dat het 
aangemaakte order ook doorgemaild kan worden naar de levarancier. Ik wil dus 
data uit een database "plukken" en invullen in van het standaard 
emailprogramma ( zoals Outlook bijvoorbeeld )
Ik wil dat op deze manier doen omdat ook de bestemming ( het emailadres 
dus ) en het aankoopordernummer automatisch worden ingevuld zodat 
vergissingen worden uitgesloten ...
Het probleem wat ik hierin heb is dat de data uit de database achter mekaar 
in het emailprogramma komt, dus geen Carrige Return waar dat nodig is ...

het komt er dus zo in :     Regel1 Regel2 Regel3 enz ....


het zou zo moeten :

Regel1
Regel2
Regel3


De huidige Delphi code die ik gebruik is :

Var _Body,_Purchase : String;
     begin
       _Body := 'Regel1' + #13 + 'Regel2;
     ShellExecute(Application.Handle, 
'Open',PChar('mailto:'+SimpleDataSet1.FieldByName('Emailadres').AsString+' 
?subject='+_Purchase+' &body= '+_Body+''), nil, nil, Sw_ShowNormal);

Hoe ken ik zoiets fiksen ??   Dank bij voorbaat ... 
Re: Aankooporders electronish versturen ...
#1858
Author: Herman Dullink
Date: Mon, 15 Nov 2004 21:51
13 lines
1681 bytes
>      _Body := 'Regel1' + #13 + 'Regel2;
>     ShellExecute(Application.Handle, 
> 'Open',PChar('mailto:'+SimpleDataSet1.FieldByName('Emailadres').AsString+' 
> ?subject='+_Purchase+' &body= '+_Body+''), nil, nil, Sw_ShowNormal);

Hmmm...
Lijkt me niet handig, om te vertrouwen op een extern programma die mailto 
wel zal afvangen.
Kijk even welke E-mail componenten er beschikbaar zijn. Je kunt dan je hele 
bericht d.m.v
een object opbouwen, bijv. met CDO.

H 
Re: Aankooporders electronish versturen ...
#1859
Author: Guido Van Beul
Date: Mon, 15 Nov 2004 22:48
14 lines
1517 bytes
> Hmmm...
> Lijkt me niet handig, om te vertrouwen op een extern programma die mailto 
> wel zal afvangen.
> Kijk even welke E-mail componenten er beschikbaar zijn. Je kunt dan je 
> hele bericht d.m.v
> een object opbouwen, bijv. met CDO.



Ja dat klopt ! Ik heb ondertussen de standaard componenten IdSMTP1 en 
IdMessage1 van Indy gebruikt, werkt perfect !


Dank voor de nuttige tip .... 
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads