Petits soucis de sécurité avec outlook

Signaler
Messages postés
1
Date d'inscription
lundi 12 septembre 2005
Statut
Membre
Dernière intervention
12 septembre 2005
-
Messages postés
1173
Date d'inscription
mercredi 2 novembre 2005
Statut
Membre
Dernière intervention
10 septembre 2011
-
Bonjour à tous,

Je souhaiterais éviter que le message de sécurité outlook n'apparaisse lorsque l'on tente d'accèder à outlook via un autre programme... Quelqu'un saurait-il résoudre mon problème

J'utilise actuellement le code suivant:
var
obj: OleVariant;
i, j: integer;


begin
try
obj := CreateOleObject('outlook.application');
obj := obj.GetNameSpace('MAPI');
for i := 1 to obj.AddressLists.Count do
for j := 1 to obj.AddressLists(i).AddressEntries.Count do
Listbx.Items.Add(obj.AddressLists(i).AddressEntries(j).Name );
except
end;

je suis persuadée que l'on peut contourner ce message en modifiant le code mais je n'y arrive pas avec delphi...

merci

a++

tititon

3 réponses

Messages postés
1173
Date d'inscription
mercredi 2 novembre 2005
Statut
Membre
Dernière intervention
10 septembre 2011
3
Oui, tu passes par une OLE donc un message de sécurité apparait. Il faut utiliser shellExcecute.
Je trouve tout ça et je te le donne.
Messages postés
1173
Date d'inscription
mercredi 2 novembre 2005
Statut
Membre
Dernière intervention
10 septembre 2011
3
Messages postés
1173
Date d'inscription
mercredi 2 novembre 2005
Statut
Membre
Dernière intervention
10 septembre 2011
3
Voila ShellExecute(Handle, 'OPEN', 'TON LOGICIEL','','',SW_SHOWNORMAL);
Rajouter ShellApi dans uses.
Désolé ça n'a pas marché la première fois.