Array
(
)

:: Abrir outlook pelo Delphi

Lucas Silva
   - 19 ago 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:
#Código

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
   - 19 ago 2004

sobe...


Lucas Silva
   - 19 ago 2004

o erro que dá no windows 98 é esse:
ERROR_FILE_NOT_FOUND

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?


Jasig Aurumalfa
   - 19 ago 2004

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:
#Código

WinExec(pchar(szQuery),sw_ShowNormal);


Espero ter ajudado.
Abraços.


Beppe
   - 19 ago 2004

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