|
Kijken of een file bestaat |
|
|
|
|
Deze functie bekijkt of een bepaald bestandbestaat. Zo ja, dan geeft de functie: WAAR, indien het bestand niet aanwezig is dan: ONWAAR Public Function ChkFileExists(strFileName As String) As Boolean On Error GoTo nofile Open strFileName For Binary Access Read As #1 Close #1 ChkFileExists = True Exit Function nofile: ChkFileExists = False End Function
|