Page 1 sur 1
Méthode simple pour activer/désactiver le pare feu Windows
Publié : jeu. 10/avr./2008 15:17
par Mytic
Bonjour,
Voici une petite méthode pour activer ou désactiver le pare feu windows.
Tester sur Windows XP sp2 et Vista ! ( OK )
Sinon , pour vista , il faut compiler le programme avec « Request Administrator mode for Windows Vista »
Code : Tout sélectionner
Procedure Parefeu(mode.c)
fich$ = GetHomeDirectory() + "acfeu.bat"
If mode = 0
etat$ = "netsh firewall set opmode disable"
Else
etat$ = "netsh firewall set opmode enable"
EndIf
CreateFile(0,fich$)
WriteStringN(0,etat$)
CloseFile(0)
Delay(20)
RunProgram(fich$,"","",#PB_Program_Hide | #PB_Program_Wait)
Delay(30)
DeleteFile(fich$)
EndProcedure
;------------( 0 = désactivé | 1 = activé ) -----------
Parefeu(0)
Publié : jeu. 10/avr./2008 18:18
par Ar-S
pourquoi ne pas utiliser runprogram avec la commande CMD et comme parametre tes valeurs "etat$" ? ça éviterai de créer le .bat non ?
En tout cas l'idée est bonne
Publié : jeu. 10/avr./2008 22:22
par Mytic
Merci du conseil, je voulais le faire, mais ça ne marchait pas car il fallait ajouté le "?/c" :
Code : Tout sélectionner
Procedure Parefeu(mode.c)
fich$ = "cmd.exe"
If mode = 0
etat$ = "netsh firewall set opmode disable"
Else
etat$ = "netsh firewall set opmode enable"
EndIf
RunProgram(fich$,"?/c" + etat$,"",#PB_Program_Hide | #PB_Program_Wait)
EndProcedure
;------------( 0 = désactivé | 1 = activé ) -----------
Parefeu(0)
Publié : ven. 11/avr./2008 10:40
par Ar-S
J'ai eu le même soucis "?/c" il y a qques temps
Publié : ven. 11/avr./2008 10:41
par Backup
c'est quand meme dingue de pouvoir desactiver un pare feu logiciellement
pour ma part j'utilise Kerio personal Firewall , et je doute qu'on puisse en faire autant !!
Publié : ven. 11/avr./2008 11:16
par Ar-S
Dobro a écrit :c'est quand meme dingue de pouvoir desactiver un pare feu logiciellement
pour ma part j'utilise Kerio personal Firewall , et je doute qu'on puisse en faire autant !!
J'espère car c'est celui que j'utilise aussi
Publié : ven. 11/avr./2008 13:18
par Mytic
La dernière newsletter de l'éditeur de solution de sécurité Kerio révèle une bien mauvaise surprise. On apprend effectivement que le développement de Sunbelt Personal FireWall (ex Kerio)l, le célèbre pare-feu gratuit pour Windows, devrait être stoppé le 31 décembre prochain. Le logiciel ne sera visiblement plus développé, ni distribué par Kerio. L'éditeur précise toutefois que les utilisateurs seront toujours libres d'utiliser les versions existantes du « défunt » logiciel. Le support technique devrait être assuré jusqu'à la fin 2006.
Kerio prévoit également d'arrêter sa solution Kerio ServerFirewall le 30 septembre prochain. Le support de ce logiciel sera assuré jusqu'au 30 septembre 2006, tandis que d'éventuelles mises à jour pourraient être proposées jusqu'à la fin du mois.
Pour ma part j’utilise le pare feu de Kaspersky internet security !
Il ne laisse rien passer combiné à la pro active défense.
(Il bloque aussi cette commande même si elle ne lui cause aucun problème)