Problème de pérénité de variable

Version imprimable

Bonjour,

J'ai réalisé le code suivant :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Sub MySub()
Dim GenericElem As HTMLGenericElement
 
Dim IE As New InternetExplorer
 
Dim htmlTabElement() As IHTMLElement
Dim PEE As IHTMLElement
 
 
URL_fonds = "http://… "
    IE.navigate URL_fonds
    Pause (4)
 
    Set GenericElem = IEDoc.body.all("content")
    htmlTabElement = getElementsByClassName(GenericElem, "tab0", False)
    Set PEE = htmlTabElement(0)
 
Set htmlTagCol = PEE.getElementsByTagName("a")
    Dim htmlTagCol_Croissance As HTMLGenericElement
    Set htmlTagCol_Croissance = htmlTagCol(3)
    Dim htmlTagCol_Ouvert As HTMLGenericElement
    Set htmlTagCol_Ouvert = htmlTagCol(6)
    Call Télécharge_CSV_Titre(htmlTagCol_Croissance)    
  ...
 
End Sub
 
 
Sub Télécharge_CSV_Titre(ByVal index As HTMLGenericElement)
    Dim htmlTagCol_Historique As IHTMLElementCollection
    Dim GenericElem As HTMLGenericElement
    Set GenericElem = index
    GenericElem.Click
    Pause (4)
   Set htmlTagCol_Historique = IEDoc.getElementsByTagName("a")
...
End Sub

A coup d'espions et de points d'arrêt je m'aperçois que, dès la ligne 34, mes variables htmlTagCol_Croissance et htmlTagCol_Ouvert perdent leur contenu.

Or j'en ai besoin dans la suite du code de Mysub

A quoi est-ce dû et comment y remédier ?

Merci d'avance pour vos réponses .

28/08/2013, 22h44
jijie

et si tu inscrivait tes variable en Public?
28/08/2013, 23h49
noftal
J'ai essayé de mettre
Code:

1 2 Public htmlTagCol_Croissance As HTMLGenericElement Public htmlTagCol As IHTMLElementCollection
en tête de module mais rien n'y fait.
C'est vrai que je tatonne un peu parce que je me doute que la solution se trouve par là mais je ne maîtrise pas encore très bien les public/private/global que ce soit pour les variables ou les fonctions/procédures.

En même temps, mes variables incriminées ne sont utilisées que dans MySub. Donc je ne vois pas pourquoi il faudrait les déclarer à un échelon au-dessus.
29/08/2013, 00h22
jijie

alors pourquoi souhaite-tu les avoirs en ligne 34?

Ce sujet intéresse, mais je suis vraiment pas assez calé sur ça!!
29/08/2013, 07h47
noftal

Comme expliqué, parce que j'en ai besoin dans la suite de MySub (symbolisée par les ... de la ligne 24)
Or, je chope une erreur sur cette variable dans la suite de mon code ("Objet requis" sur une ligne ou j'utilise la variable htmlTagCol_Croissance à nouveau).

C'est en cherchant moi-même avec des espions et points d'arrêt que j'ai identifié que le contenu de la variable, dont l'affectation se trouve en ligne 20, est perdu après le click de la ligne 33 (point d'arrêt sur la ligne 34), d'où la présentation de mon problème à partir de ce moment là.
29/08/2013, 09h01
SfJ5Rpw8

Bonjour,

est tu en as besoin pourquoi ?

avec l'instruction Set tu affecte un pointeur vers un objet à ta variable, un "IHTMLElement" , ensuite si tu change l'affichage dans ta page html .. ( par le click) l'objet est détruit , et donc ta variable ne pointe plus sur rien ..
29/08/2013, 13h29
noftal

Merci bbil pour cette explication.
Ta question m'oblige à aller dans le détail ce que je voulais éviter de faire par soucis de simplicité.
En fait ce n'est pas htmlTagCol_Croissance que je réutilise mais htmlTagCol_Ouvert.
Et l'instruction de la ligne 24 est donc Call Télécharge_CSV_Titre(htmlTagCol_Ouvert)
quand je disais que j'avais pisté la perte de donnée de la variable je parlais de cette variable (mais j'ai aussi vérifié qu'il en était de même pour htmlTagCol_Croissance

Donc si je comprends bien : quand je fais un Set X as Y, X est valable jusqu'à ce que j'applique une méthode à X (par exemple X.Click) ce qui a pour effet de libérer la variable ? Pourtant, je passe par une variable intermédiaire en ligne 30 et 31 ce qui fait que je n'applique pas le Click à X mais à Set Z=X

Dans ce cas comment faire pour
- définir une bonne fois pour toutes ma variable htmlTagCol = PEE.getElementsByTagName("a") afin de pouvoir l'utiliser dans plusieurs Sub qui appliquent des méthodes dessus ? suis-je obligé de réécrire Set htmlTagCol = PEE.getElementsByTagName("a") avant chaque appel de Sub ? Je pensais qu'il y avait plus concis.
29/08/2013, 13h40
SfJ5Rpw8

Re,

avec un set tu fait pointer ta variable vers un objet ... si ensuite tu détruit l'objet (dans ton cas en changeant de page html..) et bien ta variable pointe vers "rien" ...

si c'est la "valeur contenue" par ton objet dont ta besoin ( nom de fichier ?) bien utilise une simple affectation ( signe = ) vers une variable chaine ou numérique.... pour mémorise ce choix même après destruction de l'objet.
29/08/2013, 13h56
noftal

C'est bien sur l'objet que je veux pointer. Mais l'objet... figé à l'état où il est au moment où je l'affecte à la variable.
Pas possible ?
Dans ce cas, j'imagine que je suis obligé de répéter la commande SET avant chaque appel de sub comme je l'évoquais précédemment ?
01/09/2013, 18h55
Qwazerty

Salut

Tu as deux choix possibles.

Soit en effet tu recherches à chaque fois les éléments anchor de ton tableau, ce qui ne pose pas vraiment de problème c'est très rapide.

Soit au lieu d'appeler la méthode Click de ton bouton, tu recherches ce que provoque ce click, lorsque tu click, je suppose qu'une nouvelle page web se charge. Il te faut donc trouver le lien de cette page. Ainsi sans passer par le click, tu déclares une 2ème instance d'IE et tu t'en sert pour charger les pages annexes au fur et à mesure que tu en as besoin.
En faisant cela tu conserves toujours ta page "principale" dans ta 1ère instance d'IE et tes variables qui pointent sur des éléments de cette page restent valides.

++
Qwaz
01/09/2013, 23h27
noftal

Citation:

Envoyé par Qwazerty

Soit au lieu d'appeler la méthode Click de ton bouton, tu recherches ce que provoque ce click, lorsque tu click, je suppose qu'une nouvelle page web se charge. Il te faut donc trouver le lien de cette page.

C'est là qu'est l'hic. Tous les liens successifs sur lesquels je souhaite dérouler ma procédure ont tous la même syntaxe apparente.
Exemple : "https://www.egepargne.com/def_int_ep/ep/menu.do?dfAT=menu&dfMenuId=SC_EP_FO_SFP#"

Nota : tu ne pourras pas en faire grand chose car ces liens sont situés en aval d'une page de login sécurisée. En revanche, si la syntaxe t'inspire un commentaire pour me dire comment aborder ce type de lien, je suis preneur.
En ettendant, je vais m'orienter vers ta première solution.