Bloquer le WIFI a certaines heures

Pourquoi ne pas simplement lui interdire ??? Elle est ou l'éducation et les respect parental ? (oui j'ai aussi des enfants et je n'ai pas de problème :-) et je trouve ça plus simple)

C'est fou!
Je pense comme Killerjo, on fait ce que l'on peut! Si la communication avait marché et avait été suffisante, croyez vous vraiment qu'il aurait demandé de l'aide!?! Au moins il a le mérite d'essayer de trouver une solution et non pas d'abandonner en ne faisant RIEN comme beaucoup trop de parents. Pour parlez comme vous le faites c'est que vous ne devez pas vivre le problème!! C'est sûr que pour la ramener: c'est facile!
Alors les donneurs de leçon à 2 balles: c'est bon, on vous a assez lus! Abstenez vous si c'est pour donner ce genre de retours!!! Perdez pas votre temps à répondre ce genre d'ânerie. On ne perdrait pas le notre temps à les lire!

Solution Killer:
Si il a une carte réseau interne, c'est qu'il pourra toujours détecter ton Wifi. Donc il faut acheter une clef WLAN (pas trop chère). Sur ta livebox tu configures la détection de ton réseau en activant l'option:"Sécurité WPA seulement": il sera donc obligé de connaitre ce code. Sur le PC de ton fils tu veilles à ce que la clef WAP ne soit pas pré enregistrée (tu n'as qu'à te connecter et voir si la détection est automatique ou pas). Si il l'a connait, alors il faut la changer (je ne sais pas moi, change ta LB ou demande à ton fournisseur d'accès je ne sais pas si c'est possible). Tu veilles à bien effacer la clef Wap de dessous la liveBox. Tu configures sur son PC la clef WLAN: dès qu'il la branchera, il détectera le réseau et en la débranchant il le perdra.
C'est tiré par les cheveux certes mais chez moi: ça marche...
Bonne chance.

Tag : Interdire les connexions Internet en fonction des heures.
Forbid Internet Connexion by hours.

Bonjour

Comment ne pas simplement lui interdire !!!!!. Vous avez peut-être des enfants parfaits qui ne désobéissent pas comme vous avez du le faire quand vous étiez jeune.
Il faut arrêter de se voiler la face... Ma fille a un ordinateur dans sa chambre (oui, je peux aussi l'enlever tous les soirs à 22 heures). Sauf que l'ordi elle peut en avoir besoin pour travailler, pour faire des rapports etc... Mais je ne suis pas débile. Si je laisser Internet, il y a des soirs de grandes discussions pour des raisons x ou y sur Facebook ou Msn jusqu'à très tard et le lendemain matin elle est fatiguée.

Donc MadMyke, tu te fais un paquet d'illusions (tes enfants doivent appréciés) ou alors tu interdis tout et ce n'est pas non plus la bonne solution.

Donc effectivement, j'en ai cherché une, je n'en ai pas trouvé sur Google ou autre ou paramétrage de la box. Car je répète, je ne veux pas interdire l'ordi, je veux interdire Internet à partir d'une certaine heure et si possible à des heures différentes suivant les jours. Donc ne trouvant rien, j'ai fait (programmé) quelque chose de simple qui peut servir à d'autres parents.

Le principe : Sur une box, Internet est permis car le pc obtient une adresse réseau de la part de la box via DHCP. (pour les fixes, il faudrait modifier le script). Sur Vista et Windows 7, il est possible de désactiver la carte réseau via API mais par sur XP. On peut aussi utiliser devcon.exe mais dans ce cas, il faut alors repérer au préalable l'ID de la carte ce qui n'est pas simple pour quelqu'un de non informaticien. Donc pour réussir celà sur Xp, Vista, Seven, il suffit simplement d'affecter une adresse IP et une gateway fixe dans le réseau 10 si l'heure est dépassé par exemple qui ne sera pas un réseau de box et de remettre le dhcp si l'heure est ok. Sans gateway ni ip coorecte : pas de liaisons Internet.

Comment le faire : on vas tout simplement créer un service qui va vérifier l'heure toutes les 2 minutes ou plus et qui va ou non désactiver ou réactiver le dchp.

1) les pré-requis: Il faut que votre enfant ne soit pas administrateur du poste : Panneau de configuration (ou Poste de travail, CLick Droit gérer sur XP). Utilisateurs. Cliquez sur le nom de connexion de l'enfant. Modifier Groupe : mettez le dans Utilisateurs et enlevez le de Administrateur. Mettez un mot de passe sur votre login a vous et sur celui de votre épouse. Pourquoi : En tant qu'utilisateur, il ne peut plus changer l'heure ni arrêter les services.

2) Télécharger le ressource kit Windows 2003 sur
http://www.microsoft.com/...
3)
Installer rktools.exe. On suppose l'installation dans C:\Program Files\Resource Kit
4) Ouvrir une boite DOS (Démarrer, Exécuter ou Rechercher, cmd)
4) Tapez :
C:\Program Files\Resource Kit\Instsrv.exe Wifi_Control C:\Program Files\Resource Kit\Srvany.exe
5)
Tapez :
md c:\windows\system32\Wifi_Control (ou ouvre l'explorateur Windows aller dans C:\windows\System32 et créer le répertoire Wifi_Control)
6)
Tapez dans la boite dos :
notepad (le bloc-notes)
Copier et Coller les lignes suivantes dans notepad

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Wifi_Control\Parameters]
"Application"="c:\\windows\\system32\\wscript.exe /B /NOLOGO c:\\windows\\system32\\wifi_control\\wifi_control.vbs"

Faire enregistrer sous , Sélectionner Tous les fichiers (*.*) et donner comme nom : C:\windows\system32\Wifi_Control\WFC.reg
fermer notepad

7) Naviguer Dans l'explorateur dans le répertoire C:\windows\system32\Wifi_Control

et Cliquer sur WFC.reg (répondez OUi à la question)



Je continue dans le post suivant

Les enfants ils sont pas débilles quand mem il save arreter un processus...

8) Ouvrir à nouveau Notepad Copier et Coller les lignes suivantes

Modifier les heures et minutes dans Const HourList et Const MinuteList

' DEBUT Copier à partir d'ici
'
'
' une ligne commençant par ' est un commentaire
' plebras pour commentcamarche.net
' version 1.1
'
' le service (Internet accepté) est redémarré à 7h du matin cf + base
'
' Heures de fin pour chaque jour de la semaine en commençant le lundi (EN France, autre pays, la semaine peut commencer un dimanche'
'ex ici : le le lundi Internet est coupé à 22h30 le dimanche à 22h00 et 23h le Vendredi et le Samedi
'
'
' Lundi, Mardi, Mercredi, Jeudi, Vendredi,Samedi, Dimanche
Const HourList="22,22,22,22,23,23,22"
Const MinuteList="30,30,30,30,00,00,00"
'
' Mettre '%wire%' si vous êtes en Anglais
' Mettre "%local% ' si vous relié à la box par cable
'
Const Tag="%fil%" ' "%fil%" ou "%wire%" ou "%local%"
'
Const StrComputer="."
'
Public Isdebug,caption, objNetworkAdapter,OFS, WriteStuff
Dim NbErr
NbErr=0
' si true : affichage à l'écran si on lance manuellement le script (pas via le service)
Isdebug=false
'

Set oFs = CreateObject("Scripting.FileSystemObject")
Filename="C:\windows\system32\wifi_control\Wifi_Control.log"
If Ofs.fileExists(Filename) Then ofs.DeleteFile(Filename)

Set WriteStuff = ofs.OpenTextFile(filename, 8, True)
Ptn " Starting"
wscript.sleep (15000) 'wait 15 secondes au démarrage pour que le service réseau et les drivers de la carte et le wifi aient le temps d'être opérationnel
Ptn "Wait Finish"
Dim FirstStep
FirstStep=True

Dim HourFin,MinuteFin, StopInternet
HourFin=split(Hourlist,",")
Minutefin=split(MinuteList,",")
StopInternet=True
'
' si on trouve pas de carte en %fil% %wire% %local% en fonction du parametre du haut on sort
'
If getConnexion=False Then
ptn "No Active network card Found"
ptn "Action Start"
If Action ("Start") =False Then
Call CloseFic
wscript.quit
End If
End If

ptn objNetworkAdapter.caption
' Boucle principale
While True
DateAct = Now

jour = CInt(DatePart("d", DateAct))
JourAct = CInt(DatePart("w", DateAct, 0))
HourAct= CInt(DatePart("h", DateAct))
MinuteAct= CInt(DatePart("n", DateAct))
ptn "Day="&JourAct&" Time=" &HourAct&"h "&MinuteAct
ptn "Time Stop ="&HourFin(JourAct-1)&"h "&MinuteFin(JourAct-1)

If HourAct>=CInt(HourFin(JourAct-1)) And MinuteAct>=CInt(MinuteFin(JourAct-1)) Or HourAct < 7 Then
ptn "Action Stop"
If StopInternet=False Or FirstStep=True Then
If Action ("Stop") =False Then
' en fait même si il y a des erreurs on ne sort pas
NbErr=NbERR+1
Ptn "ERRORS = " & cstr(Nberr)
else
StopInternet=True
FirstStep=False
End if
End If

Else
If StopInternet=True Then
ptn "Action Start"
If Action ("Start") =False Then
NbErr=NbERR+1
Ptn "ERRORS = " & cstr(Nberr)

else
StopInternet=False
FirstStep=False
End if
End If

End If
wscript.sleep (120000)
Wend
Call CloseFic
wscript.quit

Sub ptn (Message)
If Isdebug=True Then

wscript.echo Message
End If
WriteStuff.WriteLine(Message)
End Sub

Sub CloseFic
writeStuff.close
Set WriteStuff=Nothing
Set Ofs=Nothing
End Sub
Function getConnexion()
caption=""
getConnexion=False
ptn "----------------------------"
ptn "Testing ConnectionID : "&Tag
ptn "----------------------------"
ptn "Open WMI"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

SQL="Select * From Win32_NetworkAdapter where NetConnectionID like '"&Tag&"'"
ptn "SQL= "&SQL
ptn "Executing query"

Set colItems1 = objWMIService.ExecQuery (SQL)
On Error Resume Next
For Each objItem1 in colItems1
If objItem1.MACAddress <> "" Then
strMACAddress = objItem1.MACAddress
If strMACaddress <> "" Then
ptn " Find MacAddress = "& strMACaddress
ptn " Getting NetworkAdapter Configuration"
Set colItems2 = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration")
For Each objItem2 in colItems2
If Trim(objItem2.MACAddress)= Trim(strMACAddress) Then
For Each sIPAddress in objItem2.IPAddress
strIpaddress=Trim(sIpAddress)
If strIpaddress <> "" And Left(strIpAddress,1) <> "0" Then
ptn "Found a valid Ip Address = "&strIpaddress&""
ptn "Id = "&objItem1.NetConnectionID&""
caption=objItem1.Caption
ptn "Caption = " & caption
Set objNetwOrkAdapter=objitem2
Exit For

End If
Next
End If
If caption<>"" Then Exit For
Next
End if
end If
If caption <> "" Then Exit For
Next
Set colItems1=Nothing
Set colItem2=Nothing
ptn "fin"

If caption<>"" Then
getConnexion=True
End If
End Function

Function Action (mode)
Dim retour
retour=True
If IsObject(objNetworkAdapter) Then
ptn objNetworkAdapter.Caption
ptn objNetworkAdapter.DHCPenabled
ptn join(objNetworkAdapter.IpAddress)
If LCase(mode)="stop" Then
intReturn = objNetworkAdapter.ReleaseDHCPLease()
strIPAddress = Array("10.0.0.1")
strSubnetMask = Array("255.255.255.0")
strGateway = Array("10.0.0.100")
strGatewayMetric = Array(1)
intReturn = objNetworkAdapter.EnableStatic( strIPAddress, strSubnetMask)
Select Case intReturn
Case 0
ptn "Static mode enable"
Case 1
ptn "You must reboot before Static mode will be Enable"
Case Else
ptn "Error occurred"
retour=False
End Select
intReturn = objNetworkAdapter.SetGateways(strGateway, strGatewaymetric)
Select Case intReturn
Case 0
ptn "Gateways writed"
Case 1
ptn "You must reboot before Gateways will be Enable"
Case Else
ptn "Error occurred"
retour=False
End Select
Else
intReturn = objNetworkAdapter.EnableDHCP
Select Case intReturn
Case 0
ptn "DHCP Enable"
Case 1
ptn "You must reboot before DHCP will be Enable"
Case Else
ptn "Error occurred"
End Select
intReturn = objNetworkAdapter.RenewDHCPLease
Select Case intReturn
Case 0
ptn "DHCP Renew"
Case 1
ptn "You must reboot before DHCP will be Renew"
Case Else
ptn "Error occurred"
retour=False
End Select
End If
Else
ptn "not network Adapter Object"
retour=False
End If
Action=retour
End Function
'
'FIN DE COPIE

9) Faire ENregister sous, Sélectionner Tous Les fichiers (*.*) et sauvegarder le fichier sous le Nom
C:\windows\System32\Wifi_Control\Wifi_Control.vbs
Attention Fichier Wifi_COntrol.vbs dans le répertoire C:\windows\System32\Wifi_control créer précédemment.

10) Test éventuel
Ouvrir une boite dos
Cd C:\windows\system32\Wifi_Control
Tapez cscript Wifi_control.vbs
Attendre 2 minutes : Faire ControlC pour Arrêter et visualiser les logs dans Wifi_control.log dans le m^me répertoire


11) Mise ne place Redémarrer le PC ou Outils D'administration, Services, Wifi_Control : Démarrer le service

Pour les liaisons Pas Wifi voir au début du script

A+

Salut,

La communication serai un bon début...

Sinon, il y as les logiciels de contrôle parental avec programmation des plages d'utilisations du PC...

Cordialement,
Weet

slt...tt simplement tu va dans le config de ton modem wifi et tu change le chiffrement dans network authentication
par exemple tu le mets en wpa-psk... bonne chance

Bonjour,

Serait-il possible de connaître le nom du programme?
Cela me rendrait un service important et urgent ... J'en connais trop peu en informatique, actuellement, pour prétendre découvrir ce programme rapidement.
Je vous remercie.

.'. Pol

Bonjour,

Le logiciel Pstool permet d'exécuter des commandes à distances sur le PC de ton enfant.
Tu pourras ainsi faire un "shutdown" de son PC à distance lorsqu'il devra se coucher. Tu pourras même configurer l'extinction du PC dans 5 minutes afin qu'ils puissent quand même enregistrer ces fichiers en cours de modification.

Cdlt,

Et oui..la communication, meilleur solution :) (bien que..)
Par contre pour la gestion du PC il faudrait l'installer sur SON ordi ( donc s'il se débrouille bien il devrait pouvoir trouver la faille :s )

Merci les gars, vous etes bien gentils, mais quand vous avez un ado de 16 ans, qui a travaillé tout l'été pour se payé son PC, qui peut enfin le mettre dans sa chambre, eh bien il n'est pas si facile que ça de le surveiller. Ma femme est toute la semaine toute seule avec lui et ses 2 sœurs de 7 et 1ans 1/2, (je suis en déplacement toute la semaine), elle a surement autre chose a faire que de voir si son fils a bien arrêté le pc a 21h, et qu'il s'est couché !!! Bref, vous avez répondu a ma question, il n'existe rien. Merci

Sans couper la box on peut juste débrancher la carte wifi ^^ mais s'il utilise un pc de bureau je vois pas à quoi ça sert.
Le problème est que la freebox ne permet pas des options de configuration avancée donc pas de paramètres dans ce genre. Il faudrait acheter un équipement supplémentaire juste pour gérer ce problème.