◄Map► ◄Up► ◄Contents► ◄Index► ◄Back► ──────────────────────────────────────────────────────────────────────────── ;* FindNext - Finds next entry in given directory matching specification. ;* (Should be called only after successfully calling the FindFirst procedure.) ;* ;* Shows: DOS Function - 4Fh (Find Next File) ;* Operator - OFFSET ;* ;* Params: Finfo - Pointer to 43-byte buffer. This must be the same buffer ;* (or a duplicate) returned from the FindFirst procedure. ;* ;* Return: Short integer with error code ;* 0 if successful ;* 1 if no more matches found FindNext PROC USES ds, Finfo:PFILEINFO ; Get current DTA address, pass address of pointer to hold value INVOKE GetDTA, ADDR OldDta ; Set DTA address, pass pointer to structure INVOKE SetDTA, Finfo mov ah, 4Fh ; AH = function number int 21h ; Find Next File pushf ; Preserve flags ; Restore DTA address, pass pointer INVOKE SetDTA, OldDta sub ax, ax ; Set error code popf ; Recover flags .IF carry? inc ax ; Set error code to 1 .ENDIF ret FindNext ENDP -♦-