Crear un select con las carpetas del servidor

[lenop]

Hola, quiero crear un select en el que al desplegarse salgan todas las carpetas del servidor, asi:
carpeta1/subcarpeta1/otracarpeta
carpeta2/subcarpeta2/otracarpeta
carpeta3/subcarpeta3/otracarpeta

Con esta funcion lo único que logro es mostrar todas las carpetas del raiz pero me las muestra todas asi:
C:\Inetpub\wwwroot.... // con la ruta de la carpeta

<%
var fso, f, fc, s;
fso = new ActiveXObject("Scripting.FileSystemObject");
f = fso.GetFolder(Server.MapPath("/"));
fc = new Enumerator(f.SubFolders);
s = "";
for (;!fc.atEnd(); fc.moveNext())
{
s += fc.item();
s += "<br>";
}
Response.Write(s);

%>

He estado mirando en todos los post y he encontrado cosas parecidas pero no exactamente eso, si alguien me puede ayudar....

Muchas gracias