[Resolvido] select combobox

Ea galera estou aqui da novo agora gostaria de saber como é q eu pego os nomes das pastas criado com o comando

e coloco em um select ou comobobx

<%
nome = request.form("nome")
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
objFS.CreateFolder(Server.MapPath(nome))
Response.Write "A categoria foi criada com sucesso"

%>

esse comando crias pastas