+ Post New Thread
Page 9 of 11 FirstFirst ... 567891011 LastLast
Results 121 to 135 of 162
Network and Classroom Management Thread, Disabling internet in one room. in Technical; I am now using a combination of tools. At the forefront I use a piece of software which allows the ...
  1. #121

    Join Date
    Jul 2006
    Location
    Bucks, UK
    Posts
    120
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Disabling internet in one room.

    I am now using a combination of tools. At the forefront I use a piece of software which allows the teacher to "turn off" Internet Explorer per room or per PC very easily. Literally just a couple of mouse clicks. It also places a small window at the top of the screen saying who is logged in and what web page they last visited.

  2. #122

    mac_shinobi's Avatar
    Join Date
    Aug 2005
    Posts
    9,784
    Thank Post
    3,291
    Thanked 1,054 Times in 975 Posts
    Rep Power
    365

    Re: Disabling internet in one room.

    what pieces of software do you use to do this Espada ? If you can post back with each name of software along with the softwares website ( url )

    Thanks

  3. #123
    kestrel1's Avatar
    Join Date
    Jul 2005
    Location
    New Forest
    Posts
    294
    Thank Post
    3
    Thanked 11 Times in 11 Posts
    Rep Power
    20

    Re: Disabling internet in one room.

    What you really want for this is Netmanager from Precedence Technologies. They had added this function in the last six months & once it is set up it works with a couple of clicks. http://www.precedence.co.uk/

  4. #124

    Join Date
    Jul 2006
    Location
    Bucks, UK
    Posts
    120
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Disabling internet in one room.

    Quote Originally Posted by gecko
    what pieces of software do you use to do this Espada ? If you can post back with each name of software along with the softwares website ( url )

    Thanks
    It is bespoke, I coded it myself. The client code is here:

    Code:
    #cs ----------------------------------------------------------------------------
    
     AutoIt Version: 3.2.2.0
     Author:         Mark Wilson
    
     Script Function:
    Checks for whether IE is open when it shouldn't be and also displays the username at the top of the screen.
    
    #ce ----------------------------------------------------------------------------
    #Include <Constants.au3>
    #include <GUIConstants.au3>
    #include <File.au3>
    #include <IE.au3>
    #include <Array.au3>
    Opt("WinTitleMatchMode", 2)
    Opt("TrayMenuMode",1)
    Global $ProxyAbuse = False
    Dim $File[1]
    $Block = False
    TraySetIcon("green.ico")
    $IPTrim = 9
    $FileLocation = "S:\BlockIE\"
    $LogFileLocation = "U:\"
    $NewWindowTitle = ""
    $OldWindowTitle = ""
    $IP = @IPAddress1
    $PCNumber = StringRight(@ComputerName, 2)
    $LastOctet = StringTrimLeft($IP, $IPTrim)
    _DisplayUserName()
    Select
    	Case $LastOctet < 64
    		$room = "ICT1"
    	Case $LastOctet <128 & $LastOctet > 63
    		$room = "ICT2"
    EndSelect
    $InstructionFile = ($FileLocation & $room & ".txt")
    If FileExists ($LogFileLocation&"ProxyAbuse") Then _ProxyAbuseWindow()
    While 1
    	Sleep(250)
    	If WinExists("Internet Explorer") Then
    	_FileReadToArray($InstructionFile,$File)
    	While 1
    		If $ProxyAbuse = True Then 
    			_ProxyAbuseWindow()
    			ExitLoop
    		EndIf
    			If StringRight($File[$PCNumber],5) = "Block" Then
    				TraySetIcon("red.ico")
    				ProcessClose("IEXPLORE.EXE")
    			ElseIf $File[$PCNumber] = StringRight("EndIt", 5) Then
    				Exit
    			Else
    				$NewWindowTitle = WinGetTitle("")
    				If $NewWindowTitle <> $OldWindowTitle Then
    					$File = ($LogFileLocation&@Year&@MON&@MDAY&".log")
    					IF FileExists($File) = 0 Then
    						_FileCreate($File)
    						FileSetAttrib($File, "+H")
    					EndIf
    					$OldWindowTitle = $NewWindowTitle
    					$HWND = WinGetHandle($NewWindowTitle)
    					$oIE = _IEAttach ($HWND,"HWND")
    					$URL = _IEPropertyGet ($oIE, "locationurl")
    					WinSetTitle("User:","",("User: "&@UserName&" Last Page: "&$URL&" at "&@HOUR&":"&@MIN))
    					_FileWriteLog($File,',"'& @UserName & '","'& @ComputerName &'","'& $NewWindowTitle & '","' & $URL &'"')
    					;Check for proxy abuse
    					If StringRegExp($URL,"proxy") = 1 Then
    						_proxyAbuseDetected($URL)
    					EndIf
    				EndIf
    			EndIf
    			ExitLoop
    	WEnd
    	FileClose($File)
    	
    EndIf
    	_ResetUserNamePosition()
    WEnd
    
    Func _proxyAbuseDetected($URL)
    	$ProxyFile = ($LogFileLocation&"ProxyAbuse")
    	_FileCreate($ProxyFile)
    	FileSetAttrib($ProxyFile, "+H")
    	_FileWriteLog($ProxyFile, $URL)
    	_ProxyAbuseWindow()
    EndFunc
    
    Func _ProxyAbuseWindow()
    	TraySetState (4)
    	WinClose ("Internet Explorer")
    	MsgBox (0, "Possible Proxy Abuse", "Your Internet access has been restricted due to possible proxy abuse. Please speak to a network technician")
    	$ProxyAbuse = True
    EndFunc
    
    Func _DisplayUserName()
    	$UserNameWindow = GUICreate(("User: "&@UserName),400,20,437,0,$WS_VISIBLE, $WS_EX_TOOLWINDOW)
    	WinSetOnTop("User: ","",1)
    EndFunc
    
    Func _ResetUserNamePosition()
    	WinMove("User:","", 437, 0)
    EndFunc
    I will post the control code shortly, as I said this is bespoke so you will need to tweak it. At the moment the control is through a hidden folder on the shared area but could easily be done through the registry. This means even if they shut down and restart, it will continue to take effect.

  5. #125

    Join Date
    Jul 2006
    Location
    Bucks, UK
    Posts
    120
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Disabling internet in one room.

    Here is the control code this bit is very flaky but it does the job just. If you use it you will want to improve it.

    Code:
    #include <GUIConstants.au3>
    #include <GuiTreeView.au3>
    
    ;Opt("TrayMenuMode",1)
    ; Script Start - Add your code below here
    $SettingsLocation = "S:\BlockIE\"
    $SettingsFile = "Global.txt"
    $ReadSettings = FileOpen(($SettingsLocation & $SettingsFile), 0)
    $SettingsLineOne = FileReadLine($ReadSettings)
    $SettingsLineTwo = FileReadLine($ReadSettings)
    $NumberOfRooms = StringLeft($SettingsLineOne,2)
    $LastUpdated = 9999
    $LastUpdatedRoom = 9999
    $TotalComputers = 0
    $CurrenSelection = 9999
    Dim $RoomTreeItems [$NumberOfRooms]
    Dim $ComputersPerRoom [$NumberOfRooms]
    Dim $SaveRoom [$NumberOfRooms]
    $RoomNames = StringSplit($SettingsLineTwo,"|")
    $LeftCount = 2
    $RightCount = (($NumberOfRooms * 2) - 2)
    For $a = 1 to $NumberOfRooms
    	$ComputersPerRoom[$a-1] = StringTrimLeft(StringTrimRight($SettingsLineOne, $RightCount),$LeftCount)
    	$LeftCount = $LeftCount + 2
    	$RightCount = $RightCount - 2
    	;MsgBox (0, $a, $ComputersPerRoom[$a-1])
    Next
    Dim $ComputerTreeItems[150]
    ; Create GUI
    $MainGui = GUICreate("Control Internet Access", 400, 600)
    $Tree = GUICtrlCreateTreeView(10, 10, 190, 550)
    For $a = 1 To $NumberOfRooms
    	$RoomTreeItems[$a-1] = GUICtrlCreateTreeViewItem($RoomNames[$a], $Tree)
    	For $b = $TotalComputers to ($TotalComputers + $ComputersPerRoom[$a-1])-1
    		$ComputerTreeItems[$b] = GUICtrlCreateTreeViewItem($RoomNames[$a]& "-" &(($b-$TotalComputers)+1), $RoomTreeItems[$a-1])
    	Next
    	$TotalComputers = $TotalComputers + $ComputersPerRoom[$a-1]
    Next
    Dim $ComputerStatus [$TotalComputers]
    For $a = 0 to $TotalComputers - 1
    	$ComputerStatus[$a] = "Allow"
    Next
    $Group = GUICtrlCreateGroup ("Action", 210, 60, 140, 90)
    $BlockRadio = GUICtrlCreateRadio ("Block", 220, 75, 50, 20)
    $AllowRadio = GUICtrlCreateRadio ("Allow", 220, 95, 60, 20)
    $SetButton = GUICtrlCreateButton ("Set", 260, 115, 60)
    GUICtrlSetState ($SetButton, $GUI_Hide)
    $SetRoomButton = GUICtrlCreateButton ("Set Room", 260, 115, 60)
    GUICtrlSetState ($SetRoomButton, $GUI_Hide)
    GUICtrlCreateGroup ("",-99,-99,1,1)	
    $SaveButton = GUICtrlCreateButton("Save Changes", 255, 550, 90)
    GUICtrlSetState ($SaveButton, $GUI_DISABLE)
    $SaveLabel = GUICtrlCreateLabel ("Changes will not be applied until they are saved.", 210, 150,180, 40)
    GUICtrlSetState ($SaveLabel, $GUI_Hide)
    $SaveGroup = GUICtrlCreateGroup("Room to Save Changes to.", 210, 210, 180, ($NumberOfRooms+2) * 20)
    For $a = 0 To $NumberOfRooms-1
    	$SaveRoom[$a] = GUICtrlCreateRadio($RoomNames[$a+1], 220, (230 + ($a*20)))
    Next
    GUICtrlCreateGroup ("",-99,-99,1,1)
    
    GUISetState(@SW_SHOW, $MainGui)
    
    
    ; Event Handler
    While 1
    	$msg = GUIGetMsg()
    	Select
    		Case $msg = $GUI_EVENT_CLOSE
    			Exit
    		;Case $msg = $GUI_EVENT_MINIMIZE
    		;	GUISetState(@SW_HIDE, $MainGui)
    		Case $msg = $SetButton
    			;If $LastUpdated < 9999 Then
    				;MsgBox(0, "Clicked", $LastUpdated)
    				Select 
    					Case BitAnd(GUICtrlRead($AllowRadio),$GUI_CHECKED)
    						$ComputerStatus[$LastUpdated] = "Allow"
    					Case BitAnd(GUICtrlRead($BlockRadio),$GUI_CHECKED)
    						$ComputerStatus[$LastUpdated] = "Block"
    						;MsgBox(0, "Clicked", "Blocked")
    				EndSelect
    				GUICtrlSetState ($SaveButton, $GUI_ENABLE)
    				GUICtrlSetState ($SaveLabel, $GUI_Show)
    			;EndIf
    		
    		Case $msg = $SetRoomButton
    			$ComputerCount = 0
    			$LastUpdated = 9999
    			For $a = 0 to $NumberOfRooms
    				If $a = $LastUpdatedRoom Then
    					For $b = $ComputerCount To ($ComputersPerRoom[$a]+$ComputerCount-1)
    						Select 
    							Case BitAnd(GUICtrlRead($AllowRadio),$GUI_CHECKED)
    								$ComputerStatus[$b] = "Allow"
    							Case BitAnd(GUICtrlRead($BlockRadio),$GUI_CHECKED)
    								$ComputerStatus[$b] = "Block"
    								;MsgBox(0, "Clicked", "Blocked")
    						EndSelect	
    					Next
    					ExitLoop
    				Else
    					$ComputerCount = $ComputerCount + $ComputersPerRoom[$a]
    				EndIf
    			Next
    			GUICtrlSetState ($SaveButton, $GUI_ENABLE)
    			GUICtrlSetState ($SaveLabel, $GUI_Show)
    		
    		Case $msg = $SaveButton
    			GUICtrlSetState ($SaveButton, $GUI_DISABLE)
    			GUICtrlSetState ($SaveLabel, $GUI_Hide)
    			_SaveChanges()
    	EndSelect
    	For $c = 0 to $NumberOfRooms-1
    		If $msg = $RoomTreeItems[$c] Then
    			;ExitLoop
    			GUICtrlSetData($Group, (_GUICtrlTreeViewGetText($Tree, $RoomTreeItems[$c])& " Set Room"))
    			GUICtrlSetState ($SetButton, $GUI_Hide)
    			GUICtrlSetState ($SetRoomButton, $GUI_Show)
    			$LastUpdatedRoom = $c
    			GUICtrlSetState ($AllowRadio, $GUI_UNCHECKED)
    			GUICtrlSetState ($BlockRadio, $GUI_UNCHECKED)
    			;MsgBox(0, "Clicked", "You Clicked a room")
    		EndIf
    	Next
    	For $d = 0 To $TotalComputers - 1
    		If $msg = $ComputerTreeItems[$d] Then
    		;If _GUICtrlTreeViewGetState($Tree, $ComputerTreeItems[$d]) = 2 Then
    			If $LastUpdated <> $d Then
    				;MsgBox(0, "Clicked", GUICtrlGetHandle ( $ComputerTreeItems[$d] ))
    				GUICtrlSetData($Group, _GUICtrlTreeViewGetText($Tree, $ComputerTreeItems[$d]))
    				If $ComputerStatus[$d] = "Allow" Then
    					GUICtrlSetState ($AllowRadio, $GUI_CHECKED)
    				Else
    					GUICtrlSetState ($BlockRadio, $GUI_CHECKED)
    				EndIf
    				$LastUpdated = $d
    				GUICtrlSetState ($SetRoomButton, $GUI_Hide)
    				GUICtrlSetState ($SetButton, $GUI_Show)
    				
    			EndIf
    			ExitLoop
    		EndIf
    	Next
    WEnd
    
    Func _SaveChanges()
    	$StartPoint = 0
    	For $a = 0 to $NumberOfRooms-1
    		If BitAnd(GUICtrlRead($SaveRoom[$a]),$GUI_CHECKED) Then
    			$File = FileOpen(($SettingsLocation & $RoomNames[$a+1]&".txt"), 2)
    			For $b = 0 to ($ComputersPerRoom[$a]-1)
    				If $b < 9 Then
    					FileWriteLine ($File, ("0"&$b+1&":"&$ComputerStatus[$b+$StartPoint]))
    				Else
    					FileWriteLine ($File, ($b+1&":"&$ComputerStatus[$b+$StartPoint]))
    				EndIf
    			Next
    			FileClose($File)
    		EndIf
    		$StartPoint = $StartPoint + $ComputersPerRoom[$a]
    	Next
    EndFunc

  6. #126

    Join Date
    Jul 2006
    Location
    Bucks, UK
    Posts
    120
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Disabling internet in one room.

    There should be a global.txt file for the control software which tells it how many computers there are and what the rooms are called. It should take the following format:
    Code:
    0431322030
    ICT1|ICT2|ICT3|ICT4
    04 = Number of ICT rooms
    the remainder of the digits 31, 32, 20, 30 say how many machines are in each room.

    The second line is just the room names.

    I will try to support people with this but it is a very busy time at the moment with exams - remember I am primarily a teacher.

  7. #127
    cookie_monster's Avatar
    Join Date
    May 2007
    Location
    Derbyshire
    Posts
    4,203
    Thank Post
    394
    Thanked 278 Times in 239 Posts
    Rep Power
    74

    Re: Disabling internet in one room.

    I have a copy of a very small piece of software called Greenhouse it's freeware and was written by a tech at a local highschool ages ago, it was last updated for CC3 and works fine with our vanilla 2k3/XP setup (with a couple fiddles). The app is only about 80k it simply runs at logon and checks a text file for room numbers (all PC's need to be named according to room e.g. IT1_001) if the room is in the list it sets the proxy address if it's not then the proxy address is blanked. It works pretty well as long as you can prevent the students from being able to alter the proxy address.

    Unfortunatly it isn't hosted anywhere for download but at only 20kb i'm sure it could but hosted somewhere for viewing.

  8. #128

    Join Date
    Feb 2006
    Posts
    1,187
    Thank Post
    0
    Thanked 1 Time in 1 Post
    Rep Power
    0

    Re: Disabling internet in one room.

    @Cookie_Monster

    Hello Alistair.

    If it's that small then you can upload it on EduGeek as an attachement.

  9. #129
    kerrymoralee9280
    Guest

    Re: Disabling internet in one room.

    First you said it was 80k then 20k???

  10. #130
    projector1's Avatar
    Join Date
    Nov 2005
    Posts
    460
    Thank Post
    70
    Thanked 1 Time in 1 Post
    Rep Power
    18

    Re: Disabling internet in one room.

    Quote Originally Posted by Alex
    Quote Originally Posted by RobC
    Quote Originally Posted by Ric_
    This certainly is a popular subject and there isn't really an easy way of doing it (not for free).
    Not actually true. Check out LanView 3 from MST Software. It has its own Internet Access Manager built in which you can use to disable access to single computers, whole rooms or just certain users. You can also set an over-ride for certain systems or users so that staff can still access the Internet.

    And just to cap it all off, it's completely free!

    (And no, I don't get commision from them! :P )
    That looks interesting - taking a look now.
    this software is awsome it has so many benefits and it is free (donating helps keep it going)

  11. #131
    projector1's Avatar
    Join Date
    Nov 2005
    Posts
    460
    Thank Post
    70
    Thanked 1 Time in 1 Post
    Rep Power
    18

    Re: Disabling internet in one room.

    Quote Originally Posted by Adam
    Just a vague whisper of a thought of an idea...

    are you all on AD?

    If so, why not have a GPO for each ICT room, and when they want a rooms' internet access shut off for a lesson, just change the proxy to anything other than what is should be....

    e.g. trylookingatpornnow.youlittlechavscrotes.gov.uk



    obviously you'd need to know about this before the chav scrotes log on in order to apply to the proxy settings, but i know we've had more than a few instances of staff asking for a whole room to be denied access to the internet for one such lesson a week.... hmmm... there must be a more clever way...

    HTH

    Adam
    e.g. trylookingatpornnow.youlittlechavscrotes.gov.uk
    wicked! :hello1:

  12. #132
    cookie_monster's Avatar
    Join Date
    May 2007
    Location
    Derbyshire
    Posts
    4,203
    Thank Post
    394
    Thanked 278 Times in 239 Posts
    Rep Power
    74

    Re: Disabling internet in one room.

    It's 20k when zipped.

    One benefit of this is it doesn't require a client install it all runs from a network share, it's not as advanced as LANview but take no time to setup. GPO's are a bit to slow when a teacher rings and says we want the internet now in IT1 for example.

  13. #133

    Join Date
    May 2007
    Location
    Hull, UK
    Posts
    256
    Thank Post
    6
    Thanked 13 Times in 13 Posts
    Rep Power
    17

    Re: Disabling internet in one room.

    We use Talmos Classroom manager which ties in with ISA Server 2004. It works fantastic but has a few little niggles such as when restricitng to 1 particular site, if images come from another source such as images.bbc.co.uk you have to give permission to that as well.

    http://www.talmos.net/products-talmo...oom-filter.htm

    I think they have split the application out now into Classroom manager, which handles disabling accounts/changing password etc and Classroom Filter which does the internet part. Azzurri is a good company and the Techy boys (Neil and Simon) really know their stuff.

  14. #134

    Join Date
    May 2007
    Location
    Rushden, Northants
    Posts
    5
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Disabling internet in one room.

    To disable the internet in one room (or per workstation) you can write a basic VB script to change the IP of the proxy server/router. I've had this working for 12 months now and so far (touch wood) noones managed to get onto the internet without having it enabled.

  15. #135
    Andi's Avatar
    Join Date
    Feb 2007
    Location
    Newport, South Wales
    Posts
    276
    Thank Post
    52
    Thanked 4 Times in 4 Posts
    Rep Power
    16

    Re: Disabling internet in one room.

    I'm trying to force a batch of users that we have setup for exams to use a fake proxy via GPO so that their internet access is disabled, but they still have access to the intranet. However, they can still get out to the outside world with no issues at all, as if the policy never took place.

    We currently set a default gateway via DHCP, could it be related to that?

SHARE:
+ Post New Thread
Page 9 of 11 FirstFirst ... 567891011 LastLast

Similar Threads

  1. Replies: 4
    Last Post: 17th January 2011, 02:36 PM
  2. Disabling Internet on RM
    By rehanahmeds in forum Windows
    Replies: 5
    Last Post: 10th December 2009, 10:06 AM
  3. Can you update Internet mobile to Internet Explorer?
    By thegrassisgreener in forum Windows
    Replies: 1
    Last Post: 16th July 2007, 01:48 PM
  4. disabling Internet Access help!
    By Gardinho in forum Windows
    Replies: 3
    Last Post: 5th July 2007, 02:17 PM
  5. disabling spellcheck
    By Hecate in forum Educational Software
    Replies: 1
    Last Post: 21st May 2007, 02:32 PM

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •