Pilotage Internet et valeur de script java

**CODYCO** · 20/06/2012, 11h56

Bonjour

J'utilise un code pour me connecter à Internet, je récupere les éléments des pages pour naviguer. Mais sur la 3eme page je rencontre un probleme puisque les éléments de navigation (menu) sont générer par un script et je ne parviens pas à pointer le bonne élément.

J'utilise ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
For Each oHTML_Element In HTMLDoc.Scripts '.getElementById("buttonsRowFiller")
        If oHTML_Element.getAttribute("Item") = "SCRIPT" Then oHTML_Element.Click: Exit For
    Next

Apparement il y a deux script sur le document mais je n'arrive pas à les selectionner, le script ensuite génére une série de bouton dont voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
 
function addButtons(){
	var buttonsRow = document.getElementById('buttonsRowFiller');
			var spacingTD = document.createElement("td");
		spacingTD.style.width="24px";
 
		var seperatingTD = document.createElement("td");
		seperatingTD.style.width="1px";
		seperatingTD.style.height = "30px";
		seperatingTD.style.background = "url(images/theme_BB/trait-b-NewSam.gif)";
		//seperatingTD.style.backgroundRepeat = "repeat-y";
 
		var seperatingImg = document.createElement("img");
		seperatingImg.style.width="1px";
		seperatingImg.style.height = "30px";
		seperatingImg.style.border = "0";
		seperatingImg.src = "images/imgBlanc.gif";
 
		var buttonTD = document.createElement("td");
		buttonTD.style.textAlign="center";
		buttonTD.style.className="txtblanc";
		buttonTD.style.verticalAlign = "middle";
 
		var buttonImg = document.createElement("img");
		buttonImg.style.width="2px";
		buttonImg.style.height="1px";
		buttonImg.style.border="0";
		buttonImg.src = "images/imgBlanc.gif";
 
		var buttonA = document.createElement("a");
		buttonA.href="#";
 
 
		bts  = dad.bts;
				if (typeof(bts) != 'undefined'){
 
				if (true) {
					for(i=0; i<(bts.length); i++) {
						if (bts[i].nom != 'BtSpacer' && bts[i].nom != "")
						{
							curSpacingTd = spacingTD.cloneNode(true);
							curSpacingTd.id = "lspace-"+bts[i].nom;
							buttonsRow.appendChild(curSpacingTd);
 
							curBtnTextNode = document.createTextNode(bts[i].nom);
							curBtnA = buttonA.cloneNode(true);
							curBtnA.id = bts[i].nom;
							curBtnA.onclick=function(){loadUrls(this.id);maclasse(this);};
							curBtnImg = buttonImg.cloneNode(true);
							curBtnImg.name=bts[i].nom;
							curBtnTd = buttonTD.cloneNode(true);
 
							if (window.top.dflPage == bts[i].nom) {
								curBtnImg.style.width="2px";
								curBtnA.className ="mnhLienac";
							}
							else {
								curBtnA.className ="mnhLien";
							}
							curBtnA.appendChild(curBtnTextNode);
							curBtnTd.appendChild(curBtnImg);
							curBtnTd.appendChild(curBtnA);
							buttonsRow.appendChild(curBtnTd);
 
							curSpacingTd = spacingTD.cloneNode(true);
							curSpacingTd.id = "rspace-"+bts[i].nom;
							buttonsRow.appendChild(curSpacingTd);
 
							if (i<bts.length-1 && !(i==bts.length-2 && (bts[i+1].nom == 'BtSpacer' || bts[i+1].nom == ""))){
 
								curSepTd = seperatingTD.cloneNode(true);
								curSepTd.id = "sep-"+bts[i].nom;
								buttonsRow.appendChild(curSepTd);
							}
						}
						else
						{
							curSepImg = seperatingImg.cloneNode(true);
							curSepImg.name=bts[i].nom;
							buttonsRow.appendChild(curSepImg);
						}
					}
				}
							//}
		}
		addSommaireButton(buttonsRow);
 
 
}

**CODYCO** · 21/06/2012, 10h12

Me permet de relancer sujet car aucune solution en vue, avec espion ne vois pas quel éléments capturer, les valeur du script de la page html sont elles seulements interpréter et récuprer par vba?

**Qwazerty** · 21/06/2012, 23h23

SAlut
Peux tu mettre, le lien du site sur lequel tu travailles?

Par rapport au infos supplémentaire que tu m'as donné, effectivement j'utiliserais la function LoadUrl, pour ce qui est du paramètre il faut que tu récupères les différents ID des menus, je regarderais mieux demain soir.
Regarde du coté de la variable bts, elle semble contenir l'ensemble des id des boutons du menu.

Bonne nuit
++
Qwaz

**CODYCO** · 23/06/2012, 07h56

suite au mp

**Qwazerty** · 23/06/2012, 08h24

Salut

Dans le code de AddBouton(), tu peux voir qu'il ajoute les boutons en question sous l'élément dont l'id est buttonsRowFiller. Si tu fais une recherche sur le code source de la page, tu retrouves cet élément (voir screenshot joint).
Donc je suppose que tu peux retrouver les infos sur les éléments composant le menu en regardant à la suite (ici la page étant sortie de son contexte, je ne peux pas voir la construction du menu).
Par la suite il faut utiliser l'id du bouton sur lequel tu souhaites agir, soit en pointant le bouton en question soit en utilisant son id comme paramètre à la fonction LoadURL() que tu peux appeler directement, voir pour cela ce tutoriel et plus particulièrement ce chapitre.

Bonne journée
Qwaz

**CODYCO** · 25/06/2012, 11h03

Merci pour ces éléments de réponse j'ai essayer avec le tuto et les indications que tu me donne mais deja je ne trouve pas le meme code source que toi (screen), le <tbody> contenant le <tr id=buttonsRowfiller"> n'apparait pas, je ne parviens pas a ecrire mon code pour récuperer ces éléments.

En enregistrant la page j'ai obtenu ceci...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
38
39
40
41
42
43
 
<title>[ - Portail SamFM - ]</title>
<script language="JavaScript" src="js/functions.js"></script>
<script language="JavaScript">
ope       = "GSTDI";
lstPopups = new Array();
var amont = "";
 
//ID 08/05/07 : modification pour gérer les boutons sur l'aide en ligne
var opeBtn = '';
function bouton(nom, urlMenu, urlCorps, urlOutils, key) {
	this.nom       = nom;
	this.urlMenu   = urlMenu;
	this.urlCorps  = urlCorps;
	this.urlOutils = urlOutils;
	this.key	 = key;
}
 
function init(){}
 
bt1 = new bouton("Nouvelle intervention","ope_GSTDI/menu/menuDI.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI", "ope_GSTDI/demandeIntervention.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI&action=ajout","","1");
bt2 = new bouton("Liste des interventions","", "ope_GSTDI/listeInterventions.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI","","2");
bt3 = new bouton("Planning","", "ope_GSTDI/planning2.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6","","3");
bt4 = new bouton("Gestion des*ressources","ope_GSTDI/menu/menuGR.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=GR", "ope_GSTDATA/vide.php?","","4");
bt5 = new bouton("Organisation*des interventions","ope_GSTDI/menu/menuOrgInter.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=ORGINTER", "ope_GSTDATA/vide.php?","","5");
bt6 = new bouton("","", "ope_GSTDI/vide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6","","6");
bts = new Array(bt1,bt2,bt3,bt4,bt5,bt6);
dflPage = "";
 
</script>
 
<frameset rows="75,*" framespacing="0" border="0" frameborder="0" onload="init()" onunLoad="closePopups();">
	<frame name="titre" scrolling="no" marginwidth="0" marginheight="0" noresize src="menuTop.php?amont=&ope=GSTDI&SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
	<frameset cols="206,*" framespacing="0" border="0" frameborder="0" id="framemenu">
		<frame name="menu" id="menu" scrolling="auto" marginwidth="2" marginheight="0" src="commun/menuVide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
		<frame name="corps" id="corps" scrolling="auto" marginwidth="0" marginheight="0" src="commun/vide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
	</frameset>
<frame src="UntitledFrame-3"></frameset>
<noframes>
	<body>
		Download a new Internet Navigator
	</body>
</noframes>

On vois bien la construction et l'attribution des boutons (dans mon cas le bt2).
On vois également l'attribution du complément du lien...

Je suis largué

**Qwazerty** · 25/06/2012, 11h32

Salut

Tu ne doit pas regarder au bon endroit, le code source que je regarde est celui du fichier que tu m'as transmis, je ne peux rien voire de plus que toi.

Essai avec ce code, regarde bien les commentaires, il faut mettre des points d'arrêt et créer des espions (si besoin regard dans mon tuto y'a la méthodologie pour espion et point d'arrêt).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
Sub WaitIE(IE As InternetExplorer)
   'On boucle tant que la page n'est pas totalement chargée
   Do Until IE.ReadyState = READYSTATE_COMPLETE
      DoEvents
   Loop
End Sub
 
 
Sub RechercheBouton()
'Déclaration des variables
Dim IE As New InternetExplorer
Dim IEDoc As HTMLDocument
Dim MonBouton As HTMLGenericElement
 
    'Chargement d'une page Web 'Adapte avec ton lien
    IE.Navigate "..."
 
    'Affichage de la fenêtre IE
    IE.Visible = True
 
    'On attend le chargement complet de la page
    WaitIE IE
 
    'On pointe le membre Document
    Set IEDoc = IE.document
 
    'On pointe le bouton 2
    'Dans les autre fonction, on nous donne
    'curBtnA.id = bts[i].nom;
    'Dans le morceau de code que tu me donnes dans ton dernier message, il y a
    'function bouton(nom, urlMenu, urlCorps, urlOutils, key)
    'et
    'bt2 = new bouton("Liste des interventions","", "ope_GSTDI/listeInterventions.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI","","2");
    'Je suppose donc que "Liste des interventions" doit être l'id du bouton que tu recherches, par contre je suis etonné qu'il y ai des espaces dans l'id
    'essai comme ca
    Set MonBouton = IEDoc.all("Liste des interventions")
 
    'Regarde en placant un espion si MonBouton contient bien un élément
    MonBouton.Click
 
    'On attend la fin de la recherche
    WaitIE IE
 
    'Si ca ne fonctionne pas met un espion sur MonBouton et dis moi s'il contient quelquechose apres cette ligne
    Set MonBouton = IEDoc.all("buttonsRowFiller")
 
 
    'On libère les variables
    Set IE = Nothing
    Set IEDoc = Nothing
End Sub

Ps: dans ton dernier code, sur la ligne de construction du bouton, il te donne un URL, tu peux me confirmer que celle-ci change a chaque connexion, plus exactement la parti avec SAMSESSID=...

++
Qwaz

**CODYCO** · 25/06/2012, 11h54

Malheureusement non dans les deux cas "Monbouton" ne contien rien...c'est bien pour cela que je ne vois pas ou le pointer.

**Qwazerty** · 25/06/2012, 11h56

Peux tu faire un copier coller du code source de la page ou tu te trouves?

**CODYCO** · 25/06/2012, 12h19

Les codes sources correspondent aux deux fichiers que j'ai transmis au début, bandeau et frame et enfin la source des deux réunis c'est mon dernier message qui doit réunir les deux frames...mais je te refais copie...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
38
39
40
41
42
43
 
<title>[ - Portail SamFM - ]</title>
<script language="JavaScript" src="js/functions.js"></script>
<script language="JavaScript">
ope       = "GSTDI";
lstPopups = new Array();
var amont = "";
 
//ID 08/05/07 : modification pour gérer les boutons sur l'aide en ligne
var opeBtn = '';
function bouton(nom, urlMenu, urlCorps, urlOutils, key) {
	this.nom       = nom;
	this.urlMenu   = urlMenu;
	this.urlCorps  = urlCorps;
	this.urlOutils = urlOutils;
	this.key	 = key;
}
 
function init(){}
 
bt1 = new bouton("Nouvelle intervention","ope_GSTDI/menu/menuDI.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI", "ope_GSTDI/demandeIntervention.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI&action=ajout","","1");
bt2 = new bouton("Liste des interventions","", "ope_GSTDI/listeInterventions.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI","","2");
bt3 = new bouton("Planning","", "ope_GSTDI/planning2.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6","","3");
bt4 = new bouton("Gestion des*ressources","ope_GSTDI/menu/menuGR.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=GR", "ope_GSTDATA/vide.php?","","4");
bt5 = new bouton("Organisation*des interventions","ope_GSTDI/menu/menuOrgInter.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=ORGINTER", "ope_GSTDATA/vide.php?","","5");
bt6 = new bouton("","", "ope_GSTDI/vide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6","","6");
bts = new Array(bt1,bt2,bt3,bt4,bt5,bt6);
dflPage = "";
 
</script>
 
<frameset rows="75,*" framespacing="0" border="0" frameborder="0" onload="init()" onunLoad="closePopups();">
	<frame name="titre" scrolling="no" marginwidth="0" marginheight="0" noresize src="menuTop.php?amont=&ope=GSTDI&SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
	<frameset cols="206,*" framespacing="0" border="0" frameborder="0" id="framemenu">
		<frame name="menu" id="menu" scrolling="auto" marginwidth="2" marginheight="0" src="commun/menuVide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
		<frame name="corps" id="corps" scrolling="auto" marginwidth="0" marginheight="0" src="commun/vide.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6">
	</frameset>
<frame src="UntitledFrame-3"></frameset>
<noframes>
	<body>
		Download a new Internet Navigator
	</body>
</noframes>

******************* A suivre source du bandeau haut **********

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
 
<html>
<head>
	<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
	<link rel="STYLESHEET" type="text/css" href="style/style.css">
	<link rel="STYLESHEET" type="text/css" href="style/theme_BB.css">
 
	<style>
	.ligne_over
	{
		background-color : #F8991C;
	}
	</style>
	<script src="js/functions.js"></script>
	<script src="js/functions_rollover.js"></script>
	<script language="JavaScript" src="js/functions_tableaux.js"></script>
	<!--[if lt IE 7]><script type=text/javascript src=https://www.samfm.net/samfmeiffagecm/js/pngfix.js></script><![endif]-->
	<script language="JavaScript">
	<!--
 
	ope = "GSTDI";
	dad = window.top;
	baseUrl = "https://www.samfm.net/samfmeiffagecm/";
 
	function MM_preloadImages() { //v3.0
	  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
		var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
		if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
	}
 
	function MM_swapImgRestore() { //v3.0
	  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
	}
 
	function MM_findObj(n, d) { //v4.0
	  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
		d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
	  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
	  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
	  if(!x && document.getElementById) x=document.getElementById(n); return x;
	}
 
	function MM_swapImage() { //v3.0
	  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
	   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
	}
 
	function callKiosk(menu) {
		pop_modif = new Popup('Kiosk',"ope_TBLBORD/",1);
		pop_modif.oOpen = pop_modif.open;
		pop_modif.params["top"]=5;
		pop_modif.params["left"]=20;
		pop_modif.params["width"] = 1280;
		pop_modif.params["height"] = 768;
		pop_modif.open();
 
	}
	function active_image(bt) { //v1.0
		if (document.imgActiv) {
			x=MM_findObj(document.imgActiv);
			x.src = x.offSrc;
			x.oSrc = x.offSrc;
			document.imgActiv = "";
		}
		if ((x=MM_findObj(bt)) != null) {
			document.imgActiv = bt;
			x.oSrc = x.onSrc;
			x.src = x.onSrc;
		}
		window.top.focus();
	}
 
	function init() {
		var bts, urls, i;
		bts  = dad.bts;
		urls = dad.urls;
			if (true) {
 
		if (typeof(bts) != 'undefined')
		for(i=0;i<(bts.length);i++)
		if (bt = MM_findObj(bts[i].nom)) { 
			bt.urlMenu   = bts[i].urlMenu;
			bt.urlCorps  = bts[i].urlCorps;
			bt.urlOutils = bts[i].urlOutils;
			bt.key = bts[i].key;
		}
			if (typeof(window.top.dflPage) != "undefined"){
				loadUrls(window.top.dflPage);
			}
		}
 
 
		addButtons();
 
 
 
	}
 
	function loadUrls(bouton) {
		//2008-04-15.ID - use a cleaner way to get button
		/*if (bt = MM_findObj(bouton)) {
			//ID : pour aide en ligne
			if(bt.key != 'undefined') window.top.opeBtn = bt.key;
			if ((typeof(bt.urlMenu) != 'undefined') || (typeof(bt.urlCorps) != 'undefined')) {
					chgUrl(baseUrl + bt.urlMenu, baseUrl + bt.urlCorps);
			}
			//active_image(bouton);
		}*/
		bts = dad.bts;
		bt = false;
		for(var i=0;i<bts.length;i++){
			if(bts[i].nom==bouton)
				bt = bts[i];
		}
		if (bt) {
			//ID : pour aide en ligne
			if(bt.key != 'undefined') window.top.opeBtn = bt.key;
			if ((typeof(bt.urlMenu) != 'undefined') || (typeof(bt.urlCorps) != 'undefined')) {
					if (bt.urlMenu == "")
						chgUrl('', baseUrl + bt.urlCorps);
					else
						chgUrl(baseUrl + bt.urlMenu, baseUrl + bt.urlCorps);
			}
		}
 
		return true;
	}
 
 
	function active(ligne,maimage) {
	if (typeof(image) == 'undefined')
		image = 'images/fond-menu-vc.gif';
	if (typeof(ligne.oBackground) == 'undefined')
		ligne.oBackground = ligne.getAttribute('background')
		ligne.setAttribute('background',image,1);
		maimage.src = 'images/fleche-vert.gif';
	}
 
	function desactive(ligne,maimage) {
		ligne.setAttribute('background',ligne.oBackground,1);
		maimage.src = 'images/fleche-dc.gif';
	}
 
	function maclasse(obj) {
		bts  = dad.bts;
 
	var nbBts = (bts[bts.length-1].nom != 'BtSpacer') ? bts.length  : bts.length-1 ;
			for(i=0; i < nbBts; i++)
			{
				if(bts[i].nom!="" && bts[i].nom!=" "){
					obj1=document.getElementById(bts[i].nom);
					obj1.className="mnhLien";
				}
		}
		obj.className="mnhLienac";
	}
	//-->
	</script>
</head>
 
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="init();">
<div style="position:absolute; right:5px; top:0px;" >
		<script language="JavaScript" type="text/javascript">
		var AEL_articleToOpen = 0;
		  function AEL_open(){
		  	//alert(window.top.opeBtn);
		  	apop = new Popup('AIDELIGNE','https://www.samfm.net/samfmeiffagecm/aideLigne.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&module=GSTDI&opeBtn='+window.top.opeBtn,false);
		  	apop.params["width"] = 900; 		apop.params["height"] = 700;
		  	apop.params["scrollbars"] = 1; 		apop.params["toolbar"] = 0;
		  	apop.params["top"] = 60; 		  	apop.params["left"] = 60;
		  	apop.open();
		  }
					  function AEL_openAdmin(){
			  	apop = new Popup('AIDEADMIN','https://www.samfm.net/samfmeiffagecm/ope_AIDELIGNE/poplist/popup_admin.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&hlmd_module=GSTDI&hlmd_module_btn_id='+window.top.opeBtn,false);
			  	apop.params["width"] = 200; 	  	apop.params["height"] = 300;
			  	apop.params["scrollbars"] = 0;	  	apop.params["toolbar"] = 0;
			  	apop.params["top"] = 200;		  	apop.params["right"] = 200;
			  	apop.open();
			  }
		  		</script>
		<a  href="javascript:AEL_open();" alt="Module-GSTDI" >
				<img  border="0" src="https://www.samfm.net/samfmeiffagecm/images/theme_BB/aide.png" width="40px" height="40px" /></a><a id="me" href="javascript:AEL_openAdmin();" ><img border="0" src="https://www.samfm.net/samfmeiffagecm/images/theme_BB/admin.png" width="13px" height="39px" /></a></div>
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="couleurThemebarreh">
<tr height="36">
	<td width="200" height="75" rowspan="2" align="center" bgcolor="#FFFFFF">
				<img src="https://www.samfm.net/samfmeiffagecm/multimedia/general/ECM%20%28original%291284970142.JPG" style="width:180px;height:50px;" vspace="2" alt="" border="0">
			</td>
	<td valign="top" height="32" colspan="2">
	<table border="0" cellspacing="0" cellpadding="0">
		<tr>
		 <td width="14"  align="left"></td>
		  <td width="120">
 
		 	 <a href="ope_GSTDI/quitter.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&amont=&new_sesLangue=" target="_top"><img src="images/theme_BB/tit_FTop_SuiteFM.png" alt="" border="0"></a><img src="images/spacer.gif" border="0" width="10">
 
		  </td>
 
		  <td width="24">
			  <img src="images/theme_BB/fleche-b.gif" border="0">
		  </td>
 
		  <td width="565">
		  	<span class="txtTitreModule">Gestion des interventions</span>		  </td>
		</tr>
	</table>	</td>
  </tr>
  <tr align="right" valign="bottom">
	  <td>
		  <table border="0" width="100%" cellpadding="0" cellspacing="0">
			  			  <tr align="right"><td>
					  <table border="0" cellspacing="0" cellpadding="0">
						  <tr id="buttonsRowFiller">
 
 
 
						  </tr>
					  </table>
 
				  </td></tr>
		  </table></td>
  </tr>
</table>
<script>
 
function addButtons(){
	var buttonsRow = document.getElementById('buttonsRowFiller');
			var spacingTD = document.createElement("td");
		spacingTD.style.width="24px";
 
		var seperatingTD = document.createElement("td");
		seperatingTD.style.width="1px";
		seperatingTD.style.height = "30px";
		seperatingTD.style.background = "url(images/theme_BB/trait-b-NewSam.gif)";
		//seperatingTD.style.backgroundRepeat = "repeat-y";
 
		var seperatingImg = document.createElement("img");
		seperatingImg.style.width="1px";
		seperatingImg.style.height = "30px";
		seperatingImg.style.border = "0";
		seperatingImg.src = "images/imgBlanc.gif";
 
		var buttonTD = document.createElement("td");
		buttonTD.style.textAlign="center";
		buttonTD.style.className="txtblanc";
		buttonTD.style.verticalAlign = "middle";
 
		var buttonImg = document.createElement("img");
		buttonImg.style.width="2px";
		buttonImg.style.height="1px";
		buttonImg.style.border="0";
		buttonImg.src = "images/imgBlanc.gif";
 
		var buttonA = document.createElement("a");
		buttonA.href="#";
 
 
		bts  = dad.bts;
				if (typeof(bts) != 'undefined'){
 
				if (true) {
					for(i=0; i<(bts.length); i++) {
						if (bts[i].nom != 'BtSpacer' && bts[i].nom != "")
						{
							curSpacingTd = spacingTD.cloneNode(true);
							curSpacingTd.id = "lspace-"+bts[i].nom;
							buttonsRow.appendChild(curSpacingTd);
 
							curBtnTextNode = document.createTextNode(bts[i].nom);
							curBtnA = buttonA.cloneNode(true);
							curBtnA.id = bts[i].nom;
							curBtnA.onclick=function(){loadUrls(this.id);maclasse(this);};
							curBtnImg = buttonImg.cloneNode(true);
							curBtnImg.name=bts[i].nom;
							curBtnTd = buttonTD.cloneNode(true);
 
							if (window.top.dflPage == bts[i].nom) {
								curBtnImg.style.width="2px";
								curBtnA.className ="mnhLienac";
							}
							else {
								curBtnA.className ="mnhLien";
							}
							curBtnA.appendChild(curBtnTextNode);
							curBtnTd.appendChild(curBtnImg);
							curBtnTd.appendChild(curBtnA);
							buttonsRow.appendChild(curBtnTd);
 
							curSpacingTd = spacingTD.cloneNode(true);
							curSpacingTd.id = "rspace-"+bts[i].nom;
							buttonsRow.appendChild(curSpacingTd);
 
							if (i<bts.length-1 && !(i==bts.length-2 && (bts[i+1].nom == 'BtSpacer' || bts[i+1].nom == ""))){
 
								curSepTd = seperatingTD.cloneNode(true);
								curSepTd.id = "sep-"+bts[i].nom;
								buttonsRow.appendChild(curSepTd);
							}
						}
						else
						{
							curSepImg = seperatingImg.cloneNode(true);
							curSepImg.name=bts[i].nom;
							buttonsRow.appendChild(curSepImg);
						}
					}
				}
							//}
		}
		addSommaireButton(buttonsRow);
 
 
}
 
function addSommaireButton(buttonsRow)
{
			//--adding sommaire button
		var homeBtnTD = document.createElement("td");
		homeBtnTD.className="mntset";
		homeBtnTD.style.textAlign="center";
		homeBtnTD.style.width="123px";
		homeBtnTD.style.height="30px";
 
		var homeBtnA = document.createElement("a");
		homeBtnA.className = "mnhsb";
		homeBtnA.href = "ope_GSTDI/quitter.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&amont=&new_sesLangue=";
		homeBtnA.target = "_top";
 
		var homeTxtNode = document.createTextNode ("Sommaire");
		homeBtnA.appendChild(homeTxtNode);
		homeBtnTD.appendChild(homeBtnA);
		buttonsRow.appendChild(homeBtnTD);
		//--end of adding sommaire button
 
	}
 
</script>
</body>
</html>

**Qwazerty** · 25/06/2012, 12h28

Humm

Je ne comprend pas, l'id est pourtant bien présent

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
<tr align="right" valign="bottom">
	  <td>
		  <table border="0" width="100%" cellpadding="0" cellspacing="0">
			  			  <tr align="right"><td>
					  <table border="0" cellspacing="0" cellpadding="0">
						  <tr id="buttonsRowFiller">
 
 
 
						  </tr>
					  </table>
 
				  </td></tr>
		  </table></td>

Je viens de faire l'essai concernant buttonsRowFiller, il le pointe sans problème.

Je serais tenté de dire que tu as le même problème que moi, car au boulot , j'ai une appliweb qui ne me permet pas de manipuler IE avec un script et pourtant je peux lire l’ensemble du code source. La ou cela diffère, c'est qu'il m'est impossible d'exporter le code source de la page... alors que toi visiblement ça ne pose pas de soucis.
Je vois que l'appli utilisé est issu d'un groupe qui c'est spécialisé dans l'appli intranet (SAMfm), il se peut donc qu'il utilise une méthode semblable pour éviter toute intervention scripté (du moins en utilisant la méthode que je présente dans mon tuto)

Tu donnes un total de 2 codes source, tu as plusieurs pages web? ou une seul? Leur imbrication te parait certainement simple en l'aillant sous les yeux, mais pour moi c'est assez flou :s, le web n'est pas trop ma spécialité qui plus est.

**CODYCO** · 25/06/2012, 13h47

Je te confirme que je ne pointe ni l'un ni l'autre, et oui l'éditeur du site (que semble connaitre) est bien spécialisé dans ce type de system.
Dans la construction de la page on parle bien d'une seule page mais de ce que je comprend et je connais du site elle est constitué de deux frame (cadre) au moins, l'un avec le bandeau menu horizontal et l'autre avec la page principale qui va charger les éléments en fonction du choix du menu, mais généralement dans ce type de construction il y a une troisieme frame qui est constitué de la réunification des deux.

Cela aussi a été pour moi une piste en essayant de pointer indépendemment l'une et l'autre mais rien.

Je n'avais pas pensé a un blocage côté navigateur, je vais tester sur une machine hors réseau pro...

Mais mon code étant destiné a fonctionner sur le réseau cela ne réssoudra pas forcement mon probleme mais nous donnera dejà un eclaircissment.

Pense tu sinon qu'il soit possible d'utiliser directement l'adresse de base + l'adresse du bouton.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
bt2 = new bouton("Liste des interventions","", "ope_GSTDI/listeInterventions.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI","","2");

L'adresse de la page + la partie en italique...

**CODYCO** · 25/06/2012, 14h54

Hé non même résultat sur une machine hors reseau et donc app non bridé.

**Qwazerty** · 25/06/2012, 19h05

Pour ce qui est de l'utilisation du lien direct, une question en poste 7 est passée inaperçu (j'avais édité mon message, tu as dut passer à coté)

Ps: dans ton dernier code, sur la ligne de construction du bouton, il te donne un URL, tu peux me confirmer que celle-ci change a chaque connexion, plus exactement la parti avec SAMSESSID=...

A mon avis, à chaque fois que tu te connectes, le SAMSESSID doit changer, a vérifier donc, si c'est le cas, il ne sera pas possible d'utiliser l'URL, à moins de trouver le moyen de récupéré l'ID en question et de reconstituer l'URL.

Désolé de ne pas pouvoir t'apporter plus d'aide, mais sans support de recherche et d'essai, il est difficile de mesurer les problèmes auxquels tu fais face.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

curBtnA.onclick=function(){loadUrls(this.id);maclasse(this);};

As-tu essayé d'executer directement la function laodUrls en lui passant l'id du bouton en paramètre? Pas testé mais ça doit ressembler à quelque chose comme ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

IEDoc.parentWindow.execScript "loadUrls(Liste des interventions)", "JavaScript"

Encore une fois les espace dans l'id me choc un peu...
Sur les explorateur internet, tu as possibilité de tracer l’exécution du code de la page, il serait peut-être intéressant de lancer la surveillance juste avant de clicker sur le bouton en question, tu auras peut-être une trace de l'appel fait à loadUrls et donc confirmation de l'ID utilisé.

++
Qwaz

**CODYCO** · 26/06/2012, 10h09

J'ai vérifié ce matin les différents éléments que tu m'a proposer hier soir :

L'adresse ne change pas à chaque session comme tu le penser il semblerais dès lors possible d'utiliser l'adresse, mais je ne vois pas comment puisque une partie doit etre passé en arguments au script. Tous les liens en effet se termine par "#".

Je n'avais pas esayer non plus l'explorateur pour développeur de IE, il me donne en effet plus de détails puisque on y vois le code html généré par le php.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<tr id="buttonsRowFiller">
<td id="sep-Nouvelle intervention" style="width: 1px; background: url(images/theme_BB/trait-b-NewSam.gif); HEIGHT: 30px;"/>
<td id="lspace-Liste des interventions" style="width: 24px;"/>
<td style="text-align: center; vertical-align: middle; classname: txtblanc;">
<img width="10" height="10" submitName="Liste des interventions" style="border-bottom: 0px; border-left: 0px; width: 2px; height: 1px; border-top: 0px; border-right: 0px;" src="images/imgBlanc.gif" complete="complete"/>
<a class="mnhLien" id="Liste des interventions" href="#">

Peux etre que le submit peux etre une piste mais cependant avec tous les éléments ci-joint je ne parviens a en pointer aucun, alors ouo je m'y prend mal ou le probleme est autre...

**Qwazerty** · 27/06/2012, 06h22

Salut

Quand est il de l'utilisation direct de la fonction LoadUrls? et de la surveillance lors du déroulage du script?

Pour ce qui est de l'utilisation direct du lien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
baseUrl = "https://www.samfm.net/samfmeiffagecm/";
[...]
function bouton(nom, urlMenu, urlCorps, urlOutils, key)
[...]
bt2 = new bouton("Liste des interventions","", "ope_GSTDI/listeInterventions.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&sel_module=DI","","2");
[...]
chgUrl(baseUrl + bt.urlMenu, baseUrl + bt.urlCorps);

Donc visiblement ça donne
https://www.samfm.net/samfmeiffagecm...&sel_module=DI

Je n'ai pas trouver les corps de la fonction chgUrl, je ne sais donc pas ce qu'elle ajoute ou retranche au 2 liens qu'elle accepte en paramètre. dans le cas du bouton 2 urlMenu est vide, le 1er paramètre contient donc uniquement l'Url de base.

Je ne vois pas non plus l’intérêt de tout ce topic, s'il suffit au final de récupérer cette Url, ne serait il pas plus simple de mettre directement en favori le portail d'accès du site? Ou alors le cas du bouton2 n'est qu'un exemple?
++
Qwaz

**CODYCO** · 27/06/2012, 08h59

Bonjour Qwazerty

Avant tout répondre à ta derniere question sur l'interet de ce topic.
Cette navigation sur IE viens s'inscrire dans un script plus général, en effet cette navigation doit arriver sur une liste de données qui sera exporté vers excel. Cette export sera défini par des dates défini par l'utilisateur, mon but était déliminé l'intervention de l'utilisateur sur ce portail mais d'en extraire les données défini par ma navigation du fichier excel.

Quand à l'utilisation de la fonction LoadUrls, je ne parviens pas à la mettre en place et ne peux donc pas te faire un retour dessus.

Dans ta reconstruction de l'url tu arrives à :
https://www.samfm.net/samfmeiffagecm...&sel_module=DI

Alors qu'en réalité la page liste des interventions une fois activé manuellement donne :

https://www.samfm.net/samfmeiffagecm/frames.php?SAMSESSID=eerd3pq11mllaa6lc4lg1vchf6&new_sesLangue=FR&ope=GSTDI

En recherchant avec cette notion de "frames" j'ai utilisé ce bout de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
For Each oHTML_Element In HTMLDoc.all.Item(, 7).getElementsByTagName("FRAME")
    If oHTML_Element.getAttribute("href") = "#" Then oHTML_Element.Click: Exit For
    Next

je voulais voir si je pouvais pointer les différents bouton construit sur le meme principe, mais tous les "id" ou "nom" que je vois dans le code de l'explorateur IE, n'apparaisse pas au pointage...

**Qwazerty** · 27/06/2012, 18h11

Salut

Donc si tu as le lien

Alors qu'en réalité la page liste des interventions une fois activé manuellement donne :

https://www.samfm.net/samfmeiffagecm...e=FR&ope=GSTDI

C'est bon, tu peux te rendre direct à la page?

Pour ton code sur les "frame", je ne comprend pas ce que tu veux faire, une frame est un conteneur, pas un bouton, il n'est pas clickable (enfin le fait d'utiliser sa méthode Click, ne correspond pas à un des boutons).
Fais moi un screenshot de la page sur laquelle tu te trouves, que j'essai de comprendre comment est construite ta page, parce que la on tourne en rond et j'ai bien peur de ne pas t’être d'une grande aide au final.

++
Qwaz

**CODYCO** · 28/06/2012, 11h52

Bonjour Qwazerty

Encore merci pour le temps et l'energie...je pars en vacance ce soir, je ne retravaillerais pas sur ce probleme avant mon retour, je garde le topic actif et te referais un etat de tous les éléments à mon retour...

Il y a forcement un moyen, je serais peut etre dans l'obligation de donner un acces temporaire afin que tu te rends mieux compte de la structure de la page et de son fonctionnement...

Si tu pars en vacance, alors bonne vacance moi je vais faire du
VBA : Villégiature, Balnéaire, Agréable...

**Qwazerty** · 28/06/2012, 18h30

Salut
Passe de bonne vacance et l'accès tempo nous fera surement gagner du temps

++
Qwaz

Pilotage Internet et valeur de script java

Macros et VBA Excel

Discussions similaires

Partager

Partager