Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 154
  • Last Modified:

Find Files

I want to check if a files is on my pc in a function. Please help me
0
ceb102298
Asked:
ceb102298
1 Solution
 
watyCommented:
Public Function FileExist(ByVal szFile As String) As Boolean
   ' *** Verify if a file Exist ***

   Dim szResults           As String
   
   On Error GoTo Not_FileExist
   
   szResults = Dir$(szFile)
   If (szResults = "") Then
       FileExist = False
   Else
       FileExist = True
   End If

   Exit Function

Not_FileExist:
   FileExist = False

End Function
 
0
 
ceb102298Author Commented:
Thanks
0

Featured Post

Receive 1:1 tech help

Solve your biggest tech problems alongside global tech experts with 1:1 help.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now