标题: 在WIN2000下怎样查询和关闭进程？ [打印本页]

---

作者: bob1989     时间: 2007-9-29 20:36    标题: 在WIN2000下怎样查询和关闭进程？

我只知道在WINXP下有TASKLIST 和 TASKKILL
但WIN2000下没有

请问还有什么别的方法关进程吗？（只用自带命令）

---------------------------------------------------------------------
还有个问题
我用资源管理器打开了C:\ 和 D:\ 两个文件夹
请问要怎么关C:\  而D:\不会关闭

---

作者: bob1989     时间: 2007-10-26 11:31
问了这么久没人答`？

---

作者: picat     时间: 2007-10-26 12:06
你这个问题有难度，不管你打开多少文件夹，explorer进程只有一个，你杀一个肯定全部关闭，并且explorer是windows的shell，关闭后将导致桌面不可见。

---

作者: abcd     时间: 2007-10-26 12:09
2K也有ntsd命令的？

---

作者: p1509101     时间: 2007-10-27 23:07
ntsd -c q -p PID号
pid号 在管理器中查看

---

作者: mcmemd     时间: 2007-10-28 10:08
好好好好
好好好好好

---

作者: juyz     时间: 2007-12-12 12:46

Quote:

Originally posted by p1509101 at 2007-10-27 11:07 PM: ntsd -c q -p PID号 pid号 在管理器中查看

没有可操作性！pid号是变化的。

---

作者: lxmxn     时间: 2007-12-12 13:02
编写vbs脚本应该可以关闭的。

---

作者: blackieliu     时间: 2008-4-15 07:53    标题: 转自fastslz

将以下代码另存为vbs脚本

strComputer = "."
arrTargetProcs = Array("程序名.exe")

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery("SELECT * FROM Win32_Process")

For Each objProcess in colProcesses
  For Each strTargetProc In arrTargetProcs
    If LCase(objProcess.Name) = LCase(strTargetProc) Then
      intReturn = objProcess.Terminate
      If intReturn = 0 Then
        WScript.Echo "结束进程："&objProcess.Name&" 成功"
      Else
        WScript.Echo "结束进程："&objProcess.Name&" 失败"
      End If
    End If
  Next
Next

---

作者: qinchun36     时间: 2008-4-23 16:31
呵呵，刚才在论坛里面看见的，盗版一下，只有输入语句是我自己加的。。。
另纯为 .vbs 文件

On Error Resume Next
sub Close_Process(ProcessName)
On Error Resume Next
     for each ps in getobject("winmgmts:win32_process").instances_
           if Ucase(ps.name)=Ucase(ProcessName)  then
                 ps.terminate
           end if
     next
end sub
ProName=inputbox("输入进程名称","INPUT","qq.exe")
Close_Process(ProName)