Bonjour à tous,
Celà va faire un moment que je n'ai pas programmé... J'utilise un simple script .vbs pour agir sur une application au travail afin d'automatiser certaines tâches.
Je suis actuellement bloqué, je lance une exécution sur l'application qui me retourne un résultat sous forme de lignes dans un interface graphique.
Je cherche à trouver le nombre de lignes que l'application me retourne, la solution que j'envisage et de parcourir chaque ligne jusqu'à ce que le script produits une erreur afin d'établir un compteur et de récupérer la valeur de celui-ci au moment de l'erreur.
Voici un exemple très simplifié qui représente bien la chose :
- j'aimerais réussir à sortir de la boucle for au moment de l'erreur et connaître le nombre d'indices de mon tableau.
J'ai essayé ça, mais ça n'a pas l'air de fonctionner et de toute façon je viens de me rendre compte que je passe dans le If à chaque erreur donc la variable Compteur n'aura pas la bonne valeur... :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Dim tableau(3) ' l'application m'a retourné 4 lignes For i = 0 to 19 ' je cherche à connaître le nombre de ligne MsgBox tableau(i) Next
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim tableau(3) Dim compteur For i = 0 to 19 MsgBox tableau(i) On Error Resume Next If Err.Number <> 0 Then Compteur = i - 1 End If Next MsgBox ("il y a "& Compteur &" lignes")
Partager