梦想吧技术论坛's Archiver

似水年华 发表于 2007-4-22 07:21 PM

VBS-用WMI对象列出系统所有进程

Dim WMI,objs
Set WMI = GetObject("WinMgmts:")
Set objs = WMI.InstancesOf("Win32_Process")
For Each obj In objs
Enum1 = Enum1 + obj.Description + Chr(13) + Chr(10)
Next
msgbox Enum1

页: [1]

Powered by Discuz! Archiver 7.0.0  © 2001-2009 Comsenz Inc.