Code:
OPEN "THEFILE" [b]FOR APPEND[/b] AS #hFile WRITE #hFile, CheckNo, Payee, Amt, NewBalance CLOSE hFile
Code:
DIM R AS RecordUDT OPEN "THEFILE" FOR RANDOM AS hFile LEN=SIZEOF(R) [b]nRecs = LOF(hFile) \ SIZEOF(R)[/b] ' how many records in file now? R.Checkno = whatever R.Payee = whatever R.Amt = whatever [b]INCR nRecs[/b] ' add at end PUT #hFile, nRecs, R CLOSE hFIle
[This message has been edited by Michael Mattias (edited February 20, 2003).]
Leave a comment: