OVH Cloud OVH Cloud

Interroger les comptes pop 1 par 1 en VBA

7 réponses
Avatar
K69
Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?

7 réponses

Avatar
Isabelle Prawitz
Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes d'envoi/réception, et
mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se fassent en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de news:
Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?





Avatar
K69
Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes d'envoi/réception, et
mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se fassent en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de news:
Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?










Avatar
Isabelle Prawitz
Au temps pour moi !
La collection SyncObjects du Namespace correspond aux groupes d'envoi ! Tu dois pouvoir les programmer !
Mais ça, j'ai jamais fait ! A toi de voir !
A+
Isa

"K69" a écrit dans le message de news:
Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes d'envoi/réception,
et


mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se fassent
en


décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de
news:


Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?












Avatar
Isabelle Prawitz
Attends !
Je regarde ce que je peux faire !
Isa

"Isabelle Prawitz" a écrit dans le message de news:
Au temps pour moi !
La collection SyncObjects du Namespace correspond aux groupes d'envoi ! Tu dois pouvoir les programmer !
Mais ça, j'ai jamais fait ! A toi de voir !
A+
Isa

"K69" a écrit dans le message de news:
Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes d'envoi/réception,
et


mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se
fassent



en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de
news:


Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?
















Avatar
K69
Merci ... c'est gentil !

N'y aurait-il pas un truc tout simple du style (après les déclaration MAPI) :

FOR EACH Comptes IN ComptesPop
RECEVOIR(Comptes)
NEXT

:-)


Attends !
Je regarde ce que je peux faire !
Isa

"Isabelle Prawitz" a écrit dans le message de news:
Au temps pour moi !
La collection SyncObjects du Namespace correspond aux groupes d'envoi ! Tu dois pouvoir les programmer !
Mais ça, j'ai jamais fait ! A toi de voir !
A+
Isa

"K69" a écrit dans le message de news:
Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes d'envoi/réception,
et


mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se
fassent



en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de
news:


Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?





















Avatar
Isabelle Prawitz
Bonjour !
En effet, mais je n'arrive pas à ne démarrer un envoyer/recevoir qu'une fois le précédent terminé ! Ça m'énerve !!!
Je vais voir sur Internet s'il n'y a pas un exemple !

A+
Isa

PS : Sinon, voici le code :

Sub EssaiSync()
Dim i As Integer
Dim LeSync as SyncObject ' groupe d'envoi/réception

For i = 1 To Session.SyncObjects.Count
Set LeSync = Session.SyncObjects.Item(i)
'MsgBox LeSync.Name
LeSync.Start
'MsgBox LeSync.Name & " fini"
Next
End Sub


"K69" a écrit dans le message de news:
Merci ... c'est gentil !

N'y aurait-il pas un truc tout simple du style (après les déclaration MAPI) :

FOR EACH Comptes IN ComptesPop
RECEVOIR(Comptes)
NEXT

:-)


Attends !
Je regarde ce que je peux faire !
Isa

"Isabelle Prawitz" a écrit dans le message de news:
Au temps pour moi !
La collection SyncObjects du Namespace correspond aux groupes d'envoi ! Tu dois pouvoir les programmer !
Mais ça, j'ai jamais fait ! A toi de voir !
A+
Isa

"K69" a écrit dans le message de
news:



Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes
d'envoi/réception,





et
mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se
fassent



en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de
news:


Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?























Avatar
K69
Salut Isa,

Ne t'énerve pas trop quand même ... c'est déjà super comme solution !!

Comme quoi VBA est vraiment plein de ressources...

J'essaye de tester de mon coté et je te tiens au courant.

@+
K69


Bonjour !
En effet, mais je n'arrive pas à ne démarrer un envoyer/recevoir qu'une fois le précédent terminé ! Ça m'énerve !!!
Je vais voir sur Internet s'il n'y a pas un exemple !

A+
Isa

PS : Sinon, voici le code :

Sub EssaiSync()
Dim i As Integer
Dim LeSync as SyncObject ' groupe d'envoi/réception

For i = 1 To Session.SyncObjects.Count
Set LeSync = Session.SyncObjects.Item(i)
'MsgBox LeSync.Name
LeSync.Start
'MsgBox LeSync.Name & " fini"
Next
End Sub


"K69" a écrit dans le message de news:
Merci ... c'est gentil !

N'y aurait-il pas un truc tout simple du style (après les déclaration MAPI) :

FOR EACH Comptes IN ComptesPop
RECEVOIR(Comptes)
NEXT

:-)


Attends !
Je regarde ce que je peux faire !
Isa

"Isabelle Prawitz" a écrit dans le message de news:
Au temps pour moi !
La collection SyncObjects du Namespace correspond aux groupes d'envoi ! Tu dois pouvoir les programmer !
Mais ça, j'ai jamais fait ! A toi de voir !
A+
Isa

"K69" a écrit dans le message de
news:



Bonjour,

c'est une solution ... mais qui posera également problème car, à terme, les
groupes vont se superposer même si on les déclare à des minutes impaires
(3-5-7-9), ce qui est long et qui retire tout l'intérêt de vérifier tous ses
comptes au démarrage d'outlook puis toutes les 1 ou 2mn suivantes...

Merci quand même de ton intervention, je vais continuer à creuser ... à
moins que mon provider ne remette ses serveur d'aplomb !!

@+

K69


Bonjour !
En VBA, je ne sais même pas si c'est faisable, mais je pense avoir un truc : créer plusieurs groupes
d'envoi/réception,





et
mettre un temps de planification automatique différent pour chaque groupe, de façon que les envois/réceptions se
fassent



en
décalé, 4 à la fois par exemple !
A+
Isa

"K69" a écrit dans le message de
news:


Bonjour à tous,

Depuis quelques temps, le serveur pop de mon (gentil) provider ne me permet
plus (via outlook xp) de recevoir mes mails avec plus de 4 comptes
simultanés. En possédant une vingtaine, je me retrouve donc avec 14 erreurs
"la connexion au serveur a été interompue"... (je ne dois pas être le seul de
ce cas là)

Je présume que cet état est temporaire ... mais ça dure quand même.

L'idée est simple : Créer une macro VBA qui irait récupérer les messages de
tous les comptes pop 1 par 1 (et non pas tous en même temps) !

Euh ... voilà ... pour moi ça s'arrête là parce que VBA et moi, ça fait au
moins 3 !!!

Y-a-t-il quelques experts en la matière pour développer ces quelques lignes ?