防火墙开启例外端口

.版本 2 .程序集 窗口程序集1 .子程序 _按钮1_被单击 开启例外端口 (“测试”, 123) .子程序 开启例外端口 .参数 名称, 文本型 .参数 端口, 短整数型 .局部变量 ovMgr, 对象 .局部变量 ovProfile, 对象 .局部变量 ovPort, 对象 ovMgr.创建 (“HNetCfg.FwMgr”, ) ovProfile ＝ ovMgr.读对象型属性 (“LocalPolicy”, ).读对象型属性 (“CurrentProfile”, ) ovPort.创建 (“HNetCfg.FwOpenPort”, ) ovPort.写属性 (“Port”,