GetAttr renvoie 8192 et 8124Résolu

Question

bonjour

j'utilise la fonction getAttr() de vb

voila mon code



Private Sub File1_Click()

'attributs.Caption = attr(Dir1.Path & "" & File1.FileName)

MsgBox GetAttr(Dir1.Path & "" & File1.FileName)

End Sub



Private Function attr(fichier) As String

Select Case GetAttr(fichier)

    Case 0

        attr = "Normal"

    Case 4

        attr = "Systeme"

    Case 32

        attr = "Archive"

    Case 36

        attr = "Archive et syteme"

    Case 2

        attr = "Cach&#233;"

    Case 6

        attr = "Cach&#233; et systeme"

    Case 34

        attr = "Cach&#233; et archive"

    Case 38

        attr = "Cach&#233;, Archive et systeme"

    Case 1

        attr = "Lecture seule"

    Case 5

        attr = "Lecture seule et systeme"

    Case 33

        attr = "Lecture seule et archive"

    Case 37

        attr = "Lecture seule, archive et systeme"

    Case 3

        attr = "Lecture seule et cach&#233;"

    Case 7

        attr = "Lecture seule, cach&#233; et systeme"

    Case 35

        attr = "Lecture seule, cach&#233; et archive"

    Case 39

        attr = "Lecture seule, cach&#233;, archive et systeme"

End Select

End Function


et donc la msgbox que j'ai mise car &#231;a a buigu&#233; me renvoie 8192, jamais vu &#231;a moi !!

si vous savez, merci d'avance !!




Gagou9

cs_gagou9 · Accepted Answer

h&#233;

vu que mon prog n'avait pour but que d'afficher les attributs archive,
cach&#233;, systeme et lecture seule, bah j'ai trouv&#233; comment le faire
macher sur winXP, voici le code :

(recopi&#233; a l'arrache car j'ai pas le code sous les yeux desol&#233; ya petetre des bugs !)

J'utilise un DirBox, un FileBox, et un Label.



lblAttr.Caption = attr(Dir1.Path & "" & File1.FileName)

Private Function attr(fichier As String) As Integer

    Dim attribut As Integer

    attribut = GetAttr(fichier)

    ' ici j'ai mis un test de OS pour booster le code    

    If attribut >16384 Then  attribut attribut - 16384

    If attribut >8192 Then attribut attribut - 8192

    If attribut >4096 Then attribut attribut - 4096

    If attribut >2048 Then attribut attribut - 2048

    If attribut >1024 Then attribut attribut - 1024

    If attribut >512 Then attribut attribut - 512

    If attribut >256 Then attribut attribut - 256

    If attribut >128 Then attribut attribut - 128

    If attribut >64 Then attribut attribut - 64



    attr = attribut

End Function





Voila !

A+ tout le monde






Gagou9
Une question a laquelle j'arrive pas a repondre: quand est-ce-que GetAttr renvoie 4096, 1024, ou 512 /forum.v2.aspx?ID=500593

steb359842 · Answer

Dans MSDN la constente 8192 repr&#233;sente Un tableau dans les types...
et pour 8124, il ne trouve rien...

effectivement c'est tr&#232;s bizzard qu'il te revnvoie ces valeurs... 


*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*&#176;*
Marmote Joyeuse

cs_gagou9 · Answer

je vais chercher...

merci quand meme !

Gagou9

Gobillot · Answer

&H0040    Alias

&H0080    Shareable

&H0100    Temporary

&H0200    ?

&H0400    ?

&H0800    Compressed

&H1000    ?

&H2000    Index

Daniel

cs_gagou9 · Answer

oula sa ve diure koi ?

merci
Gagou9

Gobillot · Answer

&#231;a c'est les attributs.

je suis pas s&#251;r pour Alias, &#231;a doit &#234;tre 1024 alors que vbAlias = 64  bizarre ?







donc 8192 c'est l'attribut index

et 8124 serait = 4096 + 2048 + 1024 + 512 + 256 + 128 + 32 + 16 + 8 + 4

&#231;a correspond pas &#224; grand chose

16 pour directory et 8 pour Label, &#231;a va pas ensemble  ????



8224 serait mieux  (8192 + 32)  donc Archive et Index

Daniel

cs_gagou9 · Answer

Salut !


d'accord il est possible que ce ne soit pas 8124.


mais &#231;'est quoi tous ces attributs ??

&H0040    Alias                => j'ai pas bien compris ce que c'est
&H0080    Shareable         => fichier partag&#233; je suppose
&H0100    Temporary         => comme son nom l'indique
&H0200    ?                     =>hum...
&H0400    ?
&H0800    Compressed    => zip
&H1000    ?
&H2000    Index               => et &#231;a c'est quoi ..N????

merci d'avance
Gagou9

Gobillot · Answer

ce sont les attributs &#233;tendus (EA) utilis&#233;s pour le syst&#232;me de fichiers et r&#233;pertoires NTFS

d'apr&#232;s ce que j'ai vu pour  vbAlias (= 64) c'est utilis&#233; uniquement par Macintosh



sinon pour le reste, impossible de trouver des informations claires et pr&#233;cises:



&H0400 = 1024    Alias     >>   attribut de lien   ????
&H2000 = 8192    Index    >>   attribut Index     ????



exemple:

syst&#232;me volume information  =  8214



soit    8192 --> Index

          16 -->  r&#233;pertoire

           4 --> Syst&#232;me

           2 --> lecture seule 



Daniel

cs_gagou9 · Answer

bah dans les constantes vb et dans msdn,  lecture seule vaut 1, alors je comprend pas la !!!!

Gagou9

Gobillot · Answer

t'as raison je me suis tromp&#233;, tap&#233; trop vite !









vbArchive     -->  32  Archiv&#233;

vbDirectory   -->  16  r&#233;pertoire

vbVolume      -->   8  Label

vbSystem      -->   4  syst&#232;me

vbHidden      -->   2  cach&#233;

vbReadOnly    -->   1  Lecture seule


Daniel

cs_gagou9 · Answer

effectivement, &#231;a renvoie 8224 et seulement sur mes volumes NTFS.

mais ou puis trouver les valeurs renvoy&#233;es par GetAttr() pour NTFS ?

car j'ai vb6 et donc msdn qui correspond, donc pas de NTFS......

&#231;a me fais un peu chier tout &#231;a......

je pense que index c'est les fichier d'indexation de windows XP mais je suis pas sur !!!

Gagou9

cs_gagou9 · Answer

ah ok !!

&#231;a explique tou !!

merci pour ces valeurs !


Gagou9

cs_gagou9 · Answer

euh, tu as tout mis la ?

donc comment je fais pour avoir 8192 et 8224 ?

parce que la le max estr carrement inferieur !!!



merci quand meme !


Gagou9

cs_Alain Proviste · Answer

tu pourrais nous pr&#233;ciser le contexte ? sur quels fichiers tu utilises getattr ?

cs_gagou9 · Answer

bah en fai c'est un explorateur que je fais.

donc on peu cliquer sur n'importe quel fichier, et &#231;a affiche des infos sur ce fichier selection&#233;

c un tutoriel pour un copain !

Gagou9

Gobillot · Answer

je r&#233;sume

si quelqu'un a des renseignements suppl&#233;mentaires, je suis preneur.







8192  -->  Index

4096  -->  ? 

2048  -->  Compress&#233;

1024  -->  Alias

 512  -->  ?

 256  -->  Temporaire

 128  -->  Partageable

  64  -->  Alias (pour Macintosh exclusivement)
  32  -->  Archiv&#233;
  16  -->  r&#233;pertoire
   8  -->  Label volume
   4  -->  syst&#232;me
   2  -->  cach&#233;
   1  -->  Lecture seule



Daniel

cs_sitemo · Answer

gagou ta fini ton programme?

MK

cs_gagou9 · Answer

bah presque fini pourkoi ?

euh Gobillot ta trouv&#233; &#231;a ou ?

parce que je veu bien moi



8192  -->  Index  => c koi ?
 4096  -->  ? 
 2048  -->  Compress&#233;  => c'est une archive zip ?
 1024  -->  Alias      => encore un inconu !
  512  -->  ?
  256  -->  Temporaire => chui pas sur mais bon c explicite je croi !
  128  -->  Partageable
   64  -->  Alias (pour Macintosh exclusivement)
  32  -->  Archiv&#233;        => la difference en &#231;a et compr&#233;ss&#233; ??

  16  -->  r&#233;pertoire

   8  -->  Label volume  => c koi ?

   4  -->  syst&#232;me

   2  -->  cach&#233;

   1  -->  Lecture seule



merci beaucoup !



Gagou9

cs_sitemo · Answer

envoi ton programme stp comme ca on pourra le regarde ensemble et mieux t'aider merci


MK

Gobillot · Answer

Label Volume

c'est pas un r&#233;pertoire, c'est pas un fichier,

c'est le nom du Volume celui qu'on retrouve et qu'on peut modifier sous DOS en tapant Label.

en principe seulement dans le r&#233;pertoire racine

utilis&#233; aussi pour les noms longs  (attribut 15 = 8 + 4 + 2 + 1) mais totalement inaccessible &#224; l'utilisateur.


Compress&#233;

on retrouve &#231;a dans les r&#233;pertoires syst&#232;me volume information,

c'est la compression On The Fly, les fichiers sont compress&#233;s et d&#233;compress&#233;s &#224; la vol&#233;e et c'est transparent pour l'utilisateur



Archiv&#233;

&#231;a permet de g&#233;rer les archivages

les fichiers ont d&#233;j&#224; &#233;t&#233; copi&#233;s



temporaire

comme les fichiers .tmp par exemple



le reste je sais pas


Daniel

GetAttr renvoie 8192 et 8124

37 réponses

Discussions similaires