recup Proprietes fichier

Salut
Voila je voudrais recuperer toutes les propriete d'un fichier pour faire des recherches à l'interieur de repertoire

C'est a dire je voudrais recuperer les infos que l'on peut rentrer lorsque l'on fait un clique droit sur un fichier et que l'on va dans l'onglet resume

tout cela avec VB6 et W2k

Merci d'avance

Salut,

Utilise l'objet File (en incluant la référence Microsoft Scripting Runtime à ton projet)

Dim fso As Scripting.FileSystemObject
Dim Fichier As Scripting.File

Set fso = New Scripting.FileSystemObject
Set Fichier = fso.GetFile("c:\toto.txt")

'exemples d'infos (y'en a d'autres)
msgbox Fichier.DateLastModified
msgbox Fichier.DateCreated
msgbox Fichier.size
msgbox Fichier.attributes.Hidden


-- stabe --