Discussion :

[Bruno13]

Bonjour à tous,

je récupère des pages HTML sur différents serveurs, lorsque je demande la date du Last-Modified j'ai un format de ce style :

Tue, 21 Jul 1998 19:56:56 GMT

Mais comment puis-je convertir ce style de date automatiquement dans un format yyyy/mm/dd ?

Merci
Bruno

[lapec_and_cie]

Salut,

Je te propose l'API GetFileTime, qui te permet de récupérer les dates système de création, modification et d'accès à un fichier.

Voici un exemple à l'adresse suivante :

http://delphi.developpez.com/faq/?pa...r#datesfichier

l'exemple est en bas de la page...

Voilà bonne prog et bon dimanche,

Christopher

[Bruno13]

Bonjour Christopher,

Meci pour ton info mais hélas ma date n'a pas un format date qd je la récupère depuis le header de ma page HTML mais c'est une string.
donc pour la convertir c'est la galère.

Une autre idée me serait d'un plus grand secours.

Encore merci pour ton aide

Bruno

[qi130]

Commence par supprimer la virgule et tout ce qui est avant : fonctions Pos et Delete...

Là, ça commence à ressembler à une date non ?

[Pedro]

Et en ce qui concerne GMT, c'est simpla: en France, en hiver on est à GMT+1 et en heure d'été à GMT+2 Donc suivant la période, ajoute 1 heure ou 2 heures tout simplement

[Tardiff Jean-François]

Bonjour,

votre format est
"Tue, 21 Jul 1998 19:56:56 GMT"

décodé cela donne
"ddd, dd mmm yyyy hh:mm:nn GMT"

soit ddd = jor de la semaine
dd = jour
mmm = mois
yyyy = année
etc..

Vous pouvez récupérer
les jours mois année avec les ordres pos et inttostrdef

Code :

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

1
2
3
4
5
 
var
day: word;
begin
  day := inttostrDef(pos(DateEnString, 6,2);

Pour optenir la date vous pouvez utiliser encodeDate.
Pour ajouter l'heure, il sufit de savoir que 1 = une journée
donc une heure = 1/24
une minute = 1/24/60
etc..
Par exemple
" 19:56:56 GMT" = (19 /24) + (56/24/60) + (56/24/60/60) en heur GMT
Ajouter donc la date ptenue avec l'heur optenue pouravoir le résultat final.
La convertionGMT en heur française vous a été expliqué dans les autres messages.

[Bruno13]

Merci pour toutes ces infos.

J'essaie cela dès que j'ai quelques minutes de libre.

Merci encore à tous pour votre aide.