OVH Cloud OVH Cloud

erreur vbscript

2 réponses
Avatar
Stephane
Bonjour

J'ai une nouveauté depuis hier, j'utilise un script qui prend un par un
tous les contacts d'un dossier public et recopie des infos ailleurs.
Depuis hier ce con ne fait fonctionne plus comme avant, maitenant il me
balance une erreur à l'intérrogation de sa classe avfin de savoir si
c'est un contact ou une liste.
L'ouverture du dossier public se fait bien
La boucle for fonctionne : For Each monContact in monDoss.Items
par contre le if déclenche une erreur : If monContact.Class=40 Then
J'ai un compteur qui tourne dans la boucle for qui m'informe que je
scrute bien tous les contacts puisque j'ai le meme nombre que dans le
dossier public.
Avec le On Resume Next j'obiens pour chaque item
Erreur : -2147221241 !! avec çà nous v'là bien.
Sans j'ai une erreur:
(null) : 0x80040107 !! avec cà aussi tiens !

Si quelque'un sait où je peux chercher, au fait sur une autre machine
mon script fonctionne encroe bien !

Stephane

2 réponses

Avatar
Oliv'
*Stephane que je salue a écrit *:
Bonjour

J'ai une nouveauté depuis hier, j'utilise un script qui prend un par
un tous les contacts d'un dossier public et recopie des infos
ailleurs. Depuis hier ce con ne fait fonctionne plus comme avant,
maitenant il me balance une erreur à l'intérrogation de sa classe
avfin de savoir si c'est un contact ou une liste.
L'ouverture du dossier public se fait bien
La boucle for fonctionne : For Each monContact in monDoss.Items
par contre le if déclenche une erreur : If monContact.Class@ Then
J'ai un compteur qui tourne dans la boucle for qui m'informe que je
scrute bien tous les contacts puisque j'ai le meme nombre que dans le
dossier public.
Avec le On Resume Next j'obiens pour chaque item
Erreur : -2147221241 !! avec çà nous v'là bien.
Sans j'ai une erreur:
(null) : 0x80040107 !! avec cà aussi tiens !

Si quelque'un sait où je peux chercher, au fait sur une autre machine
mon script fonctionne encroe bien !

Stephane


c'est du VBS Ou du VBA ?
Tu avais déjà avant des listes de diffusions dans ton dossier ?
SInon donne un peu plus de code pour y voir plus clair.

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Outlook : http://faq.outlook.free.fr/
les macros Outlook : http://faq.outlook.free.fr/articles.php?cat_id
les archives : http://groups.google.com/group/microsoft.public.fr.outlook
Dernière chance http://www.outlookcode.com/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Avatar
Stephane

c'est du VBS Ou du VBA ?


C'est du VBS

Tu avais déjà avant des listes de diffusions dans ton dossier ?


Oui, c'est pour ca que je fait le test sur Class pour être sur de taper
que les contacts.

SInon donne un peu plus de code pour y voir plus clair.


Tu sais parfois on en oublie les fondamentaux :-)) j'avais essayé de
redémarrer outlook pour voir mais ca ne changeait rien. Ce midi j'ai
redémarré mon PC et ca fonctionne à nouveau...
Va comprendre Charles ???

Stephane - Ca me gonfle de perdre du temps avec des conneries pareilles.


*Stephane que je salue a écrit *:
Bonjour

J'ai une nouveauté depuis hier, j'utilise un script qui prend un par
un tous les contacts d'un dossier public et recopie des infos
ailleurs. Depuis hier ce con ne fait fonctionne plus comme avant,
maitenant il me balance une erreur à l'intérrogation de sa classe
avfin de savoir si c'est un contact ou une liste.
L'ouverture du dossier public se fait bien
La boucle for fonctionne : For Each monContact in monDoss.Items
par contre le if déclenche une erreur : If monContact.Class@ Then
J'ai un compteur qui tourne dans la boucle for qui m'informe que je
scrute bien tous les contacts puisque j'ai le meme nombre que dans le
dossier public.
Avec le On Resume Next j'obiens pour chaque item
Erreur : -2147221241 !! avec çà nous v'là bien.
Sans j'ai une erreur:
(null) : 0x80040107 !! avec cà aussi tiens !

Si quelque'un sait où je peux chercher, au fait sur une autre machine
mon script fonctionne encroe bien !

Stephane