Eh ben si...Tlem a écrit :
Rhooo, t'exagère quand même. Il est pas si différent que ça mon code ...Mikell a écrit :mais radicalement différent
) Je ne voit pas ou tu as vu un SplashText() dans le code ou quoi que ce soit qui pourrait bloquer. J'ai testé mon code sur un PC dont le lecteur de CD est vide, sans que cela provoque une erreur. Mais bon, ceci dit tu n'a pas tord, il est plus raisonnable d'apprendre les bonnes manières dès le départ et donc de vérifier que le lecteur soit prêt et lisible avant de faire quoi que ce soit. ^^mikell a écrit :Eh ben si...
Un SplashText qui dit "scanning drive 8" c'est pas top
Et le code qui s'exécute sur un lecteur CD vide ça envoie un message d'erreur Windows qui bloque le script
Heuuu ouais, mais bonjour la durée de recherche si il y à plusieurs chaines à rechercher ...Mikell a écrit :M'enfin bon alors je mets celui-là, moins technique que le tien mais qui correspond mieux à sa démarche initiale (et qui marche, aussi
Ben je suis aussi sous XP SP3 et mon code ne provoque pas d'erreur. Est-ce que tu as essayé le code que j'ai proposé sur ton PC ?mikell a écrit :sur mon XP essayer de lire un lecteur CD vide provoque un message d'erreur Windows, c'est comme ça ^^
, voici le code modifié et amélioré en prévoyant la future question ... . 
Ah bon ? Et pourquoi ça ?timmalos a écrit :Je n'ai pas testé mais si vous mettez un filtre qui oblige le nom à avoir un .extension c'est normal que vous n'ayez pas de dossiers remontés.
Code : Tout sélectionner
#Include <Array.au3>
#Include <_FileListToArrayEx_v3.au3>
$array = _FileListToArrayEx(@desktopdir & "\", "*test*", 2) ; <= marche
$array = _FileListToArrayEx(@desktopdir & "\", "*test*.*", 2) ; <= marche pô
_ArrayDisplay($array)Code : Tout sélectionner
; $sSDirFTMP = $sFilter
$sSDirFTMP = "*test*.*"
$res = StringRegExpReplace(StringRegExpReplace(StringRegExpReplace(StringRegExpReplace(StringRegExpReplace(StringRegExpReplace("|" & $sSDirFTMP & "|", '\|\h*\|[\|\h]*', "\|"), '[\^\$\(\)\+\[\]\{\}\,\.\=]', "\\$0"), "\|([^\*])", "\|^$1"), "([^\*])\|", "$1\$\|"), '\*', ".*"), '^\||\|$', "")
msgbox(0,"", $res) ; résultat = .*test.*[color=#FF0000]\.[/color].*
Je n'ai pas parlé de bug (avec un filtre correct la fonction marche), j'ai simplement dit que la fonction ne marchait pas avec cette manière d'écrire le filtre et je pense que mon analyse de la cause est correctejchd a écrit :Ah, donc d'après toi c'est dû à un bug dans la fonction utilisée.