How do you check for Sub-Directories in OpenInsight? (OpenInsight Specific) [Revelation On-Line Wiki]

OpenInsight Specific

Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

At 28 JAN 2000 02:19:48PM Wayne Shepard wrote:

In AREV, we use a routine that calls PERFORM DIR to write a directory list to a text file. It then reads the text file and returns a list of subdirectories.

This seems cludgy, but it works well enough in AREV's DOS environment. It doesn't work in OpenInsight and it seems even cludgier to CALL UTILITY('RUNWIN'.'DIR ]C:DIRLIST.TXT'… and run a DOS window to do the same thing.

Hasn't a more direct approach been developed by now?

At 28 JAN 2000 02:42PM Cameron Revelation wrote:

function getSubDirectories(ParentDirectory)
SetInitDirOptions("D")
initdir ParentDirectory
List="
loop
  SubList=DirList()
until SubList="
  List=SubList
repeat
return List

Cameron Purdy

Revelation Software

At 29 JAN 2000 07:41AM [url=http://www.sprezzatura.com" onMouseOver=window.status=Click here to visit our web site?';return(true)]The Sprezzatura Group[/url] wrote:

Regretfully this does not seem to work in our copy of 3.7. Setting a drive path returns the drive path, appending a \ returns nothing, and including wild cards causes ALL files including subdirectories to be returned. We are currently making our own DLL calls to get this info.

This is also the subject of a current thread in Works.

The Sprezzatura Group

World Leaders in all things RevSoft

At 30 JAN 2000 05:43PM Cameron Revelation wrote:

Mr. The Sprezzatura Group,

Yes, I saw that after answering the original question. Good timing That was the first that I'd heard of it.

Cameron Purdy

Revelation Software

View this thread on the forum...