Convertir une date représentée par 18 chiffres (Active Directory Timestamp)

**sylviobarca** · 20/04/2016, 15h54

Bonjour,
Je n'ai pas réussi malgré plusieurs heures de recherches sur les forums à trouver comment convertir en date un chiffre exprimé en nanosecondes.

Sur DELPHI, j'ai récupéré par LDAP la valeur de l'attribut lastLogon. Seulement cette valeur ressort sous la forme de 18 chiffres (ex: 130732521375836501).

Je souhaiterais pouvoir convertir cette valeur en date. Ce chiffre exprimé en nanosecondes représente la différence de temps écoulée depuis le 01/01/1601. (d'après ce que j'ai trouvé sur les forums).

Si quelqu'un peut me venir en aide, ce sera le bienvenue!!!!

**Andnotor** · 20/04/2016, 19h50

Par pas de 100 nanosecondes d'après ce que je lis

Divise ce nombre par 10000 (pour l'avoir en milliseconde) et incrémente la date minimale à l'aide de IncMilliSecond (DateUtils) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
var
  D :TDateTime;
begin
  D := IncMilliSecond(EncodeDate(1601, 1, 1), 130732521375836501 div 10000);
end;

**sylviobarca** · 21/04/2016, 09h16

Merci pour ton retour Andnotor!!
J'ai essayé ton code, mais j'obtiens 30/12/1899 comme date. Comme ça me paraissait bizarre, j'ai vu que même en divisant par 10 au lieu de 1000 j'obtiens la même date...

**Roland Chastain** · 21/04/2016, 10h53

Bonjour !

Pour info, la commande suivante

Code Batch :

Sélectionner tout - Visualiser dans une fenêtre à part

w32tm.exe /ntte 130732521375836501

donne ce résultat :

151310 18:55:37.5836501 - 11/04/2015 20:55:37

**Andnotor** · 21/04/2016, 11h01

J'avais testé cette fonction avant de la proposer et j'obtiens bien le 11.04.2015 18:55.37 GMT (à une seconde prêt) pour 130732521375836501, comme sur ce site.

**Roland Chastain** · 21/04/2016, 11h03

Chez moi le code d'Andnotor donne le bon résultat.

11/04/2015 18:55:37

**Roland Chastain** · 21/04/2016, 11h07

Au fait, ce serait bien de rajouter cette solution dans la FAQ. Pourrait-on en savoir un peu plus sur cette façon de noter une date ? Où cette notation est-elle utilisée ? C'est ce que je n'ai pas trop compris pour ma part.

**tourlourou** · 21/04/2016, 16h43

C'est le format des Windows File Times.

Il y a pas mal de fonctions de conversion, et le problème est de toujours être sûr de ce qu'on obtient (UTC, local) quitte à convertir l'UTC en local, en récupérant les infos sur la zone de temps.