---Soumis par 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ût, 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 *********************