Displaying Files in ASP

Hey Everyone! Im working on a code so that I can see my folders inside my root directory from my Browser, here is my code so far…

<%
Dim fileSys, drv, f1, s, rootdir, rootfiles, fileobj
Dim drivelet
drivelet = “C:”
Set filesys = CreateObject(“Scripting.FileSystemObject”)
Set drv = filesys.GetDrive(drivelet)
Set rootdir = drv.RootFolder
Set rootfiles = rootdir.Files
For Each fileobj in rootfiles
%>

<%=fileobj.Name%><Br>

<%
Next
%>

How would I display my wwwroots folder list? right now the drivelet is set to C: and it wont let me type in a specific folder path… Any ideas?
Thanks a bunch!
Fidelity88