Directory Tree

 BBS: Inland Empire Archive
Date: 03-15-92 (03:15)             Number: 129
From: SCOTT WUNSCH                 Refer#: NONE
  To: TIM FITZGERALD                Recvd: NO  
Subj: Directory Tree                 Conf: (2) Quik_Bas
 On 13 March 1992, Tim Fitzgerald wrote to All...

 TF> Once more, I need some assistance. I need someone to either
 TF> point me in the right direction, show me a snippet of code,
 TF> whatever.. of a how to get a Directory Tree, just like the
 TF> one provided with DOS.
. . .
 TF> What I want it for is for a backup program I am working on.
 TF> I want the user to be able to tag a directory(s) for
 TF> backup. It would be nice if the routine could save the
 TF> COMPLETE paths in a variable or something. But, I can work
 TF> around that....
. . .
 TF> Any help will greatly be appreciated.. so far I'm in debt
 TF> to a few people here.. you guys sure help people like
 TF> me... Thanks!

  It isn't really THAT hard.  All you should have to do is SHELL to
get a DIR listing redirected to a (unique) temporary file.  Then,
search through that for any entries with a <DIR>.  Use a recursive
procedure (one that calls itself) to move into each directory and
redirect and handle another DIR listing.  This idea is used in the
example program WHEREIS.BAS that comes with QB 4.5.  You might want
to take a look at that for an example.
                                        -= Scott \\'unsch =-

... OFFLINE 1.36 * This tagline is umop apisdn

--- Maximus 2.00
 * Origin: The Green Zone - Regina, Sask, Canada (1:140/23)
Outer Court
Echo Basic Postings

Books at Amazon:

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET