verifier qu'un fichier existe bien ...

Bonjour,
je voudrais savoir comment faire pour verifier qu'un fichier dont on connai le nom et l'emplacement est bien present sur le disque dur
Merci d'avance !

Public Function FileExists(filename As String) As Boolean
FileExists = (Dir(filename, vbNormal Or vbReadOnly Or vbHidden Or vbSystem Or vbArchive) <> "")
End Function


Private Sub Command1_Click()

If FileExists("C:\Config.sys") Then
MsgBox "ok"
Else
MsgBox "nok"
End If

end sub



-------------------------------
Réponse au message :
-------------------------------

> Bonjour,
> je voudrais savoir comment faire pour verifier qu'un fichier dont on connai le nom et l'emplacement est bien present sur le disque dur
> Merci d'avance !

Bonjour

il te suffit de lire quelques messages en amont dans le forum feignant...avec FSO.FileExist

Sinon tu peus aussi juste utiliser un dir

if Dir(MonFichier) <> "" then msgbox "il existe" end if

a+

,.~*`'^~.(^. .^),.~^'`*~.


-------------------------------
Réponse au message :
-------------------------------

> Bonjour,
> je voudrais savoir comment faire pour verifier qu'un fichier dont on connai le nom et l'emplacement est bien present sur le disque dur
> Merci d'avance !

ok merci a vous !!
c'est vrai que la question a deja été posée sur le forum, je viens de m'en rendre compte, mais chui un ptit nouveau et en vb et sur ce site, c'est pour ca, j'ai pas encore tou les reflexes ! :)
merci @+