View Single Post
Newbie Member
19Jul2010,20:04  
Jeff Greener's Avatar
Quote:
Originally Posted by DivinationX View Post
How do i code such that, the filename that is captures will be stored into an array of strings? Thanks!
You need to declare an undimensioned array, and then initialize it at the top:
Dim myresults()
ReDim myresults(0)

then replace the output portion:
objNewFile.WriteLine(tfolder.Name)
with these two lines:

myresults(ubound(myresults))=tfolder.Name
redim Preserve Myresults(ubound(Myresults)+1)

This will leave you with an array full of the results and one empty slot at the end.