Je voudrai ajouter des contacts dans un dossier public sur Exchange via
une macro.
J'ai trouvé plein d'info pour créer un contact dans le dossier par
défaut mais rien pour un dossier public.
Un petit coup de patte serait le bienvenue.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Isabelle Prawitz
Bonjour ! Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
A+ Isa
"Stephane D" a écrit dans le message de news:cofhd9$u72$
Bonjour
Je voudrai ajouter des contacts dans un dossier public sur Exchange via une macro. J'ai trouvé plein d'info pour créer un contact dans le dossier par défaut mais rien pour un dossier public. Un petit coup de patte serait le bienvenue.
Cordialement @ Stephane
Bonjour !
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem
Dim monEsp as NameSpace
dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI")
set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers
publics").Folders("MonDossier")
Set monContact=monDoss.add(olContactItem)
A+
Isa
"Stephane D" <sur_le@forum.fr> a écrit dans le message de
news:cofhd9$u72$1@s5.feed.news.oleane.net...
Bonjour
Je voudrai ajouter des contacts dans un dossier public sur Exchange via
une macro.
J'ai trouvé plein d'info pour créer un contact dans le dossier par
défaut mais rien pour un dossier public.
Un petit coup de patte serait le bienvenue.
Bonjour ! Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
A+ Isa
"Stephane D" a écrit dans le message de news:cofhd9$u72$
Bonjour
Je voudrai ajouter des contacts dans un dossier public sur Exchange via une macro. J'ai trouvé plein d'info pour créer un contact dans le dossier par défaut mais rien pour un dossier public. Un petit coup de patte serait le bienvenue.
Cordialement @ Stephane
Stephane D
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add: "Cette propriété ou méthode n'est pas gérée pas cet bojet" Tu as trouvé ou ce genre d'info ?
@+ Stephane
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem
Dim monEsp as NameSpace
dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI")
set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers
publics").Folders("MonDossier")
Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add:
"Cette propriété ou méthode n'est pas gérée pas cet bojet"
Tu as trouvé ou ce genre d'info ?
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add: "Cette propriété ou méthode n'est pas gérée pas cet bojet" Tu as trouvé ou ce genre d'info ?
@+ Stephane
Isabelle Prawitz
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS du dossier " !!!! A+ Isa
"Stephane D" a écrit dans le message de news:cohiba$j47$
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers
publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add: "Cette propriété ou méthode n'est pas gérée pas cet bojet" Tu as trouvé ou ce genre d'info ?
@+ Stephane
Bonjour !
Scuse-moi !!!!
C'est :
set MonContact=MonDoss.items.add(olContactItem)
Arggg !
Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS
du dossier " !!!!
A+
Isa
"Stephane D" <sur_le@forum.fr> a écrit dans le message de
news:cohiba$j47$1@s5.feed.news.oleane.net...
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem
Dim monEsp as NameSpace
dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI")
set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les
dossiers
publics").Folders("MonDossier")
Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add:
"Cette propriété ou méthode n'est pas gérée pas cet bojet"
Tu as trouvé ou ce genre d'info ?
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS du dossier " !!!! A+ Isa
"Stephane D" a écrit dans le message de news:cohiba$j47$
Il faut ajouter un élément à la collection des items du dossier :
dim monContact as ContactItem Dim monEsp as NameSpace dim monDoss as MAPIFolder
set monEsp=GetNameSpace("MAPI") set monDoss=monEsp.Folders("Dossiers publics").Folders("Tous les dossiers
publics").Folders("MonDossier") Set monContact=monDoss.add(olContactItem)
Bonjour ISA
Ca marche pas très bien ce que tu m'indique. Pour la méthode add: "Cette propriété ou méthode n'est pas gérée pas cet bojet" Tu as trouvé ou ce genre d'info ?
@+ Stephane
Stephane D
Re Isa
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et avec ta méthode d'acces au dossier public je le déplace dedans. C'est pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca autrement. Y'a bien une méthode "Save As" mais a priori c'est pour l'enregistrer sur le disque. Sinon je suis intéressé pour savoir ou tu as troué ces infos.
@+ Stephane
Re Isa
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et
avec ta méthode d'acces au dossier public je le déplace dedans. C'est
pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca
autrement. Y'a bien une méthode "Save As" mais a priori c'est pour
l'enregistrer sur le disque.
Sinon je suis intéressé pour savoir ou tu as troué ces infos.
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et avec ta méthode d'acces au dossier public je le déplace dedans. C'est pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca autrement. Y'a bien une méthode "Save As" mais a priori c'est pour l'enregistrer sur le disque. Sinon je suis intéressé pour savoir ou tu as troué ces infos.
@+ Stephane
Isabelle Prawitz
Salut ! Avec la correction que je t'ai indiquée, ça doit rouler, à condition bien sûr que le dossier dans lequel tu veux créer tes contacts soit de type Contacts ! Quant à savoir d'où je tiens mes infos, en fait je suis formatrice et développeuse en applis Outlook/Exchange (entre autres !). C'est vrai qu'il y a très peu de bouquins sur ce sujet : j'ai commencé avec "Construire des applis avec Outlook 98" (Collectif) épuisé bien sûr ! puis : "Développement collaboratif avec Exchange et Outlook" (v.5.5 et 98/2000) (T. Rizzo) indisponible également ! avec une digression de Microsoft Press avec "Programmation Outlook 2000" (Sue Mosher) de Campus Press, itou indisponible ! Le dernier en date n'est pas encore en français : "Programming and Microsoft Exchange 2003" (T. Rizzo) ! Celui-ci : "Microsoft Outlook Programming : Jumpstart for Administrators, Power users, and Developers" de Sue Mosher, n'a pas l'air mal non plus, mais toujours en anglais ! Voilà ! A+ Isa
"Stephane D" a écrit dans le message de news:cohk6n$jvq$
Re Isa
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et avec ta méthode d'acces au dossier public je le déplace dedans. C'est pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca autrement. Y'a bien une méthode "Save As" mais a priori c'est pour l'enregistrer sur le disque. Sinon je suis intéressé pour savoir ou tu as troué ces infos.
@+ Stephane
Salut !
Avec la correction que je t'ai indiquée, ça doit rouler, à condition bien
sûr que le dossier dans lequel tu veux créer tes contacts soit de type
Contacts !
Quant à savoir d'où je tiens mes infos, en fait je suis formatrice et
développeuse en applis Outlook/Exchange (entre autres !).
C'est vrai qu'il y a très peu de bouquins sur ce sujet : j'ai commencé avec
"Construire des applis avec Outlook 98" (Collectif) épuisé bien sûr !
puis : "Développement collaboratif avec Exchange et Outlook" (v.5.5 et
98/2000) (T. Rizzo) indisponible également !
avec une digression de Microsoft Press avec "Programmation Outlook 2000"
(Sue Mosher) de Campus Press, itou indisponible !
Le dernier en date n'est pas encore en français : "Programming and Microsoft
Exchange 2003" (T. Rizzo) !
Celui-ci : "Microsoft Outlook Programming : Jumpstart for Administrators,
Power users, and Developers" de Sue Mosher, n'a pas l'air mal non plus, mais
toujours en anglais !
Voilà !
A+
Isa
"Stephane D" <sur_le@forum.fr> a écrit dans le message de
news:cohk6n$jvq$1@s5.feed.news.oleane.net...
Re Isa
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et
avec ta méthode d'acces au dossier public je le déplace dedans. C'est
pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca
autrement. Y'a bien une méthode "Save As" mais a priori c'est pour
l'enregistrer sur le disque.
Sinon je suis intéressé pour savoir ou tu as troué ces infos.
Salut ! Avec la correction que je t'ai indiquée, ça doit rouler, à condition bien sûr que le dossier dans lequel tu veux créer tes contacts soit de type Contacts ! Quant à savoir d'où je tiens mes infos, en fait je suis formatrice et développeuse en applis Outlook/Exchange (entre autres !). C'est vrai qu'il y a très peu de bouquins sur ce sujet : j'ai commencé avec "Construire des applis avec Outlook 98" (Collectif) épuisé bien sûr ! puis : "Développement collaboratif avec Exchange et Outlook" (v.5.5 et 98/2000) (T. Rizzo) indisponible également ! avec une digression de Microsoft Press avec "Programmation Outlook 2000" (Sue Mosher) de Campus Press, itou indisponible ! Le dernier en date n'est pas encore en français : "Programming and Microsoft Exchange 2003" (T. Rizzo) ! Celui-ci : "Microsoft Outlook Programming : Jumpstart for Administrators, Power users, and Developers" de Sue Mosher, n'a pas l'air mal non plus, mais toujours en anglais ! Voilà ! A+ Isa
"Stephane D" a écrit dans le message de news:cohk6n$jvq$
Re Isa
J'ai réussi à pondre un truc. J'enregistre dans le dossier par défaut et avec ta méthode d'acces au dossier public je le déplace dedans. C'est pas super mais ca fonctionne et je suis pas sur qu'on puisse faire ca autrement. Y'a bien une méthode "Save As" mais a priori c'est pour l'enregistrer sur le disque. Sinon je suis intéressé pour savoir ou tu as troué ces infos.
@+ Stephane
Stephane D
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS du dossier " !!!! A+ Isa
Merci Isa ca marche impeccable.
@+ Stephane
Bonjour !
Scuse-moi !!!!
C'est :
set MonContact=MonDoss.items.add(olContactItem)
Arggg !
Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS
du dossier " !!!!
A+
Isa
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS du dossier " !!!! A+ Isa
Merci Isa ca marche impeccable.
@+ Stephane
Isabelle Prawitz
Ouf ! ;-) Pourtant il n'était pas tard : 17:22 ! A+ Isa
"Stephane D" a écrit dans le message de news:cohpvd$m6p$
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS
du dossier " !!!! A+ Isa
Merci Isa ca marche impeccable.
@+ Stephane
Ouf ! ;-)
Pourtant il n'était pas tard : 17:22 !
A+
Isa
"Stephane D" <sur_le@forum.fr> a écrit dans le message de
news:cohpvd$m6p$1@s5.feed.news.oleane.net...
Bonjour !
Scuse-moi !!!!
C'est :
set MonContact=MonDoss.items.add(olContactItem)
Arggg !
Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES
ITEMS
Ouf ! ;-) Pourtant il n'était pas tard : 17:22 ! A+ Isa
"Stephane D" a écrit dans le message de news:cohpvd$m6p$
Bonjour ! Scuse-moi !!!! C'est : set MonContact=MonDoss.items.add(olContactItem) Arggg ! Et en plus je le dis : "Il faut ajouter un élément à la COLLECTION DES ITEMS
