ma stai lavorando in visual basic o in vbscript?

se in visual basic hai messo nei riferimenti la libreria "Microsoft scripting runtime"?

questo è un esempio che funziona:

Dim fso As Scripting.FileSystemObject
Dim myFolder As String
Set fso = CreateObject("Scripting.FileSystemObject")
fso.GetFolder (myFolder)

ciao.