[Script] Retorna usuário logado em estação remota
Enviado: 11 Jun 2013 22:25
Script em VBS que retorna o usuário logado em uma estação remota. Só pode ser utilizado em ambientes com dominio , e a estação deve ser membro do dominio em questão. Salvar com extensão .vbs e executar. Informar o nome DNS da estação na dialog e ver o resultado.
Código: Selecionar todos
'
'Script para identificar quem está logado na estação remota
'
strComputer = InputBox("Informe o nome do micro que deseja saber quem está logado a este." & vbcrlf & "Por Exemplo: SRRS227")
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colComputer = objWMIService.ExecQuery ("Select * from Win32_ComputerSystem")
For Each objComputer in colComputer
Wscript.Echo "O usuário logado na " & strComputer & " é " & objComputer.UserName
Next