查看域内电脑的GUID

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




本文转自 bannerpei 51CTO博客,原文链接:http://blog.51cto.com/281816327/1617721,如需转载请自行联系原作者
  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值