通过脚本禁用域内XP自带防火墙(附收集报告功能)

本文涉及的产品
云防火墙,500元 1000GB
简介:
自从XP有了SP2之后,域内的网络管理就引来了诸多不便,总是受到防火墙的阻扰。对于XP我们可以禁用之,但是2000没得罪你,犯不着受到牵连。可以采用组策略的wmi筛选功能只对xp有效,也可以在脚本里进行OS判断,本文采用后者。
 
复制以下脚本命名为Firewall-disable.vbs,通过组策略指派到计算机的开机脚本中。
 
 
  1. 'Script Start  
  2. On Error Resume Next  
  3. '==Get OS==  
  4. strComputer = "." 
  5. Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")  
  6. Set colOperatingSystems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")  
  7. For Each objOperatingSystem in colOperatingSystems  
  8. 'Wscript.Echo objOperatingSystem.Caption  
  9. strOS = objOperatingSystem.Caption  
  10. Next  
  11.  
  12. 'If OS=XP then disable firewall  
  13. If InStr(strOS, "XP") Then  
  14. Set objFirewall = CreateObject("HNetCfg.FwMgr")  
  15. Set objPolicy = objFirewall.LocalPolicy.CurrentProfile  
  16. objPolicy.FirewallEnabled = FALSE 
  17. Else  
  18. Wscript.Quit  
  19. End If  
  20.  
  21. '==Get computer name==  
  22. Set objNet = createobject("Wscript.Network")  
  23. strPCName = objNet.Computername  
  24.  
  25. '==Get current Date & Time==  
  26. strYear = Year(Date)  
  27. strMonth = Month(Date)  
  28. If strMonth < 10 Then strMonth = 0 & strMonth  
  29. strDay = Day(Date)  
  30. If strDay < 10 Then strDay = 0 & strDay  
  31. strDate = strYear & strMonth & strDay  
  32. Dim MyTime, MyHour, MyMin  
  33. MyTime = Now 
  34. MyHour = Hour(MyTime)  
  35. If MyHour < 10 Then MyHour = 0 & MyHour  
  36. MyMin = Minute(Now)  
  37. If MyMin < 10 Then MyMin = 0 & MyMin  
  38. strTime = MyHour & ":" & MyMin  
  39.  
  40. '==Create report==  
  41. Const ForReading=1 
  42. Const ForWriting=2 
  43. Const ForAppending=8 
  44. Const OverwriteExisting = True 
  45. Dim fso, ts  
  46. Set fso = CreateObject("Scripting.FileSystemObject")  
  47. strPath = "\\FileSrv\GPreport\FW_Report\" 
  48. If fso.FileExists(strPath & strPCName & ".txt") Then  
  49. Set ts = fso.OpenTextFile(strPath & strPCName & ".txt", ForAppending)  
  50. ts.WriteLine strPCName & " firewall has been disabled on " & strDate & "." & strtime & VbCrlf  
  51. ts.Close  
  52. Else  
  53. Set ts = fso.CreateTextFile(strPath & strPCName & ".txt", true)  
  54. ts.WriteLine strPCName & " firewall has been disabled on " & strDate & "." & strtime & VbCrlf  
  55. ts.Close  
  56. End If  
  57.  
  58. 'Script End 

本文转自yangye1985 51CTO博客,原文链接:http://blog.51cto.com/yangye/200450,如需转载请自行联系原作者

相关文章
|
2月前
|
监控 网络协议 Shell
ip和ip网段攻击拦截系统-绿叶结界防火墙系统shell脚本
这是一个名为“小绿叶技术博客扫段攻击拦截系统”的Bash脚本,用于监控和拦截TCP攻击。通过抓取网络数据包监控可疑IP,并利用iptables和firewalld防火墙规则对这些IP进行拦截。同时,该系统能够查询数据库中的白名单,确保合法IP不受影响。此外,它还具备日志记录功能,以便于后续分析和审计。
49 6
|
4月前
|
监控 安全 网络安全
IPSEC 与防火墙:功能与优势比较
【8月更文挑战第24天】
85 0
|
5月前
|
监控 网络安全 定位技术
|
5月前
|
存储 消息中间件 监控
在保安监控及防盗报警系统工程中,通常包括视频监控、入侵检测、报警通知等功能。
在保安监控及防盗报警系统工程中,通常包括视频监控、入侵检测、报警通知等功能。
|
6月前
|
云安全 监控 安全
WEB应用防火墙的作用,云服务器有这个功能吗
Web应用防火墙(Web Application Firewall,简称WAF)是一种安全产品,旨在保护Web应用程序免受网络攻击和恶意数据流量的影响。
|
7月前
|
安全 Serverless 网络安全
SAE防火墙功能默认阻止所有来自公网的流量
SAE防火墙功能默认阻止所有来自公网的流量
155 1
|
监控 安全 网络安全
分析web应用防火墙与防火墙的功能与用途
分析web应用防火墙与防火墙的功能与用途
|
安全 网络安全 网络虚拟化
有配置云防火墙,那么防火墙自然无法发挥其防护功能
有配置云防火墙,那么防火墙自然无法发挥其防护功能
70 2
|
数据采集 SQL 机器学习/深度学习
阿里云安全产品Web应用防火墙是什么?Web应用防火墙功能与作用简介
Web应用防火墙是一款网站Web应用安全的防护产品,拦截针对您网站发起的Web通用攻击(如SQL注入、XSS跨站等)或是应用资源消耗型攻击(CC),同时也可以满足您网站从流量管理角度来防御业务风险,本文主要介绍了Web应用防火墙产品优势、产品功能和主要应用场景。
605 0
阿里云安全产品Web应用防火墙是什么?Web应用防火墙功能与作用简介
|
网络协议 网络安全 网络虚拟化
防火墙安全策略功能入门
防火墙安全策略功能入门
防火墙安全策略功能入门