For Each objItem In GetObject("winmgmts:root\cimv2").ExecQuery("SELECT * FROM Win32_Process where Name ='WScript.exe'")
       objItem.GetOwner User, Domain
       objItem.GetOwnerSid Sid
              Rem -- Здесь обработать 
              objItem.ProcessId
              objItem.CommandLine Rem -- Отсюда можно выцепить имя скрипта (собственно, что и нужно)
              Domain&"\"&User
Next

Get-WMIObject -Class Win32_Process -filter "Name='wscript.exe'"

CommandLine                : "C:\Windows\System32\WScript.exe" "C:\oracle\PDFSPEED\pdfspeed.vbs"
ProcessId                  : 6132

Get-WMIObject -Class Win32_Process -filter "Name='wscript.exe'" | Select ProcessId, CommanLine

                            ProcessId CommanLine
                            --------- ----------
                                 6132

get-process | Where-Object {$_.ProcessName -eq "wscript"} | select ID, CommandLine

                                   Id CommandLine
                                   -- -----------
                                 6132

PS C:\Users\DP> $array = Get-Process wscript | Foreach {$_.Id,$_CommandLine}
PS C:\Users\DP> $array[0]
6132
PS C:\Users\DP> $array[1]
PS C:\Users\DP>

PS C:\Users\xxx> $a = Get-WMIObject -Class Win32_Process -filter "Name='wscript.exe'"
PS C:\Users\xxx> $a.CommandLine
"C:\Windows\System32\WScript.exe" "C:\oracle\PDFSPEED\v.vbs"
PS C:\Users\xxx> $a.ProcessId
3756

PS C:\Users\ххх> $a.GetOwner().User
ххх
PS C:\Users\ххх> $a.GetOwner().Domain
domain_main