ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Which reference library has Int64 ? (https://www.excelbanter.com/excel-programming/374535-reference-library-has-int64.html)

[email protected]

Which reference library has Int64 ?
 
Thanks.


[email protected]

Which reference library has Int64 ?
 

wrote:
Thanks.


BTW: Here's an example usage:

(I googled and figured that LastLogin must be Int64 because of it's
HighPart method.)

If I'm on the wrong track and you have any ideas let me know.

Here's an example value : 128038660578885137


set LastLogin = objMember.get("lastLogonTimeStamp")
If LastLogin.HighPart = "" Then
intLLTS = "Never"
Else
intLogonTime = LastLogin.Highpart * (2^32) + LastLogin.LowPart
IntLogonTime = IntLogonTime / (60 * 10000000)
intLogonTime = intLogonTime / 1440
if intLogonTime = 0 Then
intLLTS = "Never"
Elseif intLogonTime = "" Then
intLLTS = "Never"
Else
intLLTS = intLogonTime + #1/1/1601#
End If
End If


Tom Ogilvy

Which reference library has Int64 ?
 
system.int64 is a structure in .NET Framework Class Library, but it doesn't
have HighPart and LowPart properties as you show.

Look at this example:

http://msdn2.microsoft.com/en-us/library/ms180872.aspx

Active Directory schema properties such as lastLogon use the LargeInteger
syntax type.


this appears to be in the ActiveDS object model.

http://msdn.microsoft.com/library/de..._lastlogon.asp

--
Regards,
Tom Ogilvy


wrote in message
ups.com...

wrote:
Thanks.


BTW: Here's an example usage:

(I googled and figured that LastLogin must be Int64 because of it's
HighPart method.)

If I'm on the wrong track and you have any ideas let me know.

Here's an example value : 128038660578885137


set LastLogin = objMember.get("lastLogonTimeStamp")
If LastLogin.HighPart = "" Then
intLLTS = "Never"
Else
intLogonTime = LastLogin.Highpart * (2^32) + LastLogin.LowPart
IntLogonTime = IntLogonTime / (60 * 10000000)
intLogonTime = intLogonTime / 1440
if intLogonTime = 0 Then
intLLTS = "Never"
Elseif intLogonTime = "" Then
intLLTS = "Never"
Else
intLLTS = intLogonTime + #1/1/1601#
End If
End If





All times are GMT +1. The time now is 09:09 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com