*********************************************************************************
* ISA ON/OFF INTERNET : Modificateur de TAL de serveur ISA                      *
*-------------------------------------------------------------------------------*
* Eric Machabert / 2003                                                         *
* Pour Edouard Gregorek, Nouma                                                 *
*********************************************************************************
Version non indexe, version 1. SUPPORT RESEAU.

Contenu livr :

Serveur.rar :
 - ISAONOFF.exe
 - serveur.txt
 - salles.txt
 - restart.bat
 - addlat.vbs
 - dellat.vbs

client.rar
 - Form1.frm
 - Form1.frx
 - ISAREMOTECLIENT.exe
 - Projet1.vbp
 - Projet1.vbw
 - splash.frm
 - splash.frx

Description:

SERVEUR :

****************
* ISAONOFF.EXE *
****************
	Executable principal de l application, necessite les runtime VB6 (VB6fr.dll).
Fonctionnement : choisir une salle et clicker sur ON ou OFF. L'application doit etre
execute sur le serveur ISA. Elle ne doit pas se trouver dans un repertoire contenant
un espace dans son nom.

***************
* serveur.txt *
***************
	Ce fichier texte doit contenir le nom du serveur ISA ou le nom de la grappe de
serveus ISA concerns.

**************
* salles.txt *
**************
	Ce fichier texte doit contenir les plages et noms correspondant aux rseaux IP
de chaque salle.
Syntaxe :
		<nomsalle>,"IPDEBUT","IPFIN"
ATTENTION : respecter la syntaxe, suivre l'exemple donn....

***************
* restart.bat *
***************
	Ce fichier batch execute un redemarrage du service Pare-feu Microsoft, si le redemarrage
n'est pas obligatoire alors placer des "rem".

**************
* addlat.vbs *
**************
	Fichier Visual Basic script, recevant des parametres de l application et ajoutant
les plages dans la TAL.

**************
* dellat.vbs *
**************
	Fichier Visual Basic script, recevant des parametres de l application et supprimant
la plage de la TAL en ayant auparavant retrouver son indice de classement.


CLIENT :

******************
* SOURCES VB 6.0 *
******************
	Ce sont les sources du client pour pouvoir le modifier en fonction de l IP du serveur
ISA et du nom des salles.
Pour mettre en oeuvre le Client :

	Ouvir le projet avec VB6
	Modifier l'IP de la connexion du composant winsock

		Private Sub cmd_off_Click()
		'INTERNET OFF
		On Error Resume Next
		sock.Close
		sock.Connect "192.168.0.100", "15500" <==== Remplacer l'IP
		Timer2.Enabled = True
		cmd_off.Enabled = False
		End Sub

		Private Sub cmd_on_Click()
		On Error Resume Next
		sock.Close
		sock.Connect "192.168.0.100", "15500" <==== Remplacer l'IP
		Timer1.Enabled = True
		cmd_on.Enabled = False
		End Sub

	Modifier la liste des salles, c'est  dire mettre les mmes salles que dans salles.txt du serveur.
		
		Private Sub Form_Load() <=== au chargement de la feuille
		List1.AddItem "salle240"
		List1.AddItem "salle241"
		List1.AddItem "salle245"
		End Sub

	Compiler l'executable.

Contact :
eric.machabert@free.fr

