VB6: Index in Datenbank

[wbendl]

Hi!

Aus einer einzigen Zeile Code kann man keine Aussage zu deinem Problem machen.
Der Schlüssel schaut aber nicht gut aus.

Klar sind für mich nur 2 Dinge, die dir aber nicht gefallen werden.
- Du verwendest DAO. Das ist noch kein Fehler, aber doch diskussionswürdig.
- Du verwendest ein DataControl. Das würde ich als grundsätzlichen Fehler bewerten.

Vielleicht solltest du dein gesamtes Konzept neu überdenken.

PS: Das "beste VB6 Forum" gibt es nicht. Es gibt aber einige Gute.


mfg

WB

[pw]

> Aus einer einzigen Zeile Code kann man keine Aussage zu deinem Problem machen.
> Der Schlüssel schaut aber nicht gut aus.

Warum?

> Klar sind für mich nur 2 Dinge, die dir aber nicht gefallen werden.
> - Du verwendest DAO. Das ist noch kein Fehler, aber doch diskussionswürdig.

Ich weiss.

> - Du verwendest ein DataControl. Das würde ich als grundsätzlichen Fehler bewerten.

Eigentlich nicht, ich dachte es wäre besser zu erklären.

Der Code:

Global Datenbank As Database
Global Fotos As Recordset

mdbdatei = App.Path + IIf(Right(App.Path, 1) = "\", "", "\") + "FOTO.MDB"
Set Datenbank = OpenDatabase(mdbdatei)
Set Fotos = Datenbank.OpenRecordset("Fotos")
Fotos.Index = "IndexNr" ' der Index setzt sich zusammen aus den Feldern "Typ" und "Nr"
Fotos.MoveLast

Fotos.Seek "=", "D108-33"
' führt NICHT zum Erfolg, wenn im Feld "Typ" der Wert "D" steht und im Feld "Nr" der Wert "108-33".
WARUM? Wie geht es richtig?

> PS: Das "beste VB6 Forum" gibt es nicht. Es gibt aber einige Gute.

Die da wären?

Danke
PW