File exist

[cyberwolf14]

How do I now a file exist??

for example I wan t check if the file "c:\test.dat" exist if I start my project
How do I do that??

 

[woyler]

If FileExists("c:\test.dat&quot Then
'file is here
else
'file does not exist
end if


Public Function FileExists(strPath As String) As Integer
On Error GoTo ERROR_FileExists
FileExists = Not (Dir(strPath) = "&quot
Exit Function

ERROR_FileExists:

End Function

 

[argusy]

Simpler:



If Dir("C:\test.dat&quot = "" then 'doesn't exist
do something
Else 'does exist
do something else
Endif