Script de reconnexion pour le dernier firmware

F5BJR1 — Mon, 11 Aug 2014 12:53:00 GMT

saisir ceci , le renommer par exemple en reconnect.vbs

il vous suffira de cliquer sur le nom du fichier

le forum modifie la ligne : nav.navigate "19*.***.*.1"

mettre l adresse IP de la llivebox a la place des étoiles

----------------------------------------

call main
sub wait_IE(nav)
wScript.Sleep(4000)
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 "19*.***.*.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 execute_restart(nav)
nav.navigate "19*.***.*.1/advConfigAccessType.html"
call wait_IE(nav)
call click_IE(nav,"bt_refresh")
call wait_IE(nav)

call wait_IE(nav)
call click_IE(nav,"bt_save")
call wait_IE(nav)
end sub
sub clean(nav)
nav.quit
end sub
sub main
dim nav
call init(nav)
call execute_restart(nav)
call clean(nav)
end sub

[Edit : Merci de ne pas indiquer d'informations confidentielles en public. Equipe modération]

Re : Script de reconnexion pour le dernier firmware

kheops1979 — Sun, 14 Sep 2014 17:49:14 GMT

Le script me parait étrange il ne fonctionne pas chez moi sous windows 7, la syntax-->sub wait_IE(nav)-->pour internet explorer.

Avec firefox cela donne-->sub wait_FF(nav)?

De plus le mot de passe n'est pas "admin" chez moi donc je l'ai changer dans le script.

sujet Script de reconnexion pour le dernier firmware dans ma connexion

Script de reconnexion pour le dernier firmware

Re : Script de reconnexion pour le dernier firmware