New topic: 

Simple recursive file search code

<http://forums.realsoftware.com/viewtopic.php?t=30515>

       Page 1 of 1
   [ 1 post ]                 Previous topic | Next topic         Author  
Message       Aerodude           Post subject: Simple recursive file search 
codePosted: Fri Oct 16, 2009 8:23 am                        
Joined: Fri Oct 16, 2009 8:03 am
Posts: 1              Hello eveyone!

I am a new developer to RB but have a decent amount of experience with Vb.net 
on windows platforms. Basically I am working on a new app just to get 
comfortable with some of the RB syntax.

What I would like to do is input masks for certain file types into a textbox 
and have the program search the selected volume for those files.  The file 
masking is easy to figure out but I just can't nail down the physical search of 
the volume.

My thought process is this:

Code:

Dim i as integer
dim f as folderitem

sub searchVolume(dir as folderitem)
  
  f = dir
  
  for i = 1 to dir.count then
  
  if f.directory then
  searchVolume(f)
  if right(f.name, 4) = ".txt" then
    Listbox.addrow = f.absolutepath
  end if
  
  next
  
  


Sorry, the code may be a little sloppy since I am typing it on my iPhone.  I 
need it to search the entire volume including sub folders.  Any help is greatly 
appreciated!   
                            Top            Display posts from previous: All 
posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost 
timeSubject AscendingDescending          Page 1 of 1
   [ 1 post ]     
-- 
Over 1500 classes with 29000 functions in one REALbasic plug-in collection. 
The Monkeybread Software Realbasic Plugin v9.3. 
http://www.monkeybreadsoftware.de/realbasic/plugins.shtml

[email protected]

Reply via email to