求一个可以自动关闭某进程的程序代码 要求：最好是用vbs，程序进程不要一次性的要长时间存在，一发现
求一个可以自动关闭某进程的程序代码要求：最好是用vbs，程序进程不要一次性的要长时间存在，一发现有目标进程就马上关闭，进程是crossproxy.exe系统：win7下可...
求一个可以自动关闭某进程的程序代码 要求：最好是用vbs，程序进程不要一次性的要长时间存在，一发现有目标进程就马上关闭，进程是crossproxy.exe 系统：win7下可以运行 谢谢！
展开
展开全部
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colMonitoredProcesses = objWMIService. _
ExecNotificationQuery("select * from _instancecreationevent " _
& " within 1 where TargetInstance isa 'Win32_Process'")
i = 0
Do While i = 0
Set objLatestProcess = colMonitoredProcesses.NextEvent
If objLatestProcess.TargetInstance.Name = "nocrossproxy.exe" Then
objLatestProcess.TargetInstance.Terminate
End If
这个程序的作用只要一发现crossproxy.exe进程就关闭，但然你想关闭这个程序也是可以的！
在任务管理器中关闭WScript.exe就可以了！
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colMonitoredProcesses = objWMIService. _
ExecNotificationQuery("select * from _instancecreationevent " _
& " within 1 where TargetInstance isa 'Win32_Process'")
i = 0
Do While i = 0
Set objLatestProcess = colMonitoredProcesses.NextEvent
If objLatestProcess.TargetInstance.Name = "nocrossproxy.exe" Then
objLatestProcess.TargetInstance.Terminate
End If
这个程序的作用只要一发现crossproxy.exe进程就关闭，但然你想关闭这个程序也是可以的！
在任务管理器中关闭WScript.exe就可以了！
追问
vbs的吧，还有如果要改成关其它进程的话就把nocrossproxy.exe改成noxxxx.exe行吗
追答
恩是的哦朋友！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
