中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

中国DOS联盟论坛
现在时间是 2026-08-12 21:46

共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行

第1楼　fation	发表于 2009-12-23 15:43
新手上路　发帖 6　积分 7
查杀进程批处理哪位高人给写个批处理查出所有进程的pid并导入到txt文本中（提示：在2000的操作系统）不支持tlist命令

第5楼　mountvol	发表于 2009-12-25 19:23
初级用户　发帖 117　积分 186
不知道2000下这个代码可不可以，因为wmi在2000下和在xp中是有区别的。 Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFile = oFSO.OpenTextFile("a.txt",2,True) Set oShell = CreateObject("WScript.Shell") For Each x In GetObject("Winmgmts:Win32_Process").Instances_ oFile.WriteLine x.ProcessId & vbTab & x.Name Next oFile.Close oShell.Run "a.txt" Set oFile = Nothing Set oFSO = Nothing Set oShell = Nothing