8,484
edits
Paradox-01 (talk | contribs) m (how to import dae)  | 
				Paradox-01 (talk | contribs)  m (detect a running program)  | 
				||
| Line 564: | Line 564: | ||
  logmessage "onisplit finished."  |   logmessage "onisplit finished."  | ||
  ' now you can work with the extracted xml file  |   ' now you can work with the extracted xml file  | ||
===Detect a running program===  | |||
 detectProgram = "Simple_OniSplit_GUI.exe"  | |||
 programIsActive = false  | |||
 sComputerName = "."  | |||
 Set objWMIService = GetObject("winmgmts:\\" & sComputerName & "\root\cimv2")  | |||
 sQuery = "SELECT * FROM Win32_Process"  | |||
 Set objItems = objWMIService.ExecQuery(sQuery)  | |||
 For Each objItem In objItems  | |||
     if objItem.name = detectProgram then  | |||
        programIsActive = true  | |||
        exit for  | |||
     end if  | |||
 Next  | |||
 logmessage programIsActive  | |||
outputs either True or False  | |||
==Read file==  | ==Read file==  | ||
edits