Contrôler le firewall XP d'un seul clic

Chacun des deux vbs est composé de trois lignes. Les scripts fonctionnent uniquement avec Windows XP SP2. Nous allons commencer par créer le script permettant la désactivation du firewall.

Ouvrez votre éditeur de texte favori (le Bloc-notes fera parfaitement l'affaire : menu Démarrer, Exécuter... et tapez notepad).

Copiez ensuite les lignes suivantes :

Set objFirewall = CreateObject("HNetCfg.FwMgr")
Set objPolicy = objFirewall.LocalPolicy.CurrentProfile

objPolicy.FirewallEnabled = FALSE

Sauvegardez le fichier du nom de votre choix avec l'extension .vbs (Firewall_OFF.vbs par exemple).


Passons maintenant au script permettant l'activation du firewall :

Copiez les lignes suivantes dans votre éditeur de texte :

Set objFirewall = CreateObject("HNetCfg.FwMgr")
Set objPolicy = objFirewall.LocalPolicy.CurrentProfile

objPolicy.FirewallEnabled = TRUE

Sauvegardez le fichier du nom de votre choix avec l'extension .vbs (Firewall_ON.vbs par exemple).


Vous pouvez placer ces deux fichiers où bon vous semble, le plus pratique étant de les déposer sur le bureau afin de pouvoir y accéder simplement.

Les deux scripts sont également à votre disposition ci-dessous :

Activer le firewall	Désactiver le firewall

Merci à William Gramond