Bonjour,
J'ai un truc bizarre sur un Script permettant la déconnexion/reconnexion de la LiveBox 3 (qui je tiens à le préciser n'est pas de moi hélas mais que j'ai trouvé sur le net)
Il fonctionne sans problème sur un PC sour Windows 7 64bits.
J'ai essayé sur mon PC sous Windows 7 32bits et là il y a le problème quand je double click sur ce reco.vbs celui-ci plante au bout d'un temps aléatoire (5min, 1h, 10h).
J'ai recherché sur le net ainsi que sur ce forum des réponses car ce truc de "l'objet invoqué s'est déconnecté de ses clients." semble assez répandu mais j'avoue ne rien comprendre.
j'ai le message suivant:
Ligne: 7
Caract: 1
Erreur: l'objet invoqué s'est déconnecté de ses clients.
Code : 80010108
Source: (null)
ça semble correspondre à la ligne du vbs (ou pas ?!?): Do While not nav.ReadyState = 4.
Merci d'avance pour votre aide
voici le script :
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 ' script de deconnexion/reconnexion Internet Livebox-Play 3 call Main sub Wait_IE(nav) WScript.Sleep(1000) Do While not nav.ReadyState = 4 Loop end sub sub Click_IE (nav,id) nav.document.getelementbyID(id).click call Wait_IE(nav) end sub sub init(nav) set nav = CreateObject("InternetExplorer.Application") nav.Visible = false nav.navigate "192.168.1.1" call Wait_IE(nav) nav.document.getelementbyID("PopupUsername").Value = "admin" nav.document.getelementbyID("PopupPassword").Value = "admin" nav.document.getelementbyID("bt_authenticate").click call Wait_IE(nav) end sub sub bosse(nav) 'call Click_IE(nav,"rubric2") OLD 'call Click_IE(nav,"link3") OLD nav.navigate "192.168.1.1/advConfigAccessType.html" call Wait_IE(nav) call Click_IE(nav,"bt_refresh") call Wait_IE(nav) end sub sub clean(nav) nav.quit end sub sub main dim nav call init(nav) call bosse(nav) call clean(nav) end sub
Partager