OVH Cloud OVH Cloud

nombre d'elements envoyes et supprimes...

11 réponses
Avatar
Abator V
bonjour a tous,

comment connaitre le nombre de mail dans "elements=20
supprimes" et aussi dans "elements envoy=E9s" en visual=20
basic ?

merci d'avance

10 réponses

1 2
Avatar
Isabelle Prawitz
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder(olFolderDeletedItems) 'Dossier Eléments supprimés
Set DossEnv = Session.GetDefaultFolder(olFolderSentMail) 'Dossier Eléments envoyés
MsgBox "Messages supprimés : " & DossSuppr.Items.Count
MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a écrit dans le message de news:02bd01c4f2f7$349bdbd0$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance
Avatar
Albator V
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " & DossSuppr.Items.Count
MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a écrit
dans le message de news:02bd01c4f2f7$349bdbd0

$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.



Avatar
Isabelle Prawitz
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué, car ça doit changer en dynamique, donc il faut gérer les évènements
des éléments du dossier en question ! Peut-être peux-tu te contenter d'afficher un message d'alerte avec le nombre de
messages à supprimer (ce qui permettrait d'éviter un effacement malencontreux, d'ailleurs !).

A+
Isa

"Albator V" a écrit dans le message de news:15fc01c4f320$e2a195c0$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " & DossSuppr.Items.Count
MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a écrit
dans le message de news:02bd01c4f2f7$349bdbd0

$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.



Avatar
Albator V
ben ecoute que dire de plus que MERCI MERCI ET BONNE ANNEE

tu saurais faire sinon lhistoire du bouton dynamique ? je
veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " & DossSuppr.Items.Count
MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a écrit
dans le message de news:02bd01c4f2f7$349bdbd0

$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




Avatar
Isabelle Prawitz
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation évenementiel" du 23/11/04
et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de retaper !).
Il faudrait dans ton cas rajouter du code dans les évènements ItemAdd et ItemRemove, pour faire évoluer le texte du bouton.

Si tu veux des explications complémentaires, n'hésite pas !
A+
Isa

"Albator V" a écrit dans le message de news:160f01c4f323$ae77fac0$
ben ecoute que dire de plus que MERCI MERCI ET BONNE ANNEE

tu saurais faire sinon lhistoire du bouton dynamique ? je
veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " & DossSuppr.Items.Count
MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a écrit
dans le message de news:02bd01c4f2f7$349bdbd0

$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




Avatar
Albator V
c genial de m'aider comme ca... te fais un gros bizou
pour la peine lol
mais c'est koi et ou les "fils" ??

mail au cas ou :

-----Message d'origine-----
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation
évenementiel" du 23/11/04

et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de
retaper !).

Il faudrait dans ton cas rajouter du code dans les
évènements ItemAdd et ItemRemove, pour faire évoluer le

texte du bouton.

Si tu veux des explications complémentaires, n'hésite
pas !

A+
Isa

"Albator V" a
écrit dans le message de news:160f01c4f323$ae77fac0

$
ben ecoute que dire de plus que MERCI MERCI ET BONNE
ANNEE


tu saurais faire sinon lhistoire du bouton dynamique ? je
veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " &
DossSuppr.Items.Count



MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a
écrit



dans le message de news:02bd01c4f2f7$349bdbd0
$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




.





Avatar
Isabelle Prawitz
Un fil (de discussion), c'est un sujet de newsgroup !
Je suppose que tu utilises Outlook Express ? Descend dans les sujets, tu les trouveras plus bas, si tu as trié par date. Tu
peux aussi faire une recherche de messages, mais dans ce cas tu ne vois pas l'évolution de la discussion.
A+
Isa

"Albator V" a écrit dans le message de news:039201c4f329$cfde7d50$
c genial de m'aider comme ca... te fais un gros bizou
pour la peine lol
mais c'est koi et ou les "fils" ??

mail au cas ou :

-----Message d'origine-----
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation
évenementiel" du 23/11/04

et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de
retaper !).

Il faudrait dans ton cas rajouter du code dans les
évènements ItemAdd et ItemRemove, pour faire évoluer le

texte du bouton.

Si tu veux des explications complémentaires, n'hésite
pas !

A+
Isa

"Albator V" a
écrit dans le message de news:160f01c4f323$ae77fac0

$
ben ecoute que dire de plus que MERCI MERCI ET BONNE
ANNEE


tu saurais faire sinon lhistoire du bouton dynamique ? je
veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " &
DossSuppr.Items.Count



MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a
écrit



dans le message de news:02bd01c4f2f7$349bdbd0
$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




.





Avatar
Albator V
je suis sur IE et pas outlook (je suis au boulot donc les
newsgroup sont impossible)

tu peux me copier/coller tout le blabla, pi envoye par
mail, ou ici ?

chuy dsl mais les recherche ne donnent rien :(

-----Message d'origine-----
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation
évenementiel" du 23/11/04

et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de
retaper !).

Il faudrait dans ton cas rajouter du code dans les
évènements ItemAdd et ItemRemove, pour faire évoluer le

texte du bouton.

Si tu veux des explications complémentaires, n'hésite
pas !

A+
Isa

"Albator V" a
écrit dans le message de news:160f01c4f323$ae77fac0

$
ben ecoute que dire de plus que MERCI MERCI ET BONNE
ANNEE


tu saurais faire sinon lhistoire du bouton dynamique ? je
veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils pour
supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " &
DossSuppr.Items.Count



MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a
écrit



dans le message de news:02bd01c4f2f7$349bdbd0
$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




.





Avatar
Albator V
je suis sur IE et pas outlook (je suis au boulot donc les
newsgroup sont impossible)

tu peux me copier/coller tout le blabla, pi envoye par
mail, ou ici ?

chuy dsl mais les recherche ne donnent rien :(

Ca serai koi le titre du sujet excat ?

-----Message d'origine-----
Un fil (de discussion), c'est un sujet de newsgroup !
Je suppose que tu utilises Outlook Express ? Descend
dans les sujets, tu les trouveras plus bas, si tu as trié

par date. Tu
peux aussi faire une recherche de messages, mais dans ce
cas tu ne vois pas l'évolution de la discussion.

A+
Isa

"Albator V" a
écrit dans le message de news:039201c4f329$cfde7d50

$
c genial de m'aider comme ca... te fais un gros bizou
pour la peine lol
mais c'est koi et ou les "fils" ??

mail au cas ou :

-----Message d'origine-----
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation
évenementiel" du 23/11/04

et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de
retaper !).

Il faudrait dans ton cas rajouter du code dans les
évènements ItemAdd et ItemRemove, pour faire évoluer le

texte du bouton.

Si tu veux des explications complémentaires, n'hésite
pas !

A+
Isa

"Albator V" a
écrit dans le message de news:160f01c4f323$ae77fac0

$
ben ecoute que dire de plus que MERCI MERCI ET BONNE
ANNEE


tu saurais faire sinon lhistoire du bouton dynamique ?
je


veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils
pour



supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " &
DossSuppr.Items.Count



MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a
écrit



dans le message de news:02bd01c4f2f7$349bdbd0
$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




.




.






Avatar
Isabelle Prawitz
Voici le dernier message du fil "[Office 2k3 et Outlook 2k3] Outlook et la programmation évenementiel" du 23/11/04, qui
contient tout (ou presque !). Commence par le bas !

Bonjour !
Si tu veux gérer les évènements de tes dossiers par exemple (du style Un
message arrive dans mon dossier - autre que Boîte de réception bien sûr !),
il faut que tu crées une instance "d'Items " du dossier avec WithEvents de façon à
pouvoir générer et traiter ses évènements.

Petit ex. :
Je veux qu'une Pop-up apparaisse quand un message est déplacé(ou créé) dans mon dossier Outlook Travail.

1. Dans mon code de session Outlook, je déclare un objet MapiFolder avec évènements :
dim WithEvents monDossTravailItems as Items
2. Dans Application_Startup, j'initialise cet objet au dossier désiré (de façon que ça fonctionne dès que Outlook est
ouvert):
dim MonEsp as NameSpace
dim monDossTravail as MapiFolder
set MonEsp= GetNameSpace("MAPI")
set monDossTravail=MonEsp.Folders("Dossiers Personnels").Folders("Travail")
set monDossTravailItems=monDossTravail.Items
3. Je sélectionne monDossTravailItems dans la liste des objets, ce qui permet d'accéder à ItemAdd, ItemRemove, et ItemChange
4. Je génère ItemAdd, et je peux maintenant écrire le code à exécuter quand un message arrive (ou est généré) dans mon
dossier. Par ex :
MsgBox "Un message arrive dans le dossier Travail : " & Item.Subject & " " & Item.SenderName

Pour utiliser les évènements de Dossiers FolderAdd, FolderChange et FolderRemove, il faut créer un objet de type Folders avec
WithEvents

En espérant avoir été à peu près claire !!! ;-)

A+
Isa

"tech-informatique" a écrit dans le
message de news:%
Bonjour,


Je programme de petites applis sous outlook 2k3, mais à l'heure actuelle
j'accède à mes macros via un bouton dans une bar de menu. J'aimerai
commencer à gérer les évenements dans outlook, seulement j'ai lu la doc
VBA

dessus, j'y ai rien compris et notamment leur principe de module de
classe,

est-ce le même principe qu'en java avec le constructeur et les méthodes
d'accès/paramètrage écouteur d'évenement ? Le problème avec l'aide c'est
que

ca donne un bout de code mais on nous montre pas la totalité comme :
comment

appelé ce que l'on a créé dans un module de classe, le système de
développement le plus efficace pour un module de classe et biensûr tout
ceci

sous outlook. Quelqu'un aurait-il un exemple plus concret à fournir ? Ou
un

liens avec un tutorial simple (si possible sous outlook, j'ai essayé et
j'ai

plein d'erreur).

Merci d'avance,

Cordialement,







L'autre est une appli qui permet de déplacer les messages envoyés du dossier Eléments envoyés à un autre dossier s'ils
contiennent des pièces jointes, donc un cas plus spécifique.
S'il t'intéresse je te l'envoie.
A+
Isa

"Albator V" a écrit dans le message de news:03ae01c4f32e$0a366a40$
je suis sur IE et pas outlook (je suis au boulot donc les
newsgroup sont impossible)

tu peux me copier/coller tout le blabla, pi envoye par
mail, ou ici ?

chuy dsl mais les recherche ne donnent rien :(

Ca serai koi le titre du sujet excat ?

-----Message d'origine-----
Un fil (de discussion), c'est un sujet de newsgroup !
Je suppose que tu utilises Outlook Express ? Descend
dans les sujets, tu les trouveras plus bas, si tu as trié

par date. Tu
peux aussi faire une recherche de messages, mais dans ce
cas tu ne vois pas l'évolution de la discussion.

A+
Isa

"Albator V" a
écrit dans le message de news:039201c4f329$cfde7d50

$
c genial de m'aider comme ca... te fais un gros bizou
pour la peine lol
mais c'est koi et ou les "fils" ??

mail au cas ou :

-----Message d'origine-----
Va voir les fils
"[Office 2k3 et Outlook 2k3] Outlook et la programmation
évenementiel" du 23/11/04

et
"[CD] - Dossier Eléments envoyés" des 13 et 14/12/04
ça te donnera une idée (excuse, j'ai la flemme de
retaper !).

Il faudrait dans ton cas rajouter du code dans les
évènements ItemAdd et ItemRemove, pour faire évoluer le

texte du bouton.

Si tu veux des explications complémentaires, n'hésite
pas !

A+
Isa

"Albator V" a
écrit dans le message de news:160f01c4f323$ae77fac0

$
ben ecoute que dire de plus que MERCI MERCI ET BONNE
ANNEE


tu saurais faire sinon lhistoire du bouton dynamique ?
je


veux dire : est ce possible ? gerer les evenements avec
excel c'est facile, mais quel sont les evenements propre
outlook ?

-----Message d'origine-----
Tu peux faire comme ça :

Do While MonDossier.Items.Count > 0
MonDossier.Items.Remove 1
Loop

Pour changer le texte du bouton, c'est plus compliqué,
car ça doit changer en dynamique, donc il faut gérer les

évènements
des éléments du dossier en question ! Peut-être peux-tu
te contenter d'afficher un message d'alerte avec le

nombre de
messages à supprimer (ce qui permettrait d'éviter un
effacement malencontreux, d'ailleurs !).


A+
Isa

"Albator V" a
écrit dans le message de news:15fc01c4f320$e2a195c0

$
c'est genial merci beaucoup !!!!!!!!!!

saurai tu comment supprimer tout le contenu de ce
repertoire ?

l'idee est de creer 2 boutons dans la barre doutils
pour



supprimer les mails directement.

lideal serai ke le nombre de mails soit ecrit sur le
bouton... mais j'ai du mal... autant avec excel je sais
faire autant la...

-----Message d'origine-----
Bonjour et bonne année !
Exemple :
'**** Début code ***
Dim DossSuppr As MAPIFolder
Dim DossEnv As MAPIFolder

Set DossSuppr = Session.GetDefaultFolder
(olFolderDeletedItems) 'Dossier Eléments supprimés

Set DossEnv = Session.GetDefaultFolder
(olFolderSentMail) 'Dossier Eléments envoyés

MsgBox "Messages supprimés : " &
DossSuppr.Items.Count



MsgBox "Messages envoyés : " & DossEnv.Items.Count
'**** Fin code ****

A+
Isa

"Abator V" a
écrit



dans le message de news:02bd01c4f2f7$349bdbd0
$
bonjour a tous,

comment connaitre le nombre de mail dans "elements
supprimes" et aussi dans "elements envoyés" en visual
basic ?

merci d'avance


.




.




.




.






1 2