how to convert lastlogon value
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkLoginProfile")
Dim objLastLogon
For Each objItem in colItems
if (objItem.UserType = "Normal Account") Then
Wscript.Echo objItem.Name & " " & objItem.LastLogon
end if
Next
Support@Mytechnet.me