| Autor |
Beitrag |
NoEon
Beiträge: 138
win9x, win 2000, win xp, linux 8.0
|
Verfasst: Di 19.08.03 16:20
Hallo ich bin neu auf diesem Gebiet und hab da keine AHnung von..n
ichhab zwar n dicken Wälzer (assign, Reset und ReadLn etc...) Aber das nuetz mir nichts.
Kann das nichta cuh über eine SQL abfrage funktionieren?
Hölle drei dumme Datensätze zeilenweise auslesen und in eine CSV Datei schreiben und demnach mit semikolohn trennen.
die Datei soll stamm.dat heissen wenn das ghet, kann mir dad jemand mal unter die Armegreifen
Ich habe die Frage unter Datenbanken ähnlich gestellt also bitte, ich soltle doch lieber hier posten wenn es um sowas geht und das mache ich jetzt auch.
Wer hilft mir auch den rechten weg?
Danke
Gruss
Lars
|
|
MSCH
Beiträge: 1448
Erhaltene Danke: 3
W7 64
XE2, SQL, DevExpress, DevArt, Oracle, SQLServer
|
Verfasst: Di 19.08.03 21:25
schreib doch bitte einfach mal was du genau für ein Problem hast und welches Ergebnis du möchtest.
Stichwort z.b. welche SQL Datenbank ?
grez
msch
|
|
NoEon 
Beiträge: 138
win9x, win 2000, win xp, linux 8.0
|
Verfasst: Mi 20.08.03 08:52
ich versuch es...
ich habe eine Datenbank, wie oben schon erwähnt in der vorliegenden Struktur.
Mein Problem ich weiss nicht wie ich die oben angesprochenen Teile in eine CSV Datei exportiert bekomme, da sist alles.
Die Datenbank ist ne Paradox Datenbank (unter Delphi)
Das ist auch schon alles!
das soll dann in der csv datei alles schön untereinander sein
bc;beschreibung;preis
.
.
.
usw.
wie gesagt ich weiss nicht wie das gemacht wird!!!
mfg
lars
|
|
kiwicht
Beiträge: 1021
Win 7, MacOS
Delphi x, VBA, PHP, ...
|
Verfasst: Mo 25.08.03 18:05
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
| var
f: Textfile;
Ziel, Datensatz : String;
begin
if SaveDialog1.Execute then begin
Ziel := SaveDialog1.FileName;
Datensatz := EditFeld1.Text + ',' +
EditFeld2.Text + ',' +
EditFeldx.Text;
AssignFile(f, Ziel);
try
if FileExists(Ziel) = False then begin
Rewrite(f);
Writeln(f,'"FELDNAME1","FELDNAME2","FELDNAMEx"');
end else begin
Reset(f);
Append(f);
end;
Writeln(f, Datensatz);
finally
CloseFile(f);
end; |
Anstatt die Daten aus den EditFeldern zu holen, kannst du sie auch direkt aus der Query oder was auch immer holen. Das sei dir überlassen!
mfG
|
|
Logi5
Beiträge: 20
|
Verfasst: Di 26.08.03 11:11
Vorsicht bei dieser Variante, wenn die Werte zusammengenommen mehr als 255 Zeichen ergeben!
Logi5
|
|
MSCH
Beiträge: 1448
Erhaltene Danke: 3
W7 64
XE2, SQL, DevExpress, DevArt, Oracle, SQLServer
|
Verfasst: Di 26.08.03 13:41
warum? Da kein ShortString kann der durchaus größer sein.
grez
msch
_________________ ist das politisch, wenn ich linksdrehenden Joghurt haben möchte?
|
|
|
