How do i get drive letter for a running form

Question

I need to get the letter of the drive my form is running from. The reason why i need this, is because i'll be copying a text file (from the removable drive in which the form will be) to the computer. Is it even possible? If yes could someone help me with the code?

NOTE I'm using Visual Basic 6

The `CurDir$()` function returns the current directory, the start of which is the current drive. — Ňɏssa Pøngjǣrdenlarp, Dec 17 '14 at 19:12

score 1 · Accepted Answer · answered Dec 20 '14 at 12:52

1

Dim disk_letter As String
disk_letter = Left(CurDir$(), 1)

That was all.

answered Dec 20 '14 at 12:52

KirChhOff

21
5

score 0 · Answer 2 · edited Sep 24 '21 at 18:07

0

This should return you the drive letter that you are running the exe from.

Left$(App.Path, InStr(App.Path, ":"))

edited Sep 24 '21 at 18:07

Jeremy Caney

7,102
69
48
77

answered Dec 18 '14 at 16:25

lardymonkey

728
1
16
34

Amarildo Lena · Answer 3 · 2021-09-24T15:32:37.157

0

I think this is the best approach considering the drive letter can have more than one letter.

Dim driveLetter As String
driveLetter = Left$(App.path, InStr(App.path, ":") - 1)

edited Sep 24 '21 at 15:32

answered Sep 24 '21 at 15:23

Amarildo Lena

66
3

1

This is nearly the same as [@lardymonkey's answer](https://stackoverflow.com/a/27551241/3025856) from seven years ago, except that you strip the outer slash. I don't believe that is strictly necessary here? But, if it is, then I'd call out that change. Otherwise, in the future, it makes more sense to just upvote on the existing answer—and optionally leave a comment if you think it can be improved. (You don't have enough reputation to do either at the moment; but in the meanwhile you should be wary of leaving largely duplicate answers.) – Jeremy Caney Sep 24 '21 at 18:11

How do i get drive letter for a running form

3 Answers3