查询Active Directory并返回计算机的OU名称和上次启动时间



我调整了一个查询(最初来自这里),以获取特定域的Active Director中计算机的名称和操作系统。

使用此技术,是否有方法同时输出计算机所在OU的名称,以及上次启动/连接到AD的时间?谢谢

objCommand.CommandText = _
    "SELECT Name, operatingSystem FROM " & _
    "'LDAP://" & strDomain & "' " & _
    "WHERE objectClass='computer' " & _
    "AND (operatingSystem = 'Windows 2000 Professional' " & _
    "OR operatingSystem = 'Windows XP Professional') " & _
    "ORDER BY Name"

将这些添加到您选择的中

SELECT Name, operatingSystem, Adspath, lastLogonTimeStamp FROM

然后添加此

Set objDate = objRecordset.Fields("lastLogonTimeStamp").Value
dtmDate = "n/a"
lngHigh = objDate.HighPart
lngLow = objDate.LowPart
If (lngLow < 0) Then
    lngHigh = lngHigh + 1
End If
If (lngHigh = 0) And (lngLow = 0) Then
    dtmDate = "n/a"
Else
    dtmDate = #1/1/1601# + (((lngHigh * (2 ^ 32)) _
    + lngLow)/600000000)/1440
End If

objRecordSet.Fields("Adspath")是可分辨名称,dtmDate是最后登录日期

最新更新