试着在WIN10下把某文件夹下的所有EXE文件添加到防火墙禁网

gpxyz

1. @echo off
   
2. 
   
3. setlocal ENABLEDELAYEDEXPANSION
   
4. mode con: cols=65 lines=25
   
5. color 0a
   
6. rem 批处理获取管理员权限
   
7. :-------------------------------------  
   
8. %1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&&exit /b
   
9. CD /D "%~dp0"
   
10. :-------------------------------------  
    
11. 
    
12. 
    
13. :begin
    
14. 
    
15. rem 接收输入
    
16. 
    
17. set name=
    
18. set Fpath=
    
19. set /p name=Filmora9
    
20. set /p Fpath=C:\Program Files\Wondershare\Filmora9
    
21. 
    
22. rem 输出得到的输入信息
    
23. echo 您输入的防火墙策略名称是：%name%
    
24. echo 您输入的软件安装路径是：%Fpath%
    
25. 
    
26. 
    
27. echo "确认请按任意键否则请按Ctrl+C取消"
    
28. pause
    
29. 
    
30. setlocal enabledelayedexpansion
    
31. set /a n=0
    
32. for /r "%Fpath%" %%i in (*.exe) do (
    
33.     set /a n+=1
    
34.     echo "!n!_%name%","%%i"
    
35.     netsh advfirewall firewall del rule name="!n!_%name%">nul 2>nul
    
36.     netsh advfirewall firewall add rule name="!n!_%name%" program="%%i" action=block dir=out>null
    
37.     echo 阻止!n!_%name%程序出站规则已添加成功
    
38. )
    
39. 
    
40. rem pause>null
    
41. 
    
42. echo.
    
43. 
    
44. rem 从begin标签出，再次运行
    
45. goto begin

复制代码