Re: Heya.

 BBS: Inland Empire Archive
Date: 01-20-93 (08:25)             Number: 361
From: DICK DENNISON                Refer#: NONE
  To: MARK REJHON                   Recvd: NO  
Subj: Re: Heya.                      Conf: (2) Quik_Bas

MR> What I have to find out is a way to OPEN the directories without havin
MR> to write to the attributes!   Why I want to do this is to make a
MR> super-fast directory structure scanning program.  FindFirstF and
MR> FindNextF interrupt calls do nicely, though.

Well, you can use INT25 and input a big buffer$ and parse it, but you'd
probably be better off with findfirst/next.  (I'd practice on a floppy
though.)  Here's some INT25 code for getting a floppy boot sector:

'Dick Dennison 272/34 1/93 PD
'$INCLUDE: 'qb.bi'
DEFINT A-Z
DIM regs AS regtypex
DIM buffer AS STRING * 1024
CLS
regs.ax = 0   'drive a:
regs.ds = VARSEG(buffer)
regs.bx = VARPTR(buffer)
regs.cx = 2
regs.dx = 0  'sector number
Interruptx &H25, regs, regs
FOR x = 0 TO 1023
 IF NOT regs.flags AND 1 THEN
        b$ = (MID$(buffer, x, 1))
  IF b$ = CHR$(0) THEN

   PRINT ".";
  ELSE
            IF ASC(b$) > 32 AND ASC(b$) < 255 THEN
    PRINT b$;
            ELSE PRINT ".";
         END IF
  END IF
 END IF
NEXT x
PRINT "Error code "; regs.flags AND 1

--- VP [DOS] V4.09e
 * Origin: The MailMan  (914)374-3903 NY Quick Share Pt #7 *HST (1:272/34)