Find out if a file exists

[Helen1greece]

Is there a way to find out if a file which I know its name and its path exists?
For example...
I want to know if the file: "blah-blah.txt" is in the folder: "c:\My files"

 

[vb5prgrmr]

try something like....
[tt]
Public Function DoesFileExist(PathNameOfFile As String) As Boolean
If Dir(PathNameOfFile)<> vbNullString Then DoesFileExist = True
End Function
[/tt]

you can test it like so...
[tt]
Option Explicit

Private Sub Form_Load()

MsgBox DoesFileExist(&quot;Your Path File Name Here&quot

End Sub

Public Function DoesFileExist(PathNameOfFile As String) As Boolean
If Dir(PathNameOfFile) <> vbNullString Then DoesFileExist = True
End Function
[/tt]


Good Luck

 

[Helen1greece]

Thank you!

 

[vikram28]

You can also use the FileSystemObject and then check for the file existence using its fileexists method

 

[Swi]

faq222-3657

Swi