Einzelnen Beitrag anzeigen

Benutzerbild von IBExpert
IBExpert
Online

Registriert seit: 15. Mär 2005
679 Beiträge
 
FreePascal / Lazarus
 
#5

AW: Firebird-DB -> Tabellen nach CSV exportieren

  Alt 24. Jul 2013, 17:24
solltest du ein IBExpert als Vollversion haben, dann geht das mit folgendem Code
im SQL Editor (D:\t\ ist hier nur standardpfad, den am besten anpassen).

Code:
execute ibeblock
as
begin
    for
    select trim(rdb$relations.rdb$relation_name)
    from rdb$relations
    where rdb$relations.rdb$relation_name not containing '$'
    into :tn
    do
    begin
      script='execute ibeblock
              as
              begin
                select * from '||:tn||' order by id as dataset MyDataset;
                ibec_ds_Export(MyDataset,__etCSV,''D:\t\'||:tn||'.csv'',''QuoteChar'');
                close dataset MyDataset;
              end';
      ibec_ExecSQLScript(ibec_GetDefaultConnection, script,'',nil);
    end
end
liesse sich mit ibescript.exe auch per Kommandozeile machen

Wichtig: Blobs lässt der weg, die machen im csv aber auch keinen sinn
Holger Klemt
www.ibexpert.com - IBExpert GmbH
Oldenburger Str 233 - 26203 Wardenburg - Germany
IBExpert and Firebird Power Workshops jederzeit auch als Firmenschulung
  Mit Zitat antworten Zitat