Set objUser = GetObject("LDAP://CN=Leigh.Smith,OU=USERS,OU=XXXX01,DC=XXX,DC=XXXX,DC=com")
Set objLastLogon = objUser.Get("lastLogonTimestamp")

intLastLogonTime = objLastLogon.HighPart * (2^32) + objLastLogon.LowPart 
intLastLogonTime = intLastLogonTime / (60 * 10000000)
intLastLogonTime = intLastLogonTime / 1440
WScript.Echo  intLastLogonTime
Wscript.Echo "Last logon time: " & intLastLogonTime + #1/1/1601#

##</code><code>##

use Win32::OLE;

$objUser = Win32::OLE->GetObject('LDAP://CN=Leigh.Smith,OU=USERS,OU=XXX,DC=XX,DC=XXX,DC=com');
$objLastLogon = $objUser->Get('lastLogonTimestamp');

$intLastLogonTime = $objLastLogon->HighPart * (2 ** 32) + $objLastLogon->LowPart;
$intLastLogonTime = $intLastLogonTime / (60 * 10000000);
$intLastLogonTime = $intLastLogonTime / 1440;
print 'Last logon time: ' . $intLastLogonTime + #1/1/1601#;