' Listing 1: Code That Uses the NameSpace Method

Set sa = CreateObject("Shell.Application")
Set myFolder = sa.NameSpace("C:\")