CryptoSys PKI examples VB6 to VB.NET

PKI_CompileTime

Get date and time the DLL was last compiled.

VB6/VBA

Debug.Print "Testing PKI_CompileTime ..."
Dim nLen As Long
Dim strCompiledOn As String

strCompiledOn = String(255, " ")
nLen = PKI_CompileTime(strCompiledOn, Len(strCompiledOn))
strCompiledOn = Left(strCompiledOn, nLen)
Debug.Print "PKI_CompileTime returns " & nLen & " [" & strCompiledOn & "]"

Output

Testing PKI_CompileTime ...
PKI_CompileTime returns 20 [May  2 2010 11:46:04]

VB.NET

Console.WriteLine("Testing PKI_CompileTime ...")
Dim strCompiledOn As String

strCompiledOn = General.CompileTime()
Console.WriteLine("General.CompileTime " & " [" & strCompiledOn & "]")

[Contents]

[HOME]   [NEXT: PKI_ErrorLookup...]

Copyright © 2010-20 D.I. Management Services Pty Ltd. All rights reserved.