Pete's QBASIC Site

Posted: **Sat Aug 20, 2005 4:10 pm**

How can I find a certain file with PDS?

Not that good yet with PDS.

grtz
Seb

Posted: **Sat Aug 20, 2005 5:27 pm**

There's no easy way per say.. but:

search$ = "*.BAS"
ret$ = DIR$(search$)
While ret$ <> ""
  Print ret$
  
  ret$ = DIR$()
Wend

Will find and list all .BAS files in the CURRENT directory..

DIR$() can take paths:
ret$ = DIR$("Somepath\What\Path\somefile.ext")

And as you can see, it can work without *

The DIR$() command exist on PDS only, not Q.B. 4.5

Pete's QBASIC Site

Find file

Find file