FORUM ENTRAIDE - FORUM DE SUPPORT

Freemaster

Responsable

Lieu : lamem

Inscription : 2006-08-16

Messages : 996

Site Web

scripts pour arreter ou démarrer le firewall windows

alors pour arrêter le firewall via un script :

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).

et pour la réactivation du firewall :

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