有没有哪个大神帮忙写个在文件夹上右键，断网和恢复联网文件夹下所以exe文件的程序？

rzsggg

在文件夹上右键菜单，会出现选项“限制联网”，“恢复联网”，然后文件夹下的所有exe文件都不能联网。

fulibo

这是论坛里面人家发的批处理里面找到的！

1. @echo off
   
2. 
   
3. ::为.exe程序快捷添加防火墙规则
   
4. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules" /f /v "MUIVerb" /t REG_SZ /d "防火墙规则"
   
5. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules" /f /v "Icon" /t REG_SZ /d "FirewallControlPanel.dll,0"
   
6. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules" /f /v "SubCommands" /t REG_SZ /d ""
   
7. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item0" /f /v "MUIVerb" /t REG_SZ /d "禁止入站"
   
8. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item0" /f /v "Icon" /t REG_SZ /d "imageres.dll,-105"
   
9. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item0\Command" /f /ve /t REG_SZ /d "mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall add rule name = ""%%1"" dir = in program = ""%%1"" action = block","","runas",0)(close)"
   
10. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item1" /f /v "MUIVerb" /t REG_SZ /d "禁止出站"
    
11. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item1" /f /v "Icon" /t REG_SZ /d "imageres.dll,-105"
    
12. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item1\Command" /f /ve /t REG_SZ /d "mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall add rule name = ""%%1"" dir = out program = ""%%1"" action = block","","runas",0)(close)"
    
13. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item2" /f /v "MUIVerb" /t REG_SZ /d "允许入站"
    
14. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item2" /f /v "Icon" /t REG_SZ /d "imageres.dll,-106"
    
15. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item2\Command" /f /ve /t REG_SZ /d "mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall delete rule name = ""%%1"" dir = in program = ""%%1""","","runas",0)(close)"
    
16. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item3" /f /v "MUIVerb" /t REG_SZ /d "允许出站"
    
17. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item3" /f /v "Icon" /t REG_SZ /d "imageres.dll,-106"
    
18. reg add "HKCR\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item3\Command" /f /ve /t REG_SZ /d "mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall delete rule name = ""%%1"" dir = out program = ""%%1""","","runas",0)(close)"
    
19. reg add "HKCR\DesktopBackground\shell\Item0\shell\Item5" /f /v "MUIVerb" /t REG_SZ /d "防火墙规则"
    

复制代码

szwp

所以？

wjqok

搞个网卡停用/恢复的快捷操作也可以吧？

rzsggg

谢谢fulibo大佬

yc2428

fulibo 发表于 2023-9-26 10:56
这是论坛里面人家发的批处理里面找到的！

谢谢

nathan6498

学习学习了

awan8850

了解学习一下

9chengwo

有个防火墙软件可以实现同样的功能，免费小巧，防火墙-Firewall App Blocker
可以选择文件夹，里面的所有EXE文件都会添加到防火墙规则里

kala2018

进来学习一下，谢谢大佬

softwarezheng

学习了，谢谢

9chengwo

fulibo 发表于 2023-9-26 10:56
这是论坛里面人家发的批处理里面找到的！

我用了你这个批处理后，显示乱码，在文件夹的右键菜单不会显示，只在EXE文件右键菜单才会显示

fulibo

9chengwo 发表于 2023-9-30 13:42
我用了你这个批处理后，显示乱码，在文件夹的右键菜单不会显示，只在EXE文件右键菜单才会显示

ANSI格式!

9chengwo

fulibo 发表于 2023-9-30 14:24
ANSI格式!

我改了格式，现在不会乱码了，但是我把某个EXE文件用这个禁止入站和禁止出站，
为啥在防火墙规则设置里面看不到新建的规则呢？似乎这些命令没有起作用啊

我系统是Win11

huqiu2

fulibo 发表于 2023-9-26 10:56
这是论坛里面人家发的批处理里面找到的！

只能在exe上面生效，跟楼主要求不符

无犹启动

学习学习了

coxlxd

这功能也能实现？

rzsggg

下了个simplefire防火墙，真好用。主要是有些软件太顽固，会把系统自带防火墙禁用后联网，然后会做一些手脚。这个批处理留着备用了。

szwp

还是所以exe

Ukyo

用批处理来启用网络看来是最方便的

j4tan

谢谢大佬分享

qq8899399

9chengwo 发表于 2023-10-1 09:15
我改了格式，现在不会乱码了，但是我把某个EXE文件用这个禁止入站和禁止出站，
为啥在防火墙规则设置里 ...

代码问题

你用我的注册表吧


#右键 添加 为.exe程序 添加/删除防火墙规则

1. Windows Registry Editor Version 5.00
   
2. 
   
3. #右键 添加 为.exe程序 添加/删除防火墙规则
   
4. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules]
   
5. "MUIVerb"="防火墙规则 添加/删除"
   
6. "Icon"="FirewallControlPanel.dll,0"
   
7. "SubCommands"=""
   
8. 
   
9. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell]
   
10. 
    
11. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item1]
    
12. "MUIVerb"="为此程序添加禁止入站规则"
    
13. "Icon"="imageres.dll,-105"
    
14. 
    
15. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item1\command]
    
16. @="mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall add rule name = ""%1"" dir = in program = ""%1"" action = block","","runas",0)(close)"
    
17. 
    
18. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item2]
    
19. "MUIVerb"="为此程序删除禁止入站规则"
    
20. "Icon"="imageres.dll,-106"
    
21. 
    
22. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item2\command]
    
23. @="mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall delete rule name = ""%1"" dir = in program = ""%1""","","runas",0)(close)"
    
24. 
    
25. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item3]
    
26. "MUIVerb"="为此程序添加禁止出站规则"
    
27. "Icon"="imageres.dll,-105"
    
28. "CommandFlags"=dword:00000020
    
29. 
    
30. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item3\command]
    
31. @="mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall add rule name = ""%1"" dir = out program = ""%1"" action = block","","runas",0)(close)"
    
32. 
    
33. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item4]
    
34. "MUIVerb"="为此程序删除禁止出站规则"
    
35. "Icon"="imageres.dll,-106"
    
36. 
    
37. [HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules\Shell\Item4\command]
    
38. @="mshta vbscript:createobject("shell.application").shellexecute("netsh.exe","advfirewall firewall delete rule name = ""%1"" dir = out program = ""%1""","","runas",0)(close)"
    
39. 
    

复制代码

#右键 删除 为.exe程序 添加/删除防火墙规则

1. Windows Registry Editor Version 5.00
   
2. 
   
3. #右键 删除 为.exe程序 添加/删除防火墙规则
   
4. 
   
5. [-HKEY_CLASSES_ROOT\SystemFileAssociations\.exe\shell\FirewallRules]

复制代码