FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» [Résolu] Un prg Panoramic s'abime avec le temps (erreur)
par Oscaribout Aujourd'hui à 13:48

» Planétarium virtuel.
par Pedro Alvarez Aujourd'hui à 9:56

» Dessin 2D: largeur de trait (résolu !)
par Jicehel Hier à 15:16

» Promenade dans le Ciel
par papydall Hier à 3:13

» PanExpress : l'éditeur Panoramic avec création d'objet
par Minibug Sam 23 Juin 2018 - 17:00

» Nouvelle version 0.34
par jean_debord Sam 23 Juin 2018 - 9:39

» Quantité de mémoire utilisée par un exe
par mindstorm Jeu 21 Juin 2018 - 21:22

» Projet de planétarium virtuel.
par Jean Claude Jeu 21 Juin 2018 - 19:02

» Animation: Feux de signalisation
par Minibug Mer 20 Juin 2018 - 20:28

» Problème avec 'file_load'.
par Pedro Alvarez Lun 18 Juin 2018 - 8:12

» Version instantanée V 0.9.28i20 du 13/06/2018
par jjn4 Sam 16 Juin 2018 - 14:25

» string$(0,chr$(32)) sans erreur
par silverman Ven 15 Juin 2018 - 19:56

» Version instantanée V 0.9.28i19 du 13/06/2018
par Minibug Ven 15 Juin 2018 - 19:14

» Mes souhaits d'amélioration de Panoramic.
par Pedro Alvarez Jeu 14 Juin 2018 - 20:17

» [RÉSOLU] Message d'erreur impossible à indentifier
par Minibug Mer 13 Juin 2018 - 20:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2018
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier

Partagez | 
 

 comment accèder à l'heure et à la date d'un fichier

Aller en bas 
AuteurMessage
bignono

avatar

Nombre de messages : 1127
Age : 61
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 8:00

Bonjour à tous! Very Happy
Aujourd'hui, j'ai besoin de savoir si il y a un moyen pour connaitre la date d'enregistrement et l'heure à la seconde près, voire au millième de seconde, d'un fichier. Dans la liste des fonctions pour les fichiers, je n'en ai pas trouvé qui renvoient la date et l'heure d'enregistrement d'un fichier.
Merci de vos réponses.
A + Wink  Wink  Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5963
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 13:55

Bonjour Big

Tu peux utiliser un script en VBS comme ceci

Remarque : adapter le nom et le chemin du fichier en ligne 2

Code:

Set oFSO = CreateObject("Scripting.FileSystemObject")
stFichier = "c:\users\acer\desktop\test.txt"
If oFSO.FileExists(stFichier) Then
   Set oFl = oFSO.GetFile(stFichier)
   Hor = oFl.DateLastModified
   WScript.Echo Hor
End if

Enregistre ce code sous date_modif_fich.vbs ou sous un autre nom mais avec .VBS comme extension puis double-clique sur ce fichier pour l'exécuter.

Il affichera quelque chose comme ceci :




Si ça répond à ton attente, tu peux l'adapter pour l'intégrer dans un code Panoramic.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
papydall

avatar

Nombre de messages : 5963
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 14:21

La commande DIR de l’invite de commande est souvent très utile pour consulter les fichiers.

Syntaxe:
 

Exemple :

Code:

dir C:\Users\acer\Desktop\Pano_Editeur\28i12\*.bas /O:D /T:A > C:\Users\acer\Desktop\Pano_Editeur\28i12\Liste.txt


Crée un fichier contenant la liste triée par date d’accès aux fichiers .bas
Il faut bien sûr adapter les chemins
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
bignono

avatar

Nombre de messages : 1127
Age : 61
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 17:22

Merci de tes réponses Papydall.  Smile
Mais j'aurais espéré avoir quelque chose en panoramic pur. Je trouve que c'est une fonction qui manque à panoramic. Une fonction qui renvoie la date et l'heure d'enregistrement d'un fichier. On peut ouvrir un fichier, modifier, renommer, supprimer, déplacer, cacher, archiver, mettre en lecture seule, etc... un fichier, mais on ne peux pas lire sa date de création et son heure d'enregistrement.
Même les fichiers ont une date de création, mais comporte aussi la date de dernière modification ou du dernier accès à celui-ci. C'est pourtant une fonction essentielle pour rechercher dans l'ordinateur par exemple les derniers fichiers qui ont été modifiés ou créés par un logiciel, ne serait-ce que pour en proposer les plus récents à son ouverture par exemple. Ou bien rechercher la date de prise d'une photo dans un fichier image, etc... Plein d'autres applications peuvent découler de cette fonction.
Pour ma part, je vais essayer les solutions de papydall, mais ce sera fastidieux à mettre en place dans un programme qui doit examiner rapidement des dizaines de fichiers dans plusieurs dossiers et sous dossiers.
Au fait, même les dossiers ont une date de création. Là aussi une fonction serait la bienvenue pour en extraire la date de création.
Merci encore
A + Wink Wink Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5963
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 17:55

Je suis tout à fait d'accord avec toi, Bignono.

Jette un oeil sur ce post; peut-être trouveras-tu quelque chose d'utile.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
bignono

avatar

Nombre de messages : 1127
Age : 61
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 18:53

Merci Papydall. C'est pas tout à fait ce que je recherche à faire, mais ça va m'aider quand même.
Merci
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 11088
Age : 69
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Jeu 9 Nov 2017 - 22:21

Avec KGF.dll, tu peux faire ceci:
Code:
dim res%,file$,dat$
fiile$ = "C:\Documents and settings\test\mon_fichier.dat"
dat$ = string$(255," ")
res% = dll_call2("GetFileDate",adr(file$),adr(dat$))
message "creation date: "+trim$(dat$)

Si cela t'intéresse, je peux ajouter la fonction GetFimeTime...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

Nombre de messages : 5963
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 0:38

Comment obtenir des informations sur un fichier en VBS

Les propriétés de l'objet File:
 


Script:
 

L'exécution de ce script VBS donne quelque chose

Comme ceci:
 
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
bignono

avatar

Nombre de messages : 1127
Age : 61
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 6:57

Bonjour Klaus Very Happy
Oui ça m'intéresse GetFileTime
Merci d'avance. Wink Wink Wink

Oui Paydall, ton dernier script vbs me parait très bien! Je vais voir ce que je peux en faire dans mon programme.
A bientôt
Wink Wink Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 11088
Age : 69
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 8:29

Ben... c'est déjà fait, en réalité. Contrairement à ce qie je pensais, la fonction retourne date ET heure. Je vais changer cela dans la doc. Voici le code pour essayer:
Code:
dim res%, v$, f$

v$ = string$(255," ")

dll_on "KGF.dll"

open_dialog 1

f$ = file_name$(1)
if f$="_" then terminate

res% = dll_call2("GetFileDate",adr(f$),adr(v$))
message trim$(v$)

end

Le résultat contient deuc chaînes de caractères séparées par un espace. La première est la date, la seconde est l'heure.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
bignono

avatar

Nombre de messages : 1127
Age : 61
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 10:27

Oui merci Klaus, c'est parfait.
Mais serait il possible d'avoir 1 ou plusieurs fonctions permettant d'avoir les renseignements sur les propriétés d'un fichier comme dans le dernier script VBS de Papydall.
Ce qui m'importe d'avoir, c'est la date et l'heure de création, la date et l'heure du dernier accès au fichier, la date et l'heure des dernières modifications au fichier, le chemin complet du fichier et éventuellement ses attributs.
Merci de ta réponse Klaus.
A+ Wink Wink Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5963
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 15:02

Une légère modification de mon script

Script:
 


Résultat:
 
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Klaus

avatar

Nombre de messages : 11088
Age : 69
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   Ven 10 Nov 2017 - 22:53

La fonction
Code:
res% = dll_call1("GetFileAttributes",adr(fichier$))
retourne les attributs du fichier, avec res% contenant:
Code:
32 bits d'attributs du fichier. La valeur est le OU logique des attributs suivants:
Hexa-décimal:
faReadOnly        $00000001        Fichiers en lecture seule
faHidden        $00000002        Fichiers cachés
faSysFile        $00000004        Fichiers système
faVolumeID        $00000008        Fichiers d'identification de volume
faDirectory        $00000010        Fichiers répertoire
faArchive        $00000020        Fichiers archive
faSymLink        $00000040        Fichiers archive

Décimal:
faReadOnly        : 1 : Read-only files
faHidden        : 2 : Hidden files
faSysFile        : 4 : System files
faVolumeID        : 8 : Volume ID files
faDirectory        : 16 : Directory files
faArchive        : 32 : Archive files
faSymLink        : 64 : Symbolic link
Ceci est extrait de la doc. Pour les autres informations (date et heure de modification), il faudra réaliser une nouvelle petite fonction. Je vais voir ça.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Contenu sponsorisé




MessageSujet: Re: comment accèder à l'heure et à la date d'un fichier   

Revenir en haut Aller en bas
 
comment accèder à l'heure et à la date d'un fichier
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Quelqu'un sait il se servir de GanttProject ?
» Comment afficher toujours la bonne heure sans boucle infini?
» comment régler l'heure et supprimer la sonnerie réveil ?
» [Laddy]comment se protéger des antivirus menteurs ?
» Aide pour récupération carte europe à partir du GPS

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: A l'aide!-
Sauter vers: