How does one get a list of running applications as shown in the "Applications" tab inside the Windows Task Manager using PowerShell or VBScript?
This should do the trick:
Set Word = CreateObject("Word.Application")
Set Tasks = Word.Tasks
For Each Task in Tasks
If Task.Visible Then Wscript.Echo Task.Name
Next
Word.Quit