Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 243015 (4451)
  Suchen
 Zurück zur Übersicht
 AutorThema: Suche in einer DBF-DATEI
Eike Fremy
Datum:23.04.02 18:12 Antwortenals Email verschicken (eike-fremy@t-online.de) 


hallo leute
ich habe eine dbf datei mit 149556 sätzen
und habe die felder LFnummer, EAN,TEXT
jetzt suche ich mit dbfind nach der EAN 000000055558
so jetzt gibt es diese ean 3 mal in der Datei eine mit der LFnummer 04040 und 03605 und 03699 aber der Computer soll jetzt die mit der 03605 wie mache ich das ???


Thorsten
Datum:23.04.02 18:25 Antwortenals Email verschicken (mrk@mrk-soft.de) 


1. Nach der EAN Suchen, von beginn an.
2. wird etwas gefunden, den Datensatz LFnummer auslesen,
3. den Datensatz LFnummer vergleichen, ob dieser auch gesucht wird,
4. Wenn ja, dann ist das der Datensatz,
5. Wenn nein, dann suche weiter in der Datnbank, jedoch ab der
Position, wo zuletzt etwas gefunden wurde, dann weiter wie bei
nummer 2.

Thorsten
www.mrk-soft.de



Bernd
Datum:24.04.02 06:26 Antwortenals Email verschicken (info@ebs-haase.de) 


Moin !

Ich würde die Datenbank nach EAN-Code indizieren und dann mit DBFIND den Datensatz suchen. Wenn gefunden anzeigen, sonst eine Meldung ausgeben.

:-)) Bernd


Eike Fremy
Datum:24.04.02 06:39 Antwortenals Email verschicken (eike-fremy@t-online.de) 


und wie indizieren ich die datenbank oder was heisst das ???



Alexander Schoenfeld
Datum:24.04.02 08:19 Antwortenals Email verschicken (alexander.schoenfeld@chronologic.de) 


Hallo Eike !

ich denke Bernd meint, das du statt der 'LFnummer' direkt den 'EAN'-Code zum suchen verwenden solltest.

Mit freundlichem Gruss,
Alexander Schönfeld


Bernd
Datum: 24.04.02 10:04 Antwortenals Email verschicken (info@ebs-haase.de) 


Moin!
Hier ein Beispiel mir dbindex:
Declare Info$
Info$ = "NAME;Name:;120;VORNAME;Vorname:;120;STRASSE;Straße:;200;GEBURT;Geburtstag:;200;GEHALT;Gehalt:;80"
CLS
@dbOpen(#1,"ADRESS.DBF")
@dbUse(#1)
@dbCreateindex "NAME" > "XNAME"
@dbIndex("XNAME")'Hier wird nach Name indiziert
@dbBrowse(100,10,"TEST-EDIT",20,Info$,1)
@dbPack()
@dbClose(#1)
end
Kommt übrigens aus der Profan-Hilfe.
...und hier eins mit dbfind
@dbIndex("INAME")
Let SatzNr& = @dbFind("Mustermann",1)
Hoffe das hilft Dir ein wenig weiter.

:-)) Bernd


 Zurück zur Übersicht