Not as a command no. You could use
perform checklist for drives
perform checklist for files
Or write a file manager code. (Or use this.)
Dim BrowseType(1024)
Dim BrowseFile$(1024)
Dim Total(0)
Dim BrowseData(5)
Dim B(0)
Function ScanFiles()
` Scan Directory To Get Files.
Bi = 1 : Find First : Find Next : Find Next
Do
` Gather Directory List.
BrowseType(Bi) = Get File Type()
If BrowseType(Bi) = -1 Or Bi >= 999 Then Exit
If BrowseType(Bi) = 1 Then BrowseFile$(Bi) = Get File Name$(): Bi = Bi + 1
Find Next
Loop
Total(0)= Bi-1
BrowseData(1)=Total(0)
` Bubble Sort Files So The Folders Are At The Top
For A=1 To Total(0)
For B=1 To Total(0)
If A<>B And BrowseType(A)>BrowseType(B)
Ct=BrowseType(A)
Cf$=BrowseFile$(A)
BrowseType(A)=BrowseType(B)
BrowseFile$(A)=BrowseFile$(B)
BrowseType(B)=Ct
BrowseFile$(B)=Cf$
Sync
EndIf
Next B
Next A
B(0) = 1
EndFunction
It stores all files (and folders) in BrowseFile$(Index)
PS thank Lee Bamber For this Code, It's from one of his example programs for DBC
1800+ XP - GeforceFX 5600 - 256MbDDR - 60Gb Hdd - XP Pro
