域内计算机和用户获取
来源:互联网 发布:兖州法院网络联系 编辑:程序博客网 时间:2024/06/05 10:11
author:冰点极限-赤龙
显示当前域内所有计算机名称及数目
Const ADS_SCOPE_SUBTREE = 2
Set objRootDSE = GetObject(“LDAP://rootDSE“)
strDomain = ObjRootDSE.Get(“defaultNamingContext”)
Set objConnection = CreateObject(“ADODB.Connection”)
Set objCommand = CreateObject(“ADODB.Command”)
objConnection.Provider = “ADsDSOObject”
objConnection.Open “Active Directory Provider”
Set objCommand.ActiveConnection = objConnection
objCommand.Properties(“Page Size”) = 1000
objCommand.Properties(“Searchscope”) = ADS_SCOPE_SUBTREE
objCommand.CommandText = “SELECT * FROM ‘LDAP://” & strDomain & “‘ WHERE objectCategory=’computer’”
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
Wscript.Echo objRecordSet.Fields(“ADsPath”).Value
objRecordSet.MoveNext
Loop
Wscript.Echo “”
Wscript.Echo “Total Computer: “&objRecordSet.RecordCount
显示当前域内所有用户名称及数目
Const ADS_SCOPE_SUBTREE = 2
Set objRootDSE = GetObject(“LDAP://rootDSE“)
strDomain = ObjRootDSE.Get(“defaultNamingContext”)
Set objConnection = CreateObject(“ADODB.Connection”)
Set objCommand = CreateObject(“ADODB.Command”)
objConnection.Provider = “ADsDSOObject”
objConnection.Open “Active Directory Provider”
Set objCommand.ActiveConnection = objConnection
objCommand.Properties(“Page Size”) = 1000
objCommand.Properties(“Searchscope”) = ADS_SCOPE_SUBTREE
objCommand.CommandText = “SELECT * FROM ‘LDAP://” & strDomain & “‘ WHERE objectCategory=’user’”
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
Wscript.Echo objRecordSet.Fields(“ADsPath”).Value
objRecordSet.MoveNext
Loop
Wscript.Echo “”
Wscript.Echo “Total User: “&objRecordSet.RecordCount
- 域内计算机和用户获取
- 域内计算机和用户获取
- 方便用户共享资源,在域内通过脚本给域内计算机映射网络驱动器(打印机)
- 获取计算机服务和当前用户角色
- 查找域内的计算机,加入COMBOX
- 如何获取远程计算机的用户列表?
- 如何能做到禁止域内计算机的本地登陆?
- 防止计算机被域内其他账户登录的方法
- [AD]查看域内计算机所覆盖的策略
- 获取和修改计算机屏幕分辨率
- 域内用户对于管理员来说电脑没有任何隐私
- 通过ISA限制域内用户访问网页视频
- 导出当前域内所有用户hash的技术整理
- 导出当前域内所有用户hash的技术整理
- Ubuntu修改用户名称和计算机名称
- ubuntu修改用户名称和计算机名称
- Ubuntu修改用户名称和计算机名称
- Ubuntu修改用户名称和计算机名称
- ACM 进阶之路
- Oracle中查询主键、外键、sequence、表基本信息等
- 蘑菇定律
- Android演示解析xml文件-SAX
- Java程序练习-Exponentiation
- 域内计算机和用户获取
- MFC框架中获取窗口/视图句柄
- 第 2 章 基本线程编程
- Access数据库注入高级玩法
- Source Insight建工程之Kernel
- 欢迎大家观顾【图灵教育社区】
- 悲观锁与乐观锁
- java 大数运算[转]
- 多线程总结(二)