Discussion :

[35niavlys]

Bonjour, j'ai créer ce vbs mais ça marche pas ! Il utilise wget et permet de redémarrer ma neufbox en entrant identifiant et mot de passe. Où est le problème ?

Code :

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

1
2
3
4
5
WEBLOGIN = InputBox("Utilisateur ?", "NB4 Reboot" )
WEBPASS = InputBox("Mot de passe ?", "NB4 Reboot" )
 
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.run("wget http://192.168.1.1/0_2 --referer=[http://192.168.1.1/0_2?page_ref=/0_1]  http://192.168.1.1/0_1 --post-data=[method=passwd&page_ref=/0_1&web_challenge=&web_login=" & WEBLOGIN & "&web_password=" & WEBPASS & "&submit_button&button_submit] -O NUL:")

Le problème se trouve avec les guillemets et les crochets mais je ne sais pas comment faire

[35niavlys]

J'ai trouvé la réponse par hasard, il fallait utiliser chr(34)

Code :

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

1
2
3
4
WEBLOGIN = InputBox("Utilisateur ?", "NB4 Reboot" )
WEBPASS = InputBox("Mot de passe ?", "NB4 Reboot" )
Set objWshShell = CreateObject("Wscript.Shell")
Call objWshShell.run("wget -q http://192.168.1.1/0_2 --referer=" & chr(34) & "http://192.168.1.1/0_2?page_ref=/0_1" & chr(34) & " http://192.168.1.1/0_1 --post-data=" & chr(34) & "method=passwd&page_ref=/0_1&web_challenge=&web_login=" & WEBLOGIN & "&web_password=" & WEBPASS & "&submit_button&button_submit" & chr(34) & " -O NUL:", 0, True)