BBS: Inland Empire Archive Date: 03-17-92 (08:55) Number: 177 From: ROB SMETANA @ 914/201 Refer#: NONE To: FRANCOIS ROY Recvd: NO Subj: Re: Dbase Iv Conf: (2) Quik_Bas
> JF> I have been looking for a way to access dBASE IV files with QB > 4.5. > TYPE DBHDR > FILTYP AS STRING * 1 ' &03 or &83 > UPDYY AS STRING * 1 ' Update date YYMMDD > UPDMM AS STRING * 1 > UPDDD AS STRING * 1 > NREC AS LONG ' # records in file > HDRLEN AS INTEGER ' # bytes in header (this header+all > ' descriptors+terminator byte) > RCDLEN AS INTEGER ' # bytes in a record > HDRFILLER AS STRING * 20 > END TYPE > > TYPE DBFLD ' One per field, after the header > FLDNAM AS STRING * 11 ' Field Name, padded with &00s > FLDTYP AS STRING * 1 ' C=Char, D=Date, N=Numeric, F=Float, > ' L=Logical, M=Memo > FLDADR AS LONG ' Junk > FLDLEN AS STRING * 1 ' Field length > FLDDEC AS STRING * 1 ' No. of decimals > FLDFILLER AS STRING * 14 > END TYPE > It might also help to point out that: Number.Fields = (dbHdr.HdrLen \ 32) - 1 Also, do you know the purpose of FLDADR? And where does dBase store the address/offset/?? of Memos in DBT files? * In what form are these addresses stored? How interpret? Finally, do you have any further insights into reading numeric fields in EBCDIC files? --- RBBSMail 17.3A # Origin: REG_10_SDSCoord 1:125/41 415-621-2609 HST/V.32 (RBBS 8:914/201.0) * Origin: Gateway System to/from RBBS-NET (RBBS-PC 1:10/8)
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