by Thomas Sturm (11 Submissions)
Category: Files/File Controls/Input/Output
Compatability: Visual Basic 3.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: 
(16 Votes)
Correct Reference to Files in App.Path.
For Newbies and for all who get Errors and don't know why.
If you think this deserves a Vote, then do so, if not, then don't. I just wanted to explain a common error source !
VBcodersAfter seeing so many wrong codes on this, I decided to clear things up a bit.
If you want to refer to a file located in app.path, nearly everyone writes
SomeVar$ = App.Path & "\SomeFile.txt"
What if the Program is located in the Root-Directory ? It gives a Run-Time Error because of the "\\", since App.Path returns "C:\" for example, then appends "\SomeFile.txt", which results in "C:\\SomeFile.txt".
ONE correct way would be :
Dim SourceFile As String
If Right$(App.Path, 1) = "\" Then
SourceFile = App.Path & "SomeFile.txt"
Else
SourceFile = App.Path & "\SomeFile.txt"
End If
This is the way I use, if there are any other, please put it in the comments.
