Connexion

Conversion de date au format DOS

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 19/05/2006 16:28:49 et initié par Renfield [Liste]
Date de mise à jour : 22/05/2006 10:07:28
Vue : 7502
Catégorie(s) : Date & Heure
Langages dispo pour ce code :
- VB6, VBA, VBScript

Proposer ce code dans un autre langage

Ajouter aux favoris Code Snippet pour Visual Studio 2005

Snippet VS 2005 (VB)

Langage : VB6 , VBA , VBScript
Date ajout : 19/05/2006
Posté par Renfield [Liste]
DateMAJ : 22/05/2006

Public Function DosTimeToDate(ByVal vnDate As Long, ByVal vnTime As Long) As Date
Dim nYear As Integer
Dim nMonth As Integer
Dim nDay As Integer
Dim nHour As Integer
Dim nMinute As Integer
Dim nSecond As Integer
    vnDate = vnDate And &HFFFF&
    nYear = 1980 + vnDate \ &H200&
    nMonth = (vnDate \ &H20&) Mod &H10&
    nDay = vnDate Mod &H20&

    vnTime = vnTime And &HFFFF&
    nHour = vnTime \ &H800&
    nMinute = (vnTime \ &H20&) Mod &H40&
    nSecond = 2 * vnTime Mod &H20&
    DosTimeToDate = DateSerial(nYear, nMonth, nDay) & " " & TimeSerial(nHour, nMinute, nSecond)
End Function

Remarque :
pour test, en entrée :
date = 13415
time = -25221 (on est en signed short. Prendre 40315 sinon)

sortie = 07/03/2006 19:43:22

Snippets en rapport avec : Date, Time, Dos, Stamp

16/04/2008 - Récupérer le nom du fichier le plus récent

01/09/2007 - Contrôle si Date Invalide [CDI]

02/07/2007 - Récupérer le numéro du mois à partir de son nom

29/03/2007 - Obtenir le dernier jour de la semaine

16/11/2006 - Convertit en jours / heures / minutes le temps entre 2 dates & heures

30/10/2006 - Déterminer le jour de la semaine d'une date

12/10/2006 - Trouver le dernier week end pour un mois et une année donnés

21/07/2006 - Trouver le prochain jour ouvrable, à partir d'une date, et selon un delta en jours

14/05/2006 - Calculer le numero de semaine d'une date

10/05/2006 - Nombre de millisecondes depuis le démarrage de la machine

Codes sources en rapport avec : Date, Time, Dos, Stamp

{Visual Basic, VB6, VB.NET, VB 2005} DOSTIMETODATE (CONVERTION DATE ET TIME DE DOS VERS UN TYPE DATE)
je 'joue' actuellement avec des fichiers dans lesquels sont stockés des date et des heures, au forma...

{PHP} FONCTION QUI RETOURNE L'AGE AVEC LE JOUR/MOIS/ANNÉE DE NAISSANCE
Ce code peut être utile pour retourner l'âge d'un membre sur votre site ou sur votre forum par exemp...

{PHP} [PHP5] CLASSE DATE/HEURE
PHP5.2 étant sorti, je suis allé regarder la nouvelle classe de date/heure qui se trouve dans le cor...

{Javascript / DHTML} UNE FONCTION QUI DORT ======> SLEEP( SECONDE );
Salu a tous le monde, je tiens a vous présenter une petite source de rien du tous mais qui peux de...

{PHP} LA DATE DU MÊME JOUR, LE MOIS SUIVANT
Bonjour, ce petit bout de code pour montrer comment utiliser la fonction time(), date(), et mktime()...

{Javascript / DHTML} CALCUL LE TEMPS ÉCOULÉ À PARTIR D'UNE DATE
Code déposé par GRUNENBERGER Benoît www.unrealnetwork.net Calcul le temps écoulé à partir d'une ...

{Delphi} TEXTENDEDDATETIME, COMPOSANT NON-VISUEL DE DATE ET HEURE MULTI-FONCTION
Je vous propose un composant non-visuel (TExtendedDateTime) qui n'est rien d'autre qu'un "calque" de...

{Assembleur} [FASM]-DATE ET HEURE
Tiré du code de x5man, j'en ai fait une version utilisable avec Flat Assembler et les API Windows ;)...

{Assembleur} RECUPERER LA DATE ET L'HEURE DU SYSTEME PAR LES API DE WINDOWS
voilà j'avais besoin d'une fonction ki récupère l'heure et la date du systeme par les api de windows...

{Delphi} FORMATDATETIME - AFFICHAGE D'UNE DATE ET/OU D'UNE HEURE DANS UNE CHAÎNE
Ce que vous avez toujours voulu savoir sur FormatDateTime, sans jamais oser le demander... Mais t...

Les Snippets

Rechercher :

Par langages :

Par Catégorie

Compteurs

Conversion de date au format DOS

Snippets en rapport avec : Date, Time, Dos, Stamp

Codes sources en rapport avec : Date, Time, Dos, Stamp