Carte du site
 Remerciements
 Netiquette
 Bugs
 Tables
 Requêtes
 Formulaires
 États (rapports)
 Modules
 APIs
 Chaînes
 Date/Time
 Général
 Ressources
 Téléchargeables

 Termes d'usage

Modules: Vérifier si un fichier ou un répertoire existe

Author(s)
Dev Ashish

Vérifier si un fichier ou un répertoire existe.

(Q)    Y-a-t-il une façon simple de vérifier l'existence d'un fichier ou d'un répertoire?

(A)    Bien sûr, utiliser la fonction Dir.

(Merci à Andy Baron pour la correction)

'***************** Code Start *******************
Function fIsFileDIR(stPath As String, _
                    Optional lngType As Long) _
                    As Integer
'Utiliser le chemin complet pour  stPath
'Pour vérifier un fichier
'   ?fIsFileDIR("c:\winnt\win.ini")
'Pour vérifier un répertoire
'   ?fIsFileDir("c:\msoffice",vbdirectory)
'
    On Error Resume Next
    fIsFileDIR = Len(Dir(stPath, lngType)) > 0
End Function
'***************** Code End *********************

© 1998-2001, Dev Ashish, All rights reserved. Optimized for Microsoft Internet Explorer