Getting the boot drive letter with VBA 2

[GVF]

I want to determine the boot drive so I can change drives and get to the "...Documents and Settings\All Users\Application Data\Microsoft" folder on any machine.

Is there a keyword in VBA (like %BootDrive%) that will point me to the correct drive letter? Or is there another way to accomplish this?

Thanks in Advance.

 

[combo]

Use Environ function with number (returns argument name and value) or with named argument (only value is returned), test for the most convinient argument:
Environ("ALLUSERSPROFILE")
or:
Environ(1)

combo

 

[TonyJollans]

Hi GVF,

combo's solution should help you, but please be aware that the Documents and Settings folder is not necessarily on the boot drive.

Enjoy,
Tony

--------------------------------------------------------------------------------------------
We want to help you; help us to do it by reading this: Before you ask a question.
Excel VBA Training and more Help at VBAExpress[

 

[shetlandbob]

You can also get Special Folders directly, e.g.

Sub GetSpecialFolder()
    Set wShell = CreateObject("WScript.Shell")
    SpecialFolderPath = wShell.SpecialFolders(5)
    Set wShell = Nothing
End Sub

Robert Cumming

http://www.consultantengineer.co.uk

 

[GVF]

Thanks for the code clips. There are exactly what I was looking for. Stars to both.

Greg