获取AD域用户登入信息

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了获取AD域用户登入信息相关的知识,希望对你有一定的参考价值。

获取AD用户登入信息
详细记录AD域用户登入过哪些终端电脑

1:

Dim con
Set objSysInfo = CreateObject("ADSystemInfo")
strUser = objSysInfo.UserName
Set objUser = GetObject("LDAP://" & strUser)

UserName = objUser.sAMAccountName
displayName = objUser.displayName
telephone = objUser.telephoneNumber

Set WshNetwork = WScript.CreateObject("WScript.Network")
ComputerID = WshNetwork.ComputerName

Set objArgs = WScript. Arguments
connStr = "driver={sql server};Server=" + objArgs(0) +";Database="+objArgs(1)+";uid="+objArgs(2)+"pwd="+objArgs(3)+";"

set con = wscript.CreateObject("ADODB.Connection")

con.Open connStr
command = "delete from switch_UserLogin where ComputerID = ‘" ?+ ComputerID + ?"‘ and UserName = ‘" + UserName + "‘"
con.Execute(command)

command = "insert into switch_UserLogin (UserName,displayName,Telephone,ComputerID) values (‘"
command = command + UserName + "‘,‘" + displayName ?+ "‘,‘" ?+ telephone + "‘,‘" + ComputerID +"‘)"

con.Execute(command)

con.Close()

2:脚本运行实例

? ? ?wscript.exe domainserverNETLOGONgetUserInfo.vbs ip db user pw

3:通过AD域服务器发布用户登入脚本

??

以上是关于获取AD域用户登入信息的主要内容,如果未能解决你的问题,请参考以下文章

AD域用户怎么更改账户登入名字

AD 域服务简介- Java 获取 AD 域用户

AD 域服务简介- Java 对 AD 域用户的增删改查操作

java 如何获取当前AD域用户名?

JAVA使用Ldap操作AD域

AD域,域控制器创建的所有的用户信息(用户名,密码)存在于哪里,如何提取得到?