Access Datenbank mit ADODataSet

[MechMac666]

Da ich es unbedingt direkt testen wollte habe ich bereits ein Ergebnis.
Auf den ersten Blick scheint es zu funktionieren.
Habe bei dem kurzen Test zumindest keine Probleme damit entdecken können.


Dass das 'BILDER' kein SQL-Befehl ist, ist mir klar, ich habe es in einem Post weiter oben gelesen.
Zitat:
ADODataSet1.CommandText := 'Tablename'; // z. B. 'BILDER'
ADODataSet1.CommandType := cmdTable; // bzw. cmdTableDirect

Ich hätte es wie folgt, jedoch im Modus CMDTEXT ausgedrückt:
SELECT * FROM BILDER
Nur es ging doch darum, das ich das dataset auf eine spezielle Tabelle lenke.
Ob SELECT * FROM BILDER im Modus CMDTABLE funktioniert, habe ich nicht getestet.

Wie auch immer, jetzt muss ich erstmal grundlegend einiges umstricken und die AdoConnection sowie weitere Datasets einbauen.

[Volker Z.]

Hallo,

Zitat:

Dass das 'BILDER' kein SQL-Befehl ist, ist mir klar, ich habe es in einem Post weiter oben gelesen.

Scheinbar aber die Links dazu übersehen. Ließ Dir doch mal die Dokumentation dazu durch.

Zitat:

Ob SELECT * FROM BILDER im Modus CMDTABLE funktioniert, habe ich nicht getestet.

Ist nicht nötig, funktioniert sicher nicht.
CommandType := cmdTable erwartet in der Eigenschaft CommandText einen Tabellennamen und nichts anderes.

Wenn Du alle Datensätze einer Tabelle (hier BILDER) anzeigen möchtest (TDataSource an die entsprechende Komponente gebunden):

Delphi-Quellcode:

ADODataSet1.Connection  := ADOConnection1;
ADODataSet1.CommandText := 'BILDER';
ADODataSet1.CommandType := cmdTable;
ADODataSet1.Open;

oder

Delphi-Quellcode:

ADODataSet1.Connection  := ADOConnection1;
ADODataSet1.CommandText := 'SELECT * FROM BILDER';
ADODataSet1.CommandType := cmdText;
ADODataSet1.Open;

oder

Delphi-Quellcode:

ADOTable1.Connection := ADOConnection1;
ADOTable1.Tablename  := 'BILDER';
ADOTable1.Open;

oder

Delphi-Quellcode:

ADOQuery1.Connection := ADOConnection1;
ADOQuery1.SQL.Text   := 'SELECT * FROM BILDER';
ADOQuery1.Open;

liefert Dir identische Ergebnisse. Such es Dir aus, welche Variante Dir gefällt.

Wenn Du einen Datensatz in eine Tabelle (hier Arten) einfügen möchtest, dann:

Delphi-Quellcode:

ADOCommand1.Connection  := ADOConnection1;
ADOCommand1.CommandText := 'INSERT INTO Arten(Vorkommen, Familie, Unterfamilie, Gattung, Tagfalter, Nachtfalter) VALUES([...])';
ADOCommand1.Execute;

oder

Delphi-Quellcode:

ADODataSet1.Connection  := ADOConnection1;
ADODataSet1.CommandText := 'Arten';
ADODataSet1.CommandType := cmdTable;
ADODataSet1.Insert; // oder ADODataSet1.Append;
ADODataSet1.FieldByName ('Vorkommen').AsString := '[...]';
[...]
ADODataSet1.FieldByName ('Nachtfalter').AsString := '[...]';
ADODataSet1.Post

oder

Delphi-Quellcode:

ADOQuery1.Connection  := ADOConnection1;
ADOQuery1.SQL.Text := 'INSERT INTO Arten(Vorkommen, Familie, Unterfamilie, Gattung, Tagfalter, Nachtfalter) VALUES([...])';
ADOCommand1.ExeSQL;

oder

Delphi-Quellcode:

ADOTable1.Connection  := ADOConnection1;
ADOTable1.Tablename   := 'Arten';
ADOTable1.Open;
ADOTable1.Insert; // oder ADOTable1.Append;
ADOTable1.FieldByName ('Vorkommen').AsString := '[...]';
[...]
ADOTable1.FieldByName ('Nachtfalter').AsString := '[...]';
ADOTable1.Post

legt Dir einen neun Datensatz in der Tabelle an. Such es Dir aus, welche Variante Dir gefällt.

Zitat:

Wie auch immer, jetzt muss ich erstmal grundlegend einiges umstricken und die AdoConnection sowie weitere Datasets einbauen.

Da ist eigentlich nichts grundlegendens zu ändern! Nur die ADOConntcion entsprechend initialisieren und entsprechend an die Komponente binden. That' s all!

Wenn Du ein Join über mehrere Tabellen fahren möchtest, dann TADODataset oder TADOQuery.

Nur: Mir ist nur noch immer nicht klar wo denn Dein Problem nun eigentlich liegt.

Gruß

[MechMac666]

Zitat:

Da ist eigentlich nichts grundlegendens zu ändern! Nur die ADOConntcion entsprechend initialisieren und entsprechend an die Komponente binden. That' s all!

Naja, da ich das mit den mehreren DBGrids bei nur einem Dataset vorher sehr umständlich gemacht habe, waren da schon noch diverse "Altlasten" die ich entfernen bzw. anpassen musste.

Zitat:

Nur: Mir ist nur noch immer nicht klar wo denn Dein Problem nun eigentlich liegt.

Seit meinem letzten Post, habe ich eigentlich kein Problem mehr,
da das mit der AdoConnection und den mehreren Datasets supi funktioniert.