In deep Schtum

[jonbondex]

I need a routine that will output the current drives present on a computer. I need the output to display, C:, D: etc.

[Ishamel]

If its just the available drive letters you are after, you could use an invisible Drive control with this code.

'Loop through all available drives
For iLoop = 0 To Drive1.ListCount - 1
    'add the drive letter to a list control
    List1.AddItem Left(Drive1.List(iLoop), 2)
Next