DESPERATE: Indexed files in QBasic ??

Article View: alt.lang.basic

Article #730

#730

From: Seamus BROWNE
Date: Tue, 24 Feb 1998 00:00

19 lines
1419 bytes

Hi,
I have written a few progs with Qbasic.
Some of them need to lookup data and find an equivalence:
say , in a table with two fields Refno and Title,
lookup the Refno "12345" and retrieve Title  "War and Peace".

I do this using DATA and READ to build a DIM table then
run along down the DIM table till I find the Refno an dthen grab the Title.

This may be a slow way of doing things but I can find any other way.
So ...
Q1. Is there no way to have an Indexed file in Qbasic ?
Q2. Is there any other Basic that woul do the job OK without me having to
re-write my progs?

Thanks.
Pls reply by e-mail.
Seamus BROWNE at Partage

Technical Details

Message-ID: <6cukjr$rrc$1@peuplier.wanadoo.fr>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10c949,65d4745eb428207a,start
X-Google-Attributes: gid10c949,public
X-Google-Thread: 10ab99,65d4745eb428207a,start
X-Google-Attributes: gid10ab99,public
X-Google-Thread: fec0a,65d4745eb428207a,start
X-Google-Attributes: gidfec0a,public
X-Google-Thread: f7646,65d4745eb428207a,start
X-Google-Attributes: gidf7646,public
From: "Seamus BROWNE" <partage@wanadoo.fr>
Subject: DESPERATE: Indexed files in QBasic ??
Date: 1998/02/24
Message-ID: <6cukjr$rrc$1@peuplier.wanadoo.fr>
X-Deja-AN: 328179458
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Organization: Wanadoo - (Client of French Internet Provider)
Newsgroups: alt.lang.basic,alt.lang.powerbasic,comp.lang.basic.misc,fr.comp.lang.basic