[R] test si repertoire ou fichier

[koa0]

Bonjour à tous,
1\ J'aimerais savoir si il existe une fonction dans Autoit qui permet de tester si c'est un fichier ou si c'est un répertoire.

2\ Question en plus:
J'ai une arbo
c:\rep1\rep2\rep3\......
J'aimerais savoir comment on peut récupérer un fichier .ext qui peut être dans n'importe lequel des répertoires?

Merci d'avance

[zeshrek]

Tout d'abord enleve les marqueurs [ b ] et [ /b ] du titre, ce n'est pas conforme
1/ il ya plein de scripts qui font une exploration des répertoires et sous répertoires, qui différencient fichiers et dossiers. Y a plus qu'a chercher un peu plutot que demander qu'on le fasse pour toi...
2/ Comme je suis sympa malgré tout, je te donne un début de piste : FileExists()

[TommyDDR]

Voici une fonction qui test si le paramètre est un fichier où un répertoire :

► Afficher le texte

Code : Tout sélectionner

Func _IsFile($Fichier)
    Local $Retour = False
    Local $Attrib
    If(FileExists($Fichier)) Then
        $Attrib = FileGetAttrib($Fichier)
        If(Not(StringInStr($Attrib, "D"))) Then
            $Retour = True
        EndIf
    Else
        SetError(1)
    EndIf
    Return $Retour
EndFunc

[reverpi]

Regarde du coté de _fileListToArray.
Il existe des UDf qui complète cette fonction pour encore plus de possibilité. Je crois si mes souvenir sont bon c'est _fileListToArrayNT.

[koa0]

Merci tout d'abord pour vos réponses si rapide. La question étais si il y avait une fonction interne qui faisait ça. Ensuite j'avais effectivement comme piste _FileListToArrayNT. Je vais l'explorer en profondeur.
Je vous tiens au courant
A bientôt

[koa0]

Merci à vous tous. Grâce à la fonction _isfile(....) j'ai ce qu'il me faut.
Bonne fin de journée

[TommyDDR]

Mais de rien, ce fut un plaisir.

Pensez à remplacer [..] par [R] dans votre 1er message.

[Tlem]

Même chose que TommyDDR, mais sur une autre approche :

Code : Tout sélectionner

Func _IsFile($Fichier)
    Local $search = FileFindFirstFile($Fichier)

    If $search = -1 Then
        Return SetError(1)
    EndIf

    $file = FileFindNextFile($search)
    If @extended = 0 Then
        Return True
    Else
        Return False
    EndIf

    FileClose($search)
EndFunc

[matwachich]

Pourquoi se casser la tête pour _isFile
un simple DirGetSize nous donne la réponse!

Code : Tout sélectionner

Fun _IsFile($sPath) ; Retourne 1 pour fichier et 0 pour dossier
Local $ret = DirGetSize($sPath)
If $ret = -1 Then
Return 1
Else
Return 0
Endif
EndFunc

[Tlem]

C'est une solution, mais en cas de répertoire de forte taille, le résultat risque de ce faire attendre.

[TommyDDR]

En terme de "Casser la tête" je pense avoir déjà vu pire.
Merci Tlem pour l'utilisation du @extended avec la méthode FileFindNextFile
(-> Lira plus attentivement l'aide AutoIt ^^)


PS : Où est passé le réel Tlem ???

Le vrai Tlem n'aurais jamais laisser passer un "ce faire" !!

Ou alors vous devez être débordé

[matwachich]

En effet, j'avait pas pensé à ça! merci

[Tlem]

Le vrai Tlem n'aurais jamais laisser passer un "ce faire" !!

Ou alors vous devez être débordé

Effectivement, je bâcle un peu mes messages car je suis en stage de formation à l'étranger et que la connexion internet est lente et pas gratuite ...

Mais je viens de reprendre pour 4 heures de connexion, donc ça devrait allé mieux.