:: Abrir outlook pelo Delphi

19/08/2004

Bom dia pessoal,
Estou precisando abrir vários outlook´s para o envio de e-mail.


é seguite, tenho uma pesquisa, que retorna 130 resultados por exemplo.
a cada 50 e-mails eu abro o outlook com os destinatários referentes.

neste caso abriria 3:
1 com 50 destinatáios;
2 com 50 destinatáios;
3 com 30 destinatáios;

faço isso da seguinte forma:
ShellExecute(handle,´open´,pchar(´mailto:´+email), nil, nil, SW_SHOWNORMAL ); // email é a variável com os e-mails do pessoal;


O grande problema é que esta rotina no win98 só abre o último outlook.
No winXp funciona blz....


Alguem saberia como resolver isto?
E tem alguma outra forma de chamar o outlook?


Lucas Silva

Respostas

19/08/2004

Lucas Silva

sobe...


Responder Citar

19/08/2004

Lucas Silva

o erro que dá no windows 98 é esse:
[b:1913a2fe13]ERROR_FILE_NOT_FOUND[/b:1913a2fe13]

não sei que arquivo é esse.
o outlook está instalado na máquina.


Tem algum outro jeito de chamar a msg do outlook, sem ser pelo shellExecute?


Responder Citar

19/08/2004

Jasig Aurumalfa

Se lhe servir o nosso amiguinho WinExec... :)
Com o WinExec, você pode simplismente, declarar uma variável, exemplo, ´caminho´...
Ai você declara nesse ´caminho´, o caminho do Outlook...
E depois o código para abrir o Outlook fica esse:
WinExec(pchar(szQuery),sw_ShowNormal);


Espero ter ajudado.
Abraços.


Responder Citar

19/08/2004

Beppe

Pode tentar automação. Dá uma olhada na paleta Servers, no final da CP.


Responder Citar