DOC-Datei in CSV-Datei umwandeln

[horsthorn]

Die Aufgabe:
Eine DOC-Datei in einem Listview anzeigen.
Die DOC-Datei hat immer die gleichen Spalten.
Habe folgendes gemacht:
Die DOC-Datei in einen Editor geladen und hier dann als TXT-Datei OHNE Formatierungen gespeichert.
Danach mit diesem Code in eine CSV-Datei umgeschrieben:

DECLARE text$,text$[9],tt$,lang%,I%
tt$="|"
I%=1
WINDOW 0,0-%MaxX,%MaxY

ASSIGN #2,"dvd_liste.csv"
REWRITE #2
ASSIGN #1,"dvd_liste.txt"
RESET #1
WHILENOT EOF(#1)
WHILELOOP 1,9
INPUT #1,text$[I%]
lang%=LEN(text$[1])
Case lang% < 7:text$[1]=MKSTR$(" ",(7-lang%))+text$[1]' Muss sein wegen der Optik
text$=text$[1]+tt$+text$[2]+tt$+text$[3]+tt$+text$[4]+tt$+text$[5]+tt$+text$[6]+tt$+text$[7]+tt$+text$[8]+tt$+text$[9]
INC I%
ENDWHILE
PRINT #2,text$
I%=1
ENDWHILE
CLOSE #1
CLOSE #2
WAITINPUT
END

ES funktioniert Aber vielleicht gibt es noch eine elegantere Lösung. Für Tipps bin ich dankbar

[ram]

Du hättest sie auch im WORD als txt speichern können und dann die Endung ändern. Oder die Daten ins Excel kopieren und dann dort direkt als CSV speichern.

[horsthorn]

Zitat von ram

Du hättest sie auch im WORD als txt speichern können und dann die Endung ändern. Oder die Daten ins Excel kopieren und dann dort direkt als CSV speichern.

Das erste hab ich ja gemacht. Musste nicht WORD sein. Geht auch mit OO.
Zum zweiten: Nicht jeder hat EXCEL (will das Monster auch nicht) und wenn du eine DOC-Datei ohne Formatierung als TXT-Datei speicherst, stehen die Einträge alle für sich einzeln in einer Zeile.
Das kann ich für eine CSV-Datei nich brauchen. Daher mein kleiner Code. Der schreibt immer einen DOC-Satz in das CSV-Format, also einen Textstring. Die einzelnen Einträge hier getrennt durch |
Vielleicht kommt ja noch ein Tipp

[Frabbing]

Mit OO direkt als CVS abspeichern?
Wie speichere ich meine Tabellendaten als Text(csv)-Datei ab) - OpenOffice.org Wiki

[horsthorn]

@Frank
Leider ist in meinem OO (3.2.1) das Dateiformat Text(CSV) (.csv) nicht wählbar !
Das DOC-Dokument sieht so aus: (Nur ein Teil. Im ganzen über 1700 Einträge)



...und so sieht es nach meiner "Konvertierung" und Ergänzung aus:
Der letzte Eintrag "Inhalt" startet mit Doppelklick die eingetragenen Datei mit WINEXEC...

[Frabbing]

Öffne mal den OO-Calc, nicht den OO-Writer. OpenOffice besteht ja auch aus mehreren Programmen...

[horsthorn]

Zitat von Frabbing

Öffne mal den OO-Calc, nicht den OO-Writer. OpenOffice besteht ja auch aus mehreren Programmen...

Weiss ich mein Freund.
Wenn ich mit Calc öffne und lade dann die DOC-Datei, schaltet OO um, damit die vorhergehenden Posting gezeigte Anzeige möglich ist.
Der Weg über die nichtformatierte TXT-Datei und dann mit meinem kleinen Tool "konvertieren" scheint mir der beste.
"schulterklopf"