client RDP info

[Ugo]

hi all,

I need to know a unique value of the remote client from the server rdp.

is possible?

Thank you for your reponse.

[pablovidal]

Hello,
What I do is to take the user name with which the user entered.

Code: Select all  Expand view

Function ListUsersTs()
local oLoc := CreateObject( "wbemScripting.SwbemLocator" )
local oSrv := oLoc:ConnectServer(,"root\cimv2")
local aDat := oSrv:ExecQuery( "SELECT * FROM Win32_UserAccount" )
Local oDat
Local aRet := {""}

 For each oDat in aDat
  AADD(aRet, AllTrim( Upper( oDat:Name ) ) )
 Next

Return( aRet )