Lista filer och mappar med FSO

Jag har m.h.a FSO listat alla filer i en mapp med Item.Name. Och beroende på filändelse skrivit ut olika ikoner. Men om det ligger en undermapp i mappen med filerna vill jag att det ska skrivas ut en mappikon istället för en av mina filikoner. Hur kodar man för att FSO-scriptet ska kolla om innehållet i en mapp även består av andra undermappar?

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.getFolder(strFilePath & Session("CustomerId") & "\")
Set Files = Folder.Files
For Each Item in Files
...
Next
Set Folder = Nothing : Set FSO = Nothing : Set Files = Nothing