本文共 723 字,大约阅读时间需要 2 分钟。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | Option Explicit ' Declare variables Dim sDomain Dim oDomain Dim oComputer ' This string specifies the domain (change to suit your needs) sDomain = "LDAP://cn=Computers,dc=testone,dc=local" ' Open the domain specified by sDomain Set oDomain = GetObject(sDomain) ' Iterate through each computer in the domain For Each oComputer In oDomain ' Display name and GUID text on the screen WScript.Echo oComputer.Name & vbTab & oComputer.GUID Next |
*注意修改 "LDAP://cn=Computers,dc=testone,dc=local"
将上述保存为ShowGUID.vbs,并在CMD中运行:
1 | cscript ShowGUID.vbs |
查看本机的GUID,在powershell或者CMD下执行:
1 2 | WMIC csproduct list full |