BDE Paradox db-Datei in eine CSV Datei exportieren

[Luckie]

Ich habe hier eine BDE Paradox db-Datei. Die BDE habe ich hier auf dem Rechner nicht installiert. Kann ich die irgendwie in eine CSV Datei bekommen? Gibt es da Tools die ohne BDE Installation auskommen?

Oder alternativ, könnte mir die jemand mal schnell in eine CSV-Datei exportieren?

[dizzy]

Wenn du mir sagen kannst wie ich sie exportiere, kein Problem.

[Luckie]

Äh ja. Irgend wie mit dem BDE Administrator Programm? Geht das? Ich hänge sie einfach mal an. Entpackt ist sie über 3 MB groß. Es sind CD Titel drinne von den Beatles. Ich hatte mal einem Bekannten eine DB in Paradox programmiert, ist schon drei jahre her, leider habe ich den Source nicht mehr und ich hatte vergessen eine Export-Funktion einzubauen. :wall:

[dizzy]

Ich versuch's mal :)

[Luckie]

Danke. Ich habe im Hex-Editor gesehen, dass es eigentlich nur eine typisierte Datei ist. Zur Not muss ich mir das eben programmieren, aber ich habe keine Lust das alles zu analysieren usw. Deswegen, wenn es da schon was fertiges gibt oder wenn es mit dem BDE Dingsbums geht, dann würde mir das reichen.

[dizzy]

Habs mit Excel gemacht :mrgreen:

Ist als CSV deutlich kleiner... was macht Paradox so fett?

[Luckie]

Mit Excel? :shock: Hmpf, dann hätte ich es auch selber mit OpenOffice wahrscheinlich geschafft. Besten dank. Hast was gut bei mir, komm zum Treffen und ich gebe dir einen aus. :cheers:

[Catbytes]

Wenn Du Access auf der Kiste hast -> damit klappt das auch ganz gut.

Kann Paradox importieren und CSV exportieren...

[dizzy]

Tjo, habs mit der BDE nicht schnell gefunden, und mir dann gedacht: Excel macht ja eigentlich aus jedem Schrott noch ne brauchbare Tabelle. Lassen wir's drauf ankommen. Und *pling*

Auf das Angebot komm ich gern zurück ;). Werde mich die Tage auch anmelden, ich weiss endlich dass ich da kann :bounce1:

[Catbytes]

Zitat:

Zitat von dizzy

was macht Paradox so fett?

Vermutlich, daß in der Paradox-Datei ein String[40] eben 40 Zeichen belegt, auch wenn nur 30 benutzt werden. CSV schreibt nur das, was gebraucht wird.

[Luckie]

Siehe oben, kein MS Office, kein Excel, kein Access. ;)

[Catbytes]

Zitat:

Zitat von Luckie

Siehe oben, kein MS Office, kein Excel, kein Access. ;)

:roll: Als ich den Beitrag schrieb, stand das noch gar nicht da :wink:

[Luckie]

Habe gerade gekuckt: Die OpenOffice tabellenkalkulation kann nur dbase dbf Dateien öffnen.

[dizzy]

Zitat:

Zitat von Catbytes

Zitat:

Zitat von dizzy

was macht Paradox so fett?

Vermutlich, daß in der Paradox-Datei ein String[40] eben 40 Zeichen belegt, auch wenn nur 30 benutzt werden. CSV schreibt nur das, was gebraucht wird.

Hui. Dann macht das hier einen Unterschied von satten 3.095kB aus. Das nenn ich ineffizient von Paradox :shock:

@Luckie: Ist denn überhaupt was auf'm Rechner? :stupid:

[Luckie]

Zitat:

Zitat von dizzy

@Luckie: Ist denn überhaupt was auf'm Rechner? :stupid:

Schlankes, rankes System: Windows 2000 (IE Outlook Express), Delphi, MSVS, PSDK, OpenOffice, PhotoFilter, IrfanView, FTP Client, HTML-Editor, Hex-Editor, mySQL-Server, TuneUp Utilities und Ad-aware.

[r_kerber]

Zitat:

Zitat von dizzy

Hui. Dann macht das hier einen Unterschied von satten 3.095kB aus. Das nenn ich ineffizient von Paradox

Das schaffst Du mit jeder (!!) Datenbank. Du mußt die Zeichenkettenfelder nur mit CHARACTER erstellen. Zum Platz sparen nimmt man dann VARCHAR. Wobei letzteres bei einigen Datenbanken auf 256 Zeichen begrenzt ist. :-(

[dizzy]

Jetzt wird mir auch der Unterschied CHAR <-> VARCHAR klar :D.

[Luckie]

War eine Jugendsünde. Mein erster Auftrag, von einen Bekannten. Waren glaube ich zwei Karten für die Dokumenta oder so. ;)

[merlin17]

mann, ist das lange her mit BDE und Paradox;
aber reizvoll war das Thema für die Mittagspause :lol:
(und am wochenende will ich es mal in C# probieren... )
)
-> incl. "CSV-Header" sprich db-felder....
ich nehme immer das '{' zeichen, ist in datenbank eher selten anzutreffen; ggf. ändern!

:-) thomas

__________________________________________________ _________

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  i, j: integer;
  s: string;
  theStringList: Tstringlist;
begin
  if Query1.State = dsInactive then
    showmessage('Bitte erst "Suche starten" durchführen')
  else
    begin
      Query1.disablecontrols;
      s := '';
      Query1.First;
      theStringList := TStringList.Create;
      with Query1 do
        begin
          s := '';
          for I := 1 to Query1.FieldList.Count - 1 do
            begin
              s := s + Query1.FieldList.Strings[I] + '{';
            end;
          theStringList.add(s);

          for j := 0 to (RecordCount - 1) do
            begin
              s := '';
              for i := 1 to (FieldCount - 1) do
                begin
                  if Length(Fields[i].AsString) < 1 then
                    s := s + ' ' + '{'
                  else
                    s := s + (Fields[i].AsString) + '{';
                end;
              theStringList.add(s);
              Next;
            end;
          Query1.enablecontrols;

          SaveDialog1.Title := 'Speichert die CSV in einen File';
          if SaveDialog1.Execute then
            theStringList.savetofile(SaveDialog1.Filename);
        end;
    end;
end;

[Luckie]

Wenn ich eine Delphi version hätte mit datenbankunterstützung (Query1), dann wäre das ganze ja auch kein Thema gewesen. ;)

[merlin17]

Luckie,

sorry... wer lesen kann, ist wahrscheinlich im Vorteil :oops:
-> das nächste mal werde ich genauer lesen :thumb:

:-) thomas