开发者社区> 阿笨net> 正文
阿里云
为了无法计算的价值
打开APP
阿里云APP内打开

C#(VB.NET)操作Windows自带的防火墙 之 启用(开启)/禁用(关闭)防火墙

简介: 转载:http://www.cnblogs.com/sjcatsoft/archive/2009/01/15/1376489.html 在上一篇 C#(VB.NET)操作Windows自带的防火墙 之 综述篇 里,我们提到了下面这幅图 本篇,我们就实现 启用/关闭 和 是否允许例外 的功...
+关注继续查看

转载:http://www.cnblogs.com/sjcatsoft/archive/2009/01/15/1376489.html

在上一篇 C#(VB.NET)操作Windows自带的防火墙 之 综述篇 里,我们提到了下面这幅图

本篇,我们就实现 启用/关闭是否允许例外 的功能


先说明一点,因为windows自带了“安全中心” Security Center 这个功能,用程序关闭防火墙时,“安全中心” 会弹出提示,如图:

要解决这个问题,其实很简单,就是 将 Security Center 关闭,关闭的方法: 利用 net stop 或者修改注册表 或者.NET 里面自带的windows service操作,都可以,我就不啰嗦了

核心代码:

C# 方式:

  /// <summary>
  /// 获取防火墙管理的当前策略
  /// </summary>
  /// <returns>返回策略对应的 object</returns>
  private static object FirewallCurrentProfile()
  {
      //获取管理防火墙的COM组件的type
      Type fwMgrType = Type.GetTypeFromProgID("HNetCfg.FwMgr", true);
      //创建一个COM组件的实例
      object fwMgr = Activator.CreateInstance(fwMgrType);
      //获取实例的LocalPolicy属性
      object localPolicy = fwMgrType.InvokeMember("LocalPolicy", BindingFlags.GetProperty, null, fwMgr, null);
      //获取 LocalPolicy属性的子属性CurrentProfile
      return localPolicy.GetType().InvokeMember("CurrentProfile", BindingFlags.GetProperty, null, localPolicy, null);
  }

 

VB.NET 方式:

    Private Function FirewallProfile() As Object
        Dim FWMgr As Object = CreateObject("HNetCfg.FwMgr")
        Return FWMgr.LocalPolicy.CurrentProfil
    End Function

源码下载:http://www.boxcn.net/shared/quaa9b3dle

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

相关文章
Windows下禁止软件wps热点自启动和后台运行
Windows下禁止软件wps热点自启动和后台运行
122 0
Hyper-v虚拟机安装Windows 11失败问题处理(一)
Hyper-v虚拟机安装Windows 11失败问题处理
540 0
SAP WebClient UI删除搜索条件的后台处理,以及max hit的处理逻辑
SAP WebClient UI删除搜索条件的后台处理,以及max hit的处理逻辑
27 0
不一样的机器人 “飞龙”双旋翼空中自由变形
据外媒报道,日本东京小组展示了一“飞龙”机器人,是一个“具有多自由度空中变形能力的双旋翼嵌入式多连接机器人”。
1067 0
Web防火墙应用场景:短信接口防刷
很多站长发现网站服务器变卡,短信注册接口费用大量增长,甚至注册用户被竞争对手精确营销,客户流失。 这是什么情况? 且听我们慢慢道来:
10997 0
Windows+Git+TortoiseGit+COPSSH安装图文教程【转】
转自:http://blog.csdn.net/aaron_luchen/article/details/10498181/ Windows+Git+TortoiseGit+COPSSH 安装图文教程   准备工作: 1、 Git-1.
963 0
windows开启防火墙后IIS下的网站外网无法访问
问题:      windows开启防火墙后IIS下的网站外网无法访问 解决方法: 控制面板 - Windows 防火墙 - 例外 - 添加端口: 名称任意,端口为 80 ,协议为 TCP ,点 更改范围 可修改 80 端口对哪些计算机开放,确定即可。
1077 0
windows 2008上启用防火墙后sqlserver 2005经常出现连接超时的解决办法
昨日将sqlserver2005从windows2003迁移到windows2008系统上后,发现经常打开网页时提示sql server连接超时,但是有时候又是正常的,一开始一直以为是网络连接不好,后来发现超时时,远程连接完全正常,所以排除了这一因素,查看防火墙,发现1433端口tcp,udp也是允...
785 0
+关注
842
文章
0
问答
文章排行榜
最热
最新
相关电子书
更多
低代码开发师(初级)实战教程
立即下载
阿里巴巴DevOps 最佳实践手册
立即下载
冬季实战营第三期:MySQL数据库进阶实战
立即下载