Discussion :

[positrons]

Bonjour et merci de votre aide ,
Je suis pas terrible en vbs et je sollicite votre aide pour bloquer une application dans le pare-feu windows 7 en utilisant du vbs, j'ai cherché sur le net mais j'ai trouver que des scripte pour autoriser les application voici un exemplaire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Set objFirewall = CreateObject("HNetCfg.FwMgr")
Set objPolicy = objFirewall.LocalPolicy
Set objProfile = objPolicy.GetProfileByType(0) 'Domaine
 
Set objApplication = CreateObject("HNetCfg.FwAuthorizedApplication")
objApplication.Name = "TestExe"
objApplication.IPVersion = 2
objApplication.ProcessImageFileName = "C:\TestExe.exe"
objApplication.RemoteAddresses = "*"
objApplication.Scope = 0
objApplication.Enabled = True
 
Set colApplications = objProfile.AuthorizedApplications
colApplications.Add(objApplication)

Merci de votre aide

[hackoofr]

Ce programme C:\TestExe.exe fait quoi exactement ? et pourquoi vous voulez le bloquer ?

[hackoofr]

J'ai une autre idée dans la tête pour bloquer les applications mais ça nécessite un ajout d'une clé dans la base de registre
Si tu es intéressé fais moi signe

[positrons]

Bonjour, tout d'abord je tiens à te remercier pour l'intérêt que tu porte a mon problème,


Effectivement une solution par le regedit m'intéresse du moment que ça bloque l'accès internet de l'application,
Merci d'avance.

[hackoofr]

Effectivement une solution par le regedit m'intéresse du moment que ça bloque l'accès internet de l'application,
Merci d'avance.

L'application est un navigateur ou bien autre chose qui utilise internet ?
de bien préciser, car moi j'ai fait un exemple pour bloquer et débloquer l'exécution de la calculatrice, et ceci peut-être généralisé à d'autres applications

[hackoofr]

Voici le code pour bloquer et débloquer l'exécution de la calculatrice.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Option Explicit
Dim ws,Question,Titre
Titre = "Bloquer et Débloquer l'exécution de la calculatrice © Hackoo"
set ws = createobject("WScript.Shell")
Question = MsgBox("Voulez-vous bloquer l'exécution de la calculatrice ? " & Vbcr &_
"Si Oui Cliquer sur Oui !" & Vbcr &_
"Si Non Cliquer sur Non !",VbYesNo+VbQuestion,Titre)
If Question = VbYes then
    Call Bloquer()
    MsgBox "La calculatrice est désormais bloquée !",VbExclamation,Titre
Else
    Call Debloquer()
    ws.run "Calc.exe"
End if
'*************************************************************************************************************************************
'Pour bloquer l'exécution de la calculatrice
Sub Bloquer()
ws.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\calc.exe\Debugger","Block"
End Sub
'*************************************************************************************************************************************
'Pour débloquer l'exécution de la calculatrice
Sub Debloquer()
ws.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\calc.exe\Debugger",""
End Sub
'*************************************************************************************************************************************

[positrons]

Bonjour, Merci pour ton aide et désolé pour le retard,

Le script regedit bloque l'exécution du programme et je cherche a bloquer l'accès internet du programme pas son exécution ou au un script vbs qui peux le faire au nivaux du pare-feux

Merci

[hackoofr]

Bonjour, Merci pour ton aide et désolé pour le retard,

Le script regedit bloque l'exécution du programme et je cherche a bloquer l'accès internet du programme pas son exécution ou au un script vbs qui peux le faire au nivaux du pare-feux

Merci

C'est pour cette raison que je t'ai demandé de nous expliquer mieux les choses sur ce programme.exe , il fait quoi exactement, il se connecte à quelle adresse ip etc....
si tu connais l'adresse ip ou il tente d'établir, alors tu peux utiliser le fichier host pour le bloquer