Dovresti averlo già.

Per l'uso, prova queste istruzioni :
(Nell'esempio sostituisci NomeUtente con un nome utente valido e
ti crea una cartella con all'interno un file .doc, sul desktop)

codice:
    Dim fs, fold, file
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set fold = fs.CreateFolder("C:\Documents and Settings\NomeUtente\Desktop\MioFolder")
    Set file = fs.CreateTextFile("C:\Documents and Settings\NomeUtente\Desktop\MioFolder\MioFile.doc")
Ciao,