Problème avec commande Dir

Question

J'ai 1 probleme la commande dir ne fonctionne pas
je m'explique j'ai ecrit ce code:
if Dir("c:\source\div & "bshn6020cd.dat") = "bshn6020cd.dat" then
serie de taches
End if

Comme ci-dessus ça fonctionne car il trouve ce fichier et donc les tacjes s'executent
Or j'ai de nombreux fichiers et ce qui m'interesse
c'est de detecter les fichiers commançant par bshn6020cd.dat" (une trentaine) des lors qu'un fichier contiendra 6020 alors les taces doivent s'executer
donc j'ai ecrit ces codes: aucun des deux ne fonctionne!!!
if Dir("c:\source\div & "*.6020cd.dat") = "*.6020cd.dat" then
serie de taches
End if
if Dir("c:\source\div & "????6020cd.dat") = "????6020cd.dat" then
serie de taches
End if

Les caracteres generiques ne fonctionnent pas or j'en ai absolumment besoin vu le nombre important de fichiers 6020 si quelqu'un peut m'aider je l'en remercie d'avance
@+

TotoBest · Answer

tu fais un dir général, c-a-d
strTemp = dir("c:\source\div")
do while strTemp<>""
'dir te renvoie les noms de fichiers
'donc maintenant tu peux faire des if
if instr(1,strTemp,"6020cd.dat) then
'serie de taches
end if
dir 'sans rien
loop

Problème avec commande Dir

1 réponse

Discussions similaires