Jump to content

VicFontaine

Members
  • Posts

    1
  • Joined

  • Last visited

VicFontaine's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. @ PhyrePhoX Func _GetUserName($strClient) Local $objWMIService, $objItem, $colItems, $strUser, $strDomain, $Result $objWMIService = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\" & $strClient) $colItems = $objWMIService.InstancesOf("Win32_Process") If IsObj($colItems) Then For $objItem In $colItems If ($objItem.Caption = "explorer.exe") Then $Result = $objItem.GetOwner($strUser, $strDomain) If (Not @error) And ($Result = 0) Then Return $strUser EndIf Next EndIf Return "" EndFunc Enjoy Vic Fontaine
×
×
  • Create New...