> > Dim arrCompetitor() > Dim arrCompetitorSort > > i = 0 > for each file in curFolder.SubFolders > Redim Preserve arrCompetitor(i+1) > > arrCompetitor(i) = file.name > i = i + 1 > next >
Das Array ist um eins zu gross.... Redim Preserve arrCompetitor(i) Claudius | [aspgerman] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv | Sie k�nnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
