15 lines
529 B
Plaintext
15 lines
529 B
Plaintext
' Copyright (c) Microsoft Corporation, All Rights Reserved
|
|
'***************************************************************************
|
|
'
|
|
' WMI Sample Script - Domain name (VBScript)
|
|
'
|
|
' This script demonstrates how to retrieve the domain name of the local machine
|
|
' from instances of Win32_ComputerSystem.
|
|
'
|
|
'***************************************************************************
|
|
Set SystemSet = GetObject("winmgmts:").InstancesOf ("Win32_ComputerSystem")
|
|
|
|
for each System in SystemSet
|
|
WScript.Echo System.Domain
|
|
next
|