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

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!!!!

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:

---

1 2 3 4 5

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

---

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...

Bonjour !

Pour info, la commande suivante

Code:

---

w32tm.exe /ntte 130732521375836501

---

donne ce résultat :

Citation:

---

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

---

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.

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

Citation:

---

11/04/2015 18:55:37

---

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.

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.

Citation:

---

Envoyé par sylviobarca

Merci pour ton retour Andnotor!!
J'ai essayé ton code, mais j'obtiens 30/12/1899 comme date.

---

Mais c'est connu comme date, ça !
Lecture1, la citation tout en bas (au passage, j'adore la date des posts de ce forum :fou:), lecture2.

@Jipété Ne te casse pas la nénette, lis le wiki ;) ;) Epoch (reference date)

Merci à vous tous pour votre aide!!