Ciao,
Avevo già provato con un Array ma il problema era che mi restituiva il nome .FullName della directory e non andava bene.
Adesso ho risolto così ma ho la senzazione che si possa snellire:
Dim foldersImg As New ArrayList()
Dim di As DirectoryInfo = New DirectoryInfo(Server.MapPath("images"))
Dim diArr As DirectoryInfo() = di.GetDirectories()
Dim dri As DirectoryInfo
For Each dri In diArr
foldersImg.Add(dri.Name)
Next dri
foldersImg.Sort()
folders.AutoPostBack = True
folders.DataSource = foldersImg
folders.DataBind()
Grazie e ciao
PS
Due settimane fà ero a Parma per un torneo di rugby di mio figlio.
Mi son dimenticato che ti devo una birra 
per un vecchio post.
alexmed