Iscitavam stablo, redom foldere i fajlove. E sad, foldre i fajlove prepoznajem po atributu, po donjoj tabeli
vbNormal 0
vbReadOnly 1
vbHidden 2
VbSystem 4
vbVolume 8
vbDirectory 16
Sto znaci da folder moze "zauzeti" atribute 16,17,18,20 ....
a file: 0,1,2,3,4,5,6, ....
i sve bi bilo lepo da radi :(
Tacnije ... radi, ali ne iscita sve fajlove i foldere/
Ispod DIR funkcije u petlji postavim GetAttr za file/folder koji je trenutno u petlji i dobijam atribute koji ne bi trebali da se dobiju nikakvom kombinacijom: 32 za fajlove, odnosno 48 za foldere.
O cemu se ovde radi ?
Kako da budem siguran da sam iscitao sve fajlove / foldere.
Koje vrednosti za atribute moram da proveravam.
funkcija izlaz = Dir(FolderZaObradu, vbDirectory ) definitivno ne iscita sve foldere
a funkcija MgDir = Dir(FolderZaObradu) ne tretira sve fajlove.