OVH Cloud OVH Cloud

propriétés systéme à distance ?

1 réponse
Avatar
bouga
bonjour,
est ce qu'il y a moyen comment accéder aux proprités systémes d'un PC adhéré
à un domaine à partir d'un autre PC ?

merci

1 réponse

Avatar
Stéphane [MS]
Bonjour,

Script Center dispose de pas mal de scripts de ce type.
Cf. http://www.microsoft.com/technet/scriptcenter/default.mspx
en téléchargement, également sur :
http://www.microsoft.com/downloads/details.aspx?FamilyID´cb2678-dafb-4e30-b2da-b8814fe2da5a&DisplayLang=en

En particulier, dans le script suivant, il suffit de renseigner le nom
d'ordinateur (strComputer) :

Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime")

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2")

Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
Wscript.Echo "Boot Device: " & objOperatingSystem.BootDevice
Wscript.Echo "Build Number: " & objOperatingSystem.BuildNumber
Wscript.Echo "Build Type: " & objOperatingSystem.BuildType
Wscript.Echo "Caption: " & objOperatingSystem.Caption
Wscript.Echo "Code Set: " & objOperatingSystem.CodeSet
Wscript.Echo "Country Code: " & objOperatingSystem.CountryCode
Wscript.Echo "Debug: " & objOperatingSystem.Debug
Wscript.Echo "Encryption Level: " & objOperatingSystem.EncryptionLevel
dtmConvertedDate.Value = objOperatingSystem.InstallDate
dtmInstallDate = dtmConvertedDate.GetVarDate
Wscript.Echo "Install Date: " & dtmInstallDate
Wscript.Echo "Licensed Users: " & _
objOperatingSystem.NumberOfLicensedUsers
Wscript.Echo "Organization: " & objOperatingSystem.Organization
Wscript.Echo "OS Language: " & objOperatingSystem.OSLanguage
Wscript.Echo "OS Product Suite: " & objOperatingSystem.OSProductSuite
Wscript.Echo "OS Type: " & objOperatingSystem.OSType
Wscript.Echo "Primary: " & objOperatingSystem.Primary
Wscript.Echo "Registered User: " & objOperatingSystem.RegisteredUser
Wscript.Echo "Serial Number: " & objOperatingSystem.SerialNumber
Wscript.Echo "Version: " & objOperatingSystem.Version
Next


Cdlt
Stéphane

"bouga" a écrit dans le message de news:

bonjour,
est ce qu'il y a moyen comment accéder aux proprités systémes d'un PC
adhéré
à un domaine à partir d'un autre PC ?

merci