Very basic ListBox Question 1

[mookie0001]

I know there is probably a very simple solution to this, but I am relatively inexperienced in VB so bear with me...

I am looking to list all of the folders (not any files) at a given location in a list box. I do not want to use any type of built-in directory controls because I wish to restrict the output to only the folders of a given path with no browsing ability. What would be the best way of implementing this? Thanks.

 

[JustinEzequiel]

cannot say if this is the 'best' way ...

Dim sBase As String
Dim oFSO As Object
Dim oBase As Object
Dim oSub As Object

sBase = "C:\windows"

Set oFSO = CreateObject("scripting.filesystemobject")
Set oBase = oFSO.getfolder(sBase)
For Each oSub In oBase.subfolders
  List1.AddItem oSub.Name
Next oSub
Set oBase = Nothing
Set oFSO = Nothing

 

[mookie0001]

This was exactly what I needed. Thanks!

-Chris