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:
Voici une offre de notre annonceur
Le login de la personne connectée s’affiche:
Voici mon GPS pour faire du vélo ! Le Garmin Edge 830 est une vraie réussite avec une autonomie de plus de 15 heures cartographie activée et un écran tactile désormais absolument parfait qui réagit au doigt et à l'oeil, comme un smartphone.
Créez un itinéraire sur Strava ou sur Garmin Connect et il est aussitôt transmis à vote GPS. Si vous êtes pressé ou dans un lieu inconnu, le générateur de boucle vous guidera tout simplement. Si vous décidez de changer de prendre un autre chemin le recalcul est automatique et un nouvel itinéraire vous sera proposé.
Voir mon classement des meilleurs GPS pour en savoir plus !
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 ?