[access03] Reconnaitre un Fichier avec du VBA

Milyshyn Messages postés 38 Statut Membre -  
Milyshyn Messages postés 38 Statut Membre -
Bonjour,

Je souhaiterais avoir une synthaxe simple afin de testerle type des élèments pour vois s'ils sont soit des repertoires soit des fichier (.doc, .txt, .xls, .mdb, etc.)

Par exemple
if NomFichier =( fichier .txt) then
Instructions
Elseif NomFichier = Répertoire
Instructions
End if

Merci

5 réponses

  1. CapitainCo Messages postés 127 Statut Membre 61
     
    une solution possible
    if left(right(NomFichier;4);1) ="." then
    Fichier
    Else
    Répertoire
    End if
    1
  2. Milyshyn Messages postés 38 Statut Membre 3
     
    Merci beaucoup mais est ce que cela me permet de savoir si le code retourne bien un fichier ou un repertoire ? En fait mon soucis c'est que mon application ouvre le dossier mais quelque fois certains dossier comportent le même nom que des fichiers et cela me génere des erreurs ....
    0
  3. CapitainCo Messages postés 127 Statut Membre 61
     
    Cela ne marche pas si un repertoire a le meme nom qu'un fichier
    0
  4. CapitainCo Messages postés 127 Statut Membre 61
     
    renseinge toi sur la fonction dir() pour faire cela
    Dir[(pathname[, attributes])]
    attribut -> vbDirectory pour un dossier
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Milyshyn Messages postés 38 Statut Membre 3
     
    Ok et comment créer un structure if que me permetterait de savoir s'il s'agit d'un fichier ou non ... ?
    0