home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 August / CHIP_CD_2005-08.iso / software / disk_view / DiskView.msi / Binary._385C6F3031BEA419ABAEB73A5CC03440 < prev    next >
Encoding:
Text File  |  2005-06-08  |  284 b   |  9 lines
  1. pgm = "explorer.exe"
  2. set wmi = getobject("winmgmts:")
  3. sQuery = "select * from win32_process " _
  4.        & "where name='" & pgm & "'"
  5. set processes = wmi.execquery(sQuery)
  6. 'msgbox processes.count & " instance(s) of " & pgm 
  7. for each process in processes
  8.   process.terminate
  9. next