Ho do I retrieve the path of my current working directory?

[fireoliver]

I have this VB exe file in any given folder. When I execute it, I want for it to store the path in which it is saved.

And also, I only want the path... I do NOT want the path + filename.

I tried using CurDir, but that only returns the default path for Visual Basic.

Example:


Private Sub cmdCurrentPath_Click()

MsgBox "The current path is: " + CurDir

End Sub

The message box will always say : C:\VC6\VB98

Thanks.

[ae_jester]

app.path returns the path where the exe is running

msgbox app.path

[jbart]

I will jump out of the way of the rocks that will be thrown my way, but one way to do it is with the FileSystemObject. Add the Microsoft Scripting Runtime to your project and use the following code.

Private Sub Command1_Click()
    Dim fso As FileSystemObject
    Set fso = New FileSystemObject
    
    MsgBox fso.GetParentFolderName(App.Path)
    Set fso = Nothing
End Sub

[vbgladiator]

Why do people hate the FSO so much? Is it because of the reference?

[jbart]

Yes. "Some" programmers take offense to using FSO because it involves distributing an additional dll. But they do not hesitate to recommend using other controls that involve using dll's that are a lot larger than scrrun.dll.

Go figure.

[ae_jester]

Why use FSO when u can just use app.Path???????????

IS there any thing wrong with app.path? Please let me know!

[jbart]

The problem with app.path is that it does not use FSO .

My fault, my fault. App.Path is a beautiful solution. When I answered the question I was working on a project where the folder name and the exe name were the same, so I should have paid attention to what I was doing. I mistakenly thought that app.path was including the exe name too.

Sorry for the confusion. Besides, it is a Friday and I am just waiting to get out of here.