Forums MHS

Forums français autour de Windows Home Server | Par Mon Home Server

Vous n'êtes pas identifié.

Annonce

Veuillez prendre connaissance de ces quelques règles avant la publication de messages :
- Le langage SMS et l'utilisation abusive des majuscules sont à éviter ;
- Aucun lien vers des sites illégaux et de téléchargement ne seront tolérés ;
Les modérateurs se gardent le droit de bannir les auteurs ne respectant pas ces règles.

Cet espace est aussi le vôtre, respectez-le.
L'administrateur se garde tous les droits pour assurer la qualité des échanges.

Respectez la langue française.


Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 333

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 333

#1 07-06-2011 01:46:57

celegorm
Membre
Date d'inscription: 27-08-2009
Messages: 165

ajouter un switch logiciel pour le wifi

Bonjour à tous,
je viens d'écrire une page ASP pour activer/désactiver le wifi des routeur rangemax WNR 854T et 834B de chez Netgear sans passer par l'administration à distance de ces périphériques.
Cette page est accessible de partout (il faut évidemment la protéger avec un http auth) et écrite pour s'afficher correctement sur un Iphone.
Si ça intéresse quelqu'un, je peux vous poster la source.
bonne journée !
ps: l'intéret c'est de pouvoir agir sur le wifi sans avoir à allumer un PC local et ce pour limiter les envois d'ondes lorsqu'on utilise pas le réseau sans fil.

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 333

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 333

#2 15-06-2011 22:52:45

Sébastien
Administrateur
Date d'inscription: 13-08-2008
Messages: 2274
Site web

Re: ajouter un switch logiciel pour le wifi

Je suis intéressé (voir si ca marche avec mon netgear) !


MVP Windows Home Server & créateur du blog et des forums Mon Home Server

HP DataVault X510 migré vers WHS 2011. 3 x 1,5To. Add-ins : LightsOut et MyMovies.
HP DataVault X311 migré vers WS 2012 Essentials R2. 3 x 1To. Add-ins : LightsOut.
LaCie 5big Office : 2x2To. Add-ins : LightsOut.
Serveurs de test virtualisés sur WMware Workstation : Intel E8400 3,00GHz, 8Go de DDR3 et 2x500Go SATA.

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

#3 20-06-2011 10:02:26

celegorm
Membre
Date d'inscription: 27-08-2009
Messages: 165

Re: ajouter un switch logiciel pour le wifi

et hop:

Code:

<%@ Page aspcompat=true %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
    <meta name="viewport" content="width = 320" />
    <meta name="viewport" content="initial-scale=1, user-scalable=no" />
<link rel="apple-touch-icon" href="http://yourexternalIP/apple-touch-icon.png">
   </head>

   <body>

       <center>

       <form action="default.aspx">

           <h3> gestion du wifi:  <select name="Category" size=1>

                         <% 
                             Dim I As Integer
                             Dim Values(2) As String
                             Values(0) = "activer"
                             Values(1) = "desactiver"
            
                             For I = 0 To Values.Length - 1
                          %>

                                <% If (Request.QueryString("Category") = Values(i)) %>
                                  <option selected>
                                <% Else %>
                                  <option>
                                <% End If %>
                                   <%=Values(i)%>
                                </option>

                          <% Next %>

                      </select>
           </h3>

           <input type=submit name="valider" value="valider">

           <p>

           <% If (Not Request.QueryString("valider") = Nothing)
  
                Const CREDENTIALS_FOR_SERVER = 0

                Dim  strAuthSrvr, strUser, strPass, activation
                Dim objHTTP

                strAuthSrvr = "192.168.XXX.XXX"
                strUser = "admin"
                strPass = "your password"
                
                objHTTP = Server.CreateObject("WinHttp.WinHttpRequest.5.1")

                If (Request.QueryString("Category")="activer") then 
                    activation="wl0_enabled=1"
                    objHTTP.open ("POST","http://" & strAuthSrvr & "/post.cgi",false)
                    objHttp.SetCredentials (strUser,strPass,CREDENTIALS_FOR_SERVER)
                    objHTTP.send ("command=device_data&cur_ipaddr=" & strAuthSrvr & "&next_page=WLG_adv.htm&redirect_timer=30000&reboot=1&data1=next_page+wl0_enabled+wl0_ssid_bcast_enabled+wl0_fragThPeriod+wl0_rtsThPeriod+wl0_enable_preamble+wl0_amsdu_mode+wl0_optimization_set+wl0_optimiz_level+wl0_wmm_enabled+wl0_wmm_ack+wl0_wmmedcaap_AC_BK+wl0_wmmedcaap_AC_BE+wl0_wmmedcaap_AC_VI+wl0_wmmedcaap_AC_VO+wl0_wmmedcasta_AC_BK+wl0_wmmedcasta_AC_BE+wl0_wmmedcasta_AC_VI+wl0_wmmedcasta_AC_VO+wl0_ampdu_factor+wl0_ampdu_density&"& activation &"&wl0_ssid_bcast_enabled=1&wl0_fragThPeriod=2346&wl0_rtsThPeriod=2346&wl0_enable_preamble=0&wl0_optimization_set=2&wl0_optimiz_level=0&wl0_amsdu_mode=2&wl0_wmm_enabled=1&wl0_wmm_ack=0&wl0_wmmedcaap_AC_BK=1+15+1023+7+0+0&wl0_wmmedcaap_AC_BE=0+4+15+2+0+0&wl0_wmmedcaap_AC_VI=2+7+15+1+188+94&wl0_wmmedcaap_AC_VO=3+3+7+1+102+47&wl0_wmmedcasta_AC_BK=1+15+1023+7+0+0+0&wl0_wmmedcasta_AC_BE=0+15+1023+3+0+0+0&wl0_wmmedcasta_AC_VI=2+7+15+2+188+94+0&wl0_wmmedcasta_AC_VO=3+3+7+2+102+47+0&wl0_ampdu_factor=3&wl0_ampdu_density=7&enable_ap=on&ssid_bc=on&rts=2346&enable_shortpreamble=0&omz_set=1&Apply=Apply")
                    %>wifi activé<%
                end if
                
                If (Request.QueryString("Category")="desactiver") then 
                    activation="wl0_enabled=0"
                    objHTTP.open ("POST","http://" & strAuthSrvr & "/post.cgi",false)
                    objHttp.SetCredentials (strUser,strPass,CREDENTIALS_FOR_SERVER)
                    objHTTP.send ("command=device_data&cur_ipaddr=" & strAuthSrvr & "&next_page=WLG_adv.htm&redirect_timer=30000&reboot=1&data1=next_page+wl0_enabled+wl0_ssid_bcast_enabled+wl0_fragThPeriod+wl0_rtsThPeriod+wl0_enable_preamble+wl0_amsdu_mode+wl0_optimization_set+wl0_optimiz_level+wl0_wmm_enabled+wl0_wmm_ack+wl0_wmmedcaap_AC_BK+wl0_wmmedcaap_AC_BE+wl0_wmmedcaap_AC_VI+wl0_wmmedcaap_AC_VO+wl0_wmmedcasta_AC_BK+wl0_wmmedcasta_AC_BE+wl0_wmmedcasta_AC_VI+wl0_wmmedcasta_AC_VO+wl0_ampdu_factor+wl0_ampdu_density&"& activation &"&wl0_ssid_bcast_enabled=1&wl0_fragThPeriod=2346&wl0_rtsThPeriod=2346&wl0_enable_preamble=0&wl0_optimization_set=2&wl0_optimiz_level=0&wl0_amsdu_mode=2&wl0_wmm_enabled=1&wl0_wmm_ack=0&wl0_wmmedcaap_AC_BK=1+15+1023+7+0+0&wl0_wmmedcaap_AC_BE=0+4+15+2+0+0&wl0_wmmedcaap_AC_VI=2+7+15+1+188+94&wl0_wmmedcaap_AC_VO=3+3+7+1+102+47&wl0_wmmedcasta_AC_BK=1+15+1023+7+0+0+0&wl0_wmmedcasta_AC_BE=0+15+1023+3+0+0+0&wl0_wmmedcasta_AC_VI=2+7+15+2+188+94+0&wl0_wmmedcasta_AC_VO=3+3+7+2+102+47+0&wl0_ampdu_factor=3&wl0_ampdu_density=7&enable_ap=on&ssid_bc=on&rts=2346&enable_shortpreamble=0&omz_set=1&Apply=Apply")
                    %>wifi désactivé<%
                end if
           End If %>

       </form>

       </center>

   </body>
</html>

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

#4 20-06-2011 10:04:49

celegorm
Membre
Date d'inscription: 27-08-2009
Messages: 165

Re: ajouter un switch logiciel pour le wifi

faut juste rajouter une ptite icone sympa pour l'iphone et mettre le tout dans un rep de wwwroot (y'a des droits à gérer dans l'interface d'IIS pour que la page soit inacessible (activer http auth).

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

#5 20-06-2011 10:22:18

celegorm
Membre
Date d'inscription: 27-08-2009
Messages: 165

Re: ajouter un switch logiciel pour le wifi

et sinon pour les autres netgear, (j'ai essayé sur un modem routeur numericable), ça a l'air beaucoup plus compliqué (traduction: j'ai pas réussi parce que j'ai pas les compétences). faut bien récupérer les données du POST et rajouter des champs http headers mais je n'ai pas réussi à ce que les modif soient prises en compte (même avec le retour http OK)... là aussi j'ai les sources...

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

#6 20-06-2011 10:53:12

Bernard
Modérateur
Lieu: Montpellier
Date d'inscription: 29-04-2009
Messages: 1584

Re: ajouter un switch logiciel pour le wifi

Bonjour,

Pas vraiment surprenant que le Netgear Numéricable soit récalcitrant. Ils lui ont chargé un soft un peu bricolé à leur sauce à eux et je suis prêt à croire qu'il y a des parties vérouillées, c'est du matos propriétaire  sad

@+


WHS sur PC assemblé maison
Clients : 7 PC fixes, 1 netbook
FAI Bouygues : Bbox sensation

Hors ligne

 

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 348

Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/clients/9b3714d5ebccce428d36c2e50dd13885/forums.monhomeserver.fr/include/parser.php on line 349

#7 20-06-2011 15:44:14

celegorm
Membre
Date d'inscription: 27-08-2009
Messages: 165

Re: ajouter un switch logiciel pour le wifi

@sebastien:
voici le code vbs que j'ai écris pour le netgear CBVG834G et qui ne fonctionne pas...si vous avez des idées... smile

Code:

Const CREDENTIALS_FOR_SERVER = 0

Dim  strAuthSrvr, strUser, strPass, taille, activation, data
Dim objHTTP

strAuthSrvr = "192.168.0.1"
strUser = "admin"
strPass = "password"

Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

activation="NetgearEnableWireless=0"         
data="ServiceSetIdentifier=xxxxxxx&ChannelNumber=4&"& activation &"&NetgearClosedNetwork=0x01&NetgearSecOptionIndex=6&NetgearSecOption6=6&SharedKeyAuthentication=0&w802_1xAuthentication=0&WEP64_WepPassPhrase=&WEP64_GenerateWepKeys=&WEP64_WepKeysGenerated=&WEP64_AdvWirelessSetupKeyIndex=&WEP64_AdvWirelessSetupKey1=1&WEP64_AdvWirelessSetupWepKey1=0000000000&WEP64_AdvWirelessSetupWepKey2=0000000000&WEP64_AdvWirelessSetupWepKey3=0000000000&WEP64_AdvWirelessSetupWepKey4=0000000000&WepPassPhrase=&DefaultSecretKey=1&WepKeysGenerated=243&WEP128_WepPassPhrase=&WEP128_GenerateWepKeys=&WEP128_WepKeysGenerated=&WEP128_AdvWirelessSetupKeyIndex=&WEP128_AdvWirelessSetupKey1=1&WEP128_AdvWirelessSetupWepKey1=85010311e1ced631b45dc3dbb0&WEP128_AdvWirelessSetupWepKey2=85010311e1ced631b45dc3dbb0&WEP128_AdvWirelessSetupWepKey3=85010311e1ced631b45dc3dbb0&WEP128_AdvWirelessSetupWepKey4=85010311e1ced631b45dc3dbb0&RadiusServer1=0.0.0.0&RadiusPort1=1812&RadiusKey1=&WpaPskEncryption=2&WpaPreSharedKey=xxxxxxxxxxxxxxx&WpaEncryption=2&RadiusServer=0.0.0.0&RadiusPort=1812&RadiusKey=&GenerateWepKeys=0&ChangeSecOption=&commitwlanSecurity=1"
taille= len(data)

objHTTP.open "POST", "http://"& strAuthSrvr &"/goform/NetGearRg802dot11BasicCfg HTTP/1.1",false
objHttp.SetCredentials strUser,strPass,CREDENTIALS_FOR_SERVER
'objhttp.setrequestheader "Cookie", "x=y" 
objhttp.setrequestheader "Accept", "text/html, application/xhtml+xml, */*"
objhttp.setrequestheader "referer", "http://" & strAuthSrvr & "/NetGearRg802dot11BasicCfg.asp"
objhttp.setrequestheader "ACCEPT-LANGUAGE", "fr-FR"
objhttp.setrequestheader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)"
objhttp.setrequestheader "Content-Type", "application/x-www-form-urlencoded"
objhttp.setrequestheader "Authorization", "Basic YWRtaW46cGFzc3dvcmQ="
objhttp.setrequestheader "ACCEPT-ENCODING", "gzip, deflate"
objhttp.setrequestheader "Host","http://" & strAuthSrvr
objhttp.setrequestheader "Content-Length", taille
objhttp.setrequestheader "Connection", "Keep-Alive"
objHttp.send(data)
WScript.Echo objHTTP.responseText 'debug
WScript.Echo objHTTP.Status & " - " & objHTTP.StatusText 'debug

Hors ligne

 
Ces forums font parti du blog Mon Home Server | Twitter | Facebook | Contact (pas du support par mail).

Pied de page des forums