Ich bin gerade dabei meine ersten Versuche mit diesem Tool zu machen. Mit einer unverschlüsselten DB klappt alles soweit ganz gut. Aber bei einer verschlüsselten DB habe ich meine Probleme.
Das Anlegen funktioniert noch. Wenn ich jedoch Daten in die DB schreiben möchte bekomme ich den Fehler "-6" - Feld nicht vorhanden.
Daten eintragen:
Code: Alles auswählen
aktion=edbOpen(5,"d:\purebasic\hallo.edb","Hallo","Hallo")
If aktion > 0
For i= 1 To 1000
e_lfdNr.s=Str(i)
e_Vorname.s="hugo"+Str(i)
e_Nachname.s="Maier"+Str(i)
e_PLZ.s="5555"+Str(i)
satz=edbAppend()
Stand_lfdNr=edbPut("lfdNr",e_lfdnr.s)
stand_Vorname=edbPutX("Vorname",e_Vorname)
stand_Nachname=edbPut("Nachname",e_Nachname)
stand_PLZ=edbPut("PLZ",e_PLZ)
schreibfehler=edbWriteRecord(i)
Next
Else
Print("Fehler")
EndIf
edbClose(1)Code: Alles auswählen
OpenConsole()
t3=edbOpen(1,"d:\purebasic\Hallo.edb","Hallo","Hallo")
For i=1 To 5
Print("Einen Vornamen eingeben von Hugo1 bis Hugo1000: ")
e_vorname.s=Input()
PrintN
temp1.s="":temp2.s="":temp3.s=""
gefunden=edbSearch(e_Vorname.s,"Vorname",1,1,10)
If gefunden > 0
t1=edbGetIDX(1,temp1.s)
t2=edbGetIDX(2,temp2.s)
t3=edbGetIDX(3,temp3.s)
PrintN(temp1.s + temp2.s + temp3.s)
Else
PrintN("nichts gefunden")
EndIf
NextKomischerweise werden aber irgendwelche Daten - trotz "-6" in die Datei geschrieben, da diese irgend einen Inhalt hat.
Hat vielleicht jemand ein kleines Beispiel wie - ohne großes Drumherum - eine verschlüsselte Datei angelegt wird, Daten geschrieben und gelesen werden.
Na dann schon mal Danke für die Antworten.
Wird das Modul eigentlich noch irgendwie gepflegt - sprich weiterentwickelt ?