PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Savoir si outlook est installé
Savoir si outlook est installé
Iniciado por pompil007, jul., 26 2004 11:12 AM - 1 resposta
Publicado em julho, 26 2004 - 11:12 AM
Bonjour,

Dans mon application, je souhaite piloter Outlook si ce dernier est installé
sur la machine, voila le code que j'ai mis pour tester la présence d'outlook
:

Outlook est un objet Automation dynamique
// Si un Outlook est déjà lancé, on va le récupérer
Outlook = ObjetActif("OutLook.Application")
SI Outlook = Null ALORS
// Aucun Outlook n'est déjà lancé : on en lance un
Outlook = allouer un objet Automation "OutLook.Application"
SI Outlook = Null ALORS
ISOutlook = Faux
SINON
ISOutlook = Vrai
FIN
FIN

Toutefois cela fait une erreur si l'outlook n'est pas installé, avez-vous
une solution ?

D'avance merci beaucoup.

Emmanuel
Publicado em julho, 26 2004 - 11:39 AM
Salut,

Emmanuel ROUX (news) wrote:
Dans mon application, je souhaite piloter Outlook si ce dernier est
installé sur la machine, voila le code que j'ai mis pour tester la
présence d'outlook


Outlook est un objet Automation dynamique
// Si un Outlook est déjà lancé, on va le récupérer
Outlook = ObjetActif("OutLook.Application")
SI Outlook = Null ALORS
// Aucun Outlook n'est déjà lancé : on en lance un
Outlook = allouer un objet Automation "OutLook.Application"
SI Outlook = Null ALORS
ISOutlook = Faux
SINON
ISOutlook = Vrai
FIN
FIN

Toutefois cela fait une erreur si l'outlook n'est pas installé,
avez-vous une solution ?


Essaie de mettre ce code à l'intérieur d'une clause Quand Exception Dans

Quand Exception Dans
<Ton code ci-dessus...>
Faire
ISOutlook = Faux
ExceptionActive() // Permet de réactiver la gestion des exceptions
Fin
<...Suite de ton traitement...>

--
Cordialement,

Erick :-)
Fiduciaire Informatique - Saint-Etienne