4. Query bei einer Datenbank

Query bei einer Datenbank

  • ?

    Diese muss ich aber auch installieren oder?

    Diese Komponenten musst du nur auf deiner Entwicklungsumgebung, sprich deinem Builder installieren.

    Was spricht gegen BDE?

    Standardantwort:
    Die BDE ist veraltet und wird nicht mehr von Borland weiterentwickelt.Die BDE muss auf dem System auf dem deine Applikation läuft installiert werden.

    0
  • ?

    Allerdings irgendein DBMS musst du sowieso installieren.Ob es nun MySQL, Firebird oder auch Access ist...

    0
  • J

    soxin schrieb:

    So hab das nun hinbekommen [...]
    Nun hab ich eine lauffähige exe erstellt und wollte sie an einem anderen Rechner testen.. aber:

    In Zukunft bitte die Faustregel beachten: ein Thema pro Thread, ein Thread pro Thema. Danke!

    0
  • S

    Jansen schrieb:

    soxin schrieb:

    So hab das nun hinbekommen [...]
    Nun hab ich eine lauffähige exe erstellt und wollte sie an einem anderen Rechner testen.. aber:

    In Zukunft bitte die Faustregel beachten: ein Thema pro Thread, ein Thread pro Thema. Danke!

    Ok beim nächsten Mal!! Sorry.

    Gibt es nichts was bei Xp schon mit installiert wird? Wie kann ich das mit einer zusätzlichen installation umgehen? Access ist übrigens nicht bei den Rechnern drauf... Excel schon..

    Besteht evt. dann die Möglichkeit das über eine csv zu machen?
    Thx

    0
  • ?

    Wenn du von den Clients übers Netzwerk auf deinen Rechner zugreifen kannst und nur eine zentrale Datenbank notwendig ist, so kannst du z.B. mit ADO übers Netzwerk zu deiner Datenbank connecten.

    0
  • S

    Leider auch nicht möglich.

    0
  • ?

    soxin schrieb:

    Leider auch nicht möglich.

    Dann musst du es ohne Datenbank mit Textdateien (CSV) machen.

    0
  • S

    Kann ich eine CSV genau so abfragen wie eine Datenbank? Wie geht das einbinden einer CSV? Hat mir jemand eine kurze Anleitung?

    THX

    0
  • ?

    Kann ich eine CSV genau so abfragen wie eine Datenbank?

    Nein, eine CSV ist eine normale Textdatei.Die Daten werden durch ein Trennzeichen (Seperator) getrennt.
    Kannst ja mal mit Excel ein Arbeitsblatt als CSV Datei abspeichern, und dir diese mit dem Notepad anschauen.
    Um sowas auszulesen kannst du eine TStringList verwenden.
    Nur "Abfragen" zwischen verschiedenen "Tabellen" (Dateien) musst du dann selber programmieren.Ist je nachdem was du brauchst ziemlich aufwendig.

    0
  • ?

    Beispiel:

    TStringList *list=new TStringList();
list->LoadFromFile(filename);
list->Delimiter =';';
list->DelimitedText = list->Text;
Label1->Caption = list->Strings[0];
delete list;
    0
  • S

    Super Danke.. werde gleich mal schauen was sich daraus machen läßt! 👍

    0
  • L

    du kannst auch mit den ADO-Komponenten direkt auf Excel-Dateien zugreifen, dabei ist jedes Excel-Tabellenblatt eine Tabelle, in der 1. Zeile des Tabellenblattes steht der Tabellenkopf, und der Tabellename ist der Name des Tabellenblattes. Beschränkungen gibt es hier bezüglich der Reihen (max. 65536) und Spalten (max 255).

    Bsp:

    ADOConnection1->ConnectionString = "Provider=MSDASQL;Persist Security \
 Info=False;Data Source=Excel-Dateien;Initial Catalog=C:\\Test.xls";
ADOConnection1->LoginPrompt = false;
ADOConnection1->Open();

ADODataSet1->Connection = ADOConnection1;
ADODataSet1->CommandText = "[Tabelle1$]";
ADODataSet1->CommandType = cmdTable;
ADODataSet1->Open();
...

    Im Beispiel heisst das Tabellenblatt Tabelle1. Die eckigen Klammern und das $-Zeichen sind beim Zugriff wichtig.

    0
  • S

    Hallo Linnea, wie geht es dann weiter?

    ich habe mir nun eine Tabelle so wie du geschrieben hast angelegt..
    Habe die Connection wie oben genannt erstellt.. aber wie frag ich da jetzt was ab und kann es dann ausgeben? Danke

    0
  • L

    Die Abfrage kannst du über SQL machen, z.B.:

    ADODataSet1->CommandText = "select Wert from [Tabelle1$]";
ADODataSet1->CommandType = cmdText;
ADODataSet1->Open();

    Die Behandlung von Select-Ergebnissen hast du ja schon aus der FAQ

    und hier noch ein paar Hinweise die ich mal irgendwo im Internet gefunden hab:

    Excel:

    1.Generelles:
    -Am einfachsten connected man mit Hilfe des „Excel-Dateien“-Treibers, eine eigene DSN zu erstellen macht wenig Sinn, da es sich dabei sowieso um einen ganz normalen Excel-Treiber handelt. Außerdem erspart man sich dadurch die lästigen „Extended Properties“, die so nicht gesetzt werden müssen. „READONLY“ muss so auch nicht explizit auf FALSE gesetzt werden. Der eigentliche ConnectionString bleibt kurz und übersichtlich und leistet dabei dasselbe wie eine eigene DSN.

    -Tabellennamen werden grundsätzlich in eckige Klammern gepackt. Dabei muss der Tabellenname immer mit einem „“-Zeichen abgeschlossen werden. Das gilt für alle SQL-Befehle, nicht nur für „Select“ ! Beispiel : [MyTable]. Die MSDN behauptet, man könne auch ohne eckige Klammern auf „Ranges“ zugreifen. Das mag für VB gelten, bei Delphi hatte ich bis jetzt noch keinen Erfolg. Bleibe aber weiter dran...;)

    -Excel-Tabellen können grundsätzlich nur einmal geöffnet werden. Das sollte beim Debuggen berücksichtigt werden. Eine Connection, die auf TRUE steht, kann stören. Meines wissens nach ist es auch nicht möglich, besagte Tabelle ein zweites mal im Exclusiv-Modus zu öffnen.

    2. Einen Connect ausführen
    -Ein typischer ConnectionString sieht in etwa so aus:

    -ConnectionString := ’Provider=MSDASQL;Data Source=Excel-Dateien;Initial Catalog=C:\myTable.XLS;’

    -Mehr ist nicht nötig, man glaubt es kaum...

    3. CREATE DATABASE
    -Ein CREATE DATABASE ist nicht so ohne weiteres anwendbar. Man muss einen kleinen Trick anwenden. Man connected auf eine Datei, die bis jetzt noch nicht existiert. Dann führt man einen CREATE TABLE aus. Der Treiber erzeugt dann automatisch die .XLS-Datei. Die DataBase (sprich das XLS-File) heißt dann so, wie zuvor angegeben.

    4. CREATE TABLE
    -Hier gilt es zu berücksichtigen, dass außer dem Tabellennamen auch die Feldnamen in eckigen Klammern stehen müssen! Excel kennt eine Vielzahl von Formaten, darunter VARCHAR, DOUBLE, CURRENCY oder DATETIME. Einen Typ "int" gibt es nicht! Zahlen werden generell als "Double" angegeben. Ein typischer CREATE TABLE könnte so aussehen:

    -CREATE TABLE [myTable$] ([Name] varchar(50), [Vorname] varchar(50), [PLZ] Double, [GeburtsDatum] DateTime)

    -Die Feldnamen erscheinen im Worksheet dann in der ersten Zeile. Die msdn behauptet, man könne mit "FirstRowHasNames" die erste Zeile zu einem weiteren Datensatz machen, ich hatte bisher keinen Erfolg damit.

    5. Zugriff & Manipulation
    -Zugegriffen und manipuliert wird auf ganz normale Art und Weise. Bei einem "Insert" können jetzt auch die eckigen Klammern weggelassen werden. Beispiel:

    -INSERT INTO (Name, Vorname, PLZ, GeburtsDatum) values (’Müller’, ’Martin’, 74523, 22.02.02)

    -ansonsten funktioniert alles im SQL-typischen Stil.

    6. Abschließendes
    -als sehr kooperativ erweist sich Excel mit Datums- und Currency-Werten. Wenn man die Felder bereits richtig definiert, kann man auch mit Sicherheit davon ausgehen, dass alle Zellen richtig formatiert und angezeigt werden. Hier leistet der Treiber ausgezeichnete Arbeit.
    -Leider ist es IMHO nicht möglich, den Feldtyp VarChar(x) richtig zu beeinflussen. Excel macht sich nichts aus der Größe x, es legt sich anscheinend soviel Speicherplatz an chars zurecht, wie es (Excel) meint, zu benötigen. Wenn man die Daten dann im Excel anschaut, ist das kein Problem; wird allerdings versucht, die Daten mit einem Grid anzuzeigen, gibt das Probleme, weil die Felder überdurchschnittlich groß geraten sind.
    -stets beachten sollte man auch, dass Excel nicht in der Lage ist, mehr als 65535 Datensätze zu speichern. Das ist aber ein Problem der Excel-Philosophie.

    7. Wichtiges
    -Ein SELECT * FROM kann nicht ausgeführt werden. Woher sollte Excel auch wissen, wann das Ende der Feldnamen erreicht ist? Und wenn, was würde es dann mit leeren Einträgen machen, die im Excel ja durchaus zulässig sind?

    0
  • S

    Na super!! Dank dir schon einmal.. Hast mir richtig geholfen.

    Auf dem Zielrechner muss dann Excel installiert sein und keine weiteren Treiber oder?

    from [Tabelle1$]

    .. das hatte mir gerade gefehlt da hatte ich die xls hingeschrieben.

    0
  • S

    Frage:

    Als ich die sache mit BDE gemacht habe konnte ich in der SQL mit Variablen arbeiten mit ParamByName ...

    ADOQuery1->ParamByName("VARIABLE")->Value = Edit1->Text;

    Das scheint hier in der SQL nicht zu funktionieren... Gibts da noch eine andere möglichkeit die sql mit variablen zu bestücken?

    0
  • L

    das geht auch hier, allerdings mit leicht verändertem Syntax:

    ADOCommand1->Parameters->ParamByName("VARIABLE")->Value = Edit1->Text;
    0
  • S

    Da bringt er mir immer die Fehlermeldung Parameter X nicht gefunden...

    Auszug:

    String x;
ADOConnection1->ConnectionString = "Provider=MSDASQL;Persist Security \Info=False;Data Source=Excel-Dateien;Initial Catalog=test.xls";

ADOConnection1->LoginPrompt = false;
ADOConnection1->Open();

ADODataSet1->Connection = ADOConnection1;
ADODataSet1->CommandText = "[Tab20$]";
ADODataSet1->CommandType = cmdTable;
ADODataSet1->Open();

ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("select id from [Tab20$] where smms like :x");    

ADOCommand1->Parameters->ParamByName("x")->Value = Edit1->Text;

ADOQuery1->Open();
ADOQuery1->First();

Memo1->Lines->Add(ADOQuery1->Fields->Fields[0]->AsString);
    0
  • L

    kann auch nicht gehen, da du den Parameter dem ADOCommand und nicht dem Query zuordnest. Ausserdem brauchst du das Query nicht mehr:

    String x;
ADOConnection1->ConnectionString = "Provider=MSDASQL;Persist Security
\Info=False;Data Source=Excel-Dateien;Initial Catalog=test.xls";

ADOConnection1->LoginPrompt = false;
ADOConnection1->Open();

ADODataSet1->Connection = ADOConnection1;
ADODataSet1->CommandText = "select id from [Tab20$] where smms like :x";
ADODataSet1->CommandType = cmdText;
ADODataSet1->Parameters->ParamByName("x")->Value = Edit1->Text;
ADODataSet1->Open();
ADODataSet1->First();

Memo1->Lines->Add(ADODataSet1->Fields->Fields[0]->AsString);
    0
  • S

    Na jetzt wird es tag!!! 👍 👍

    0
Anmelden zum Antworten