I did this and it seems to work pretty well...
Dim aryFiles() As String = System.IO.Directory.GetFiles(Server.MapPath("~/images"))
Dim sRootPath As String = Server.MapPath("~")
Dim i As Integer
For i = 0 To aryFiles.Length - 1
aryFiles(i) = aryFiles(i).Replace(sRootPath, "~")
Next
'proceed with binding to control
Peter
-------------------------
Work smarter, not harder