PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Savoir si outlook est installé
Savoir si outlook est installé
Débuté par Emmanuel ROUX \(news\), 26 juil. 2004 11:12 - 1 réponse
Posté le 26 juillet 2004 - 11:12
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
Posté le 26 juillet 2004 - 11:39
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