Afficher le compte utilisateur connecté sur une machine distante en VBScript

Ozanne CADET1

Il peut être pratique de savoir rapidement qui est connecté sur un serveur distant. Ce script WMI, avec un Inputbox intégré, va vous rendre ce service.

Créez un fichier ScriptWMI.vbs à l’aide d’un éditeur de texte et insérez le code suivant:

Option Explicit
Dim objWMIService, objComputer, colComputer, strComputer
strComputer = inputbox( "Nom du serveur", "Input" )
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colComputer = objWMIService.ExecQuery _
("Select * from Win32_ComputerSystem")
For Each objComputer in colComputer
Wscript.Echo objComputer.UserName & " is logged on"
Next
Ce code est correctement formaté.
Vous pouvez directement le COPIER / COLLER dans un fichier VBS.

Double-cliquez sur le fichier nouvellement créé pour exécuter le script

Indiquez le nom du système local ou distant:

Input Box VBS Script

Le login de la personne connectée s’affiche:

Script VBS WMI qui est connecté

1 commentaire sur “Afficher le compte utilisateur connecté sur une machine distante en VBScript”

  1. lagrange a dit :

    Bonjour ce script ne fonctionne pas complètement dans mon entreprise, il m’affiche bien le nom des utilisateur qui sont connecter sur un poste , mais pas les machine distante. Seriez-vous pourquoi ? le script est-il fonctionnel ?

Laisser un commentaire