Aufbereitung von Dateien verbessern

Anfängerfragen zum Programmieren mit PureBasic.
Wolfvater Loki
Beiträge: 53
Registriert: 22.05.2022 15:37

Aufbereitung von Dateien verbessern

Beitrag von Wolfvater Loki »

Hallo PB-Team,

ich brauche wieder Hilfe. Ich möchte eine große Datei speichern, welche Daten aus zwei anderen Dateien bezieht. Ich habe folgenden Code verwendet:

Code: Alles auswählen

CreateFile(0,"YGO-Kartensammlung (gegliedert, eigene Karten, Ultimativ).txt")

OpenFile(1,"YGO-Kartensammlung (ungegliedert, eigene Karten, Ultimativ).txt")
reading$ = ReadString(1)

OpenFile(2,"YGO-Kartensammlung (eigene Karten, Ultimativ).txt")
lesen$ = ReadString(2)

Repeat
  lesen$ = ReadString(2)
  reading$ = ReadString(1)
  For i = 1 To 13
    titel$ = StringField(reading$,i,";")
    datenderkarten$ = StringField(lesen$,i,";")
  Next
  WriteStringN(0,titel$+";"+datenderkarten$)
Until Eof(1) And Eof(2)

CloseFile(0)
CloseFile(1)
CloseFile(2)
Bitte erklärt mir, was ich falsch gemacht habe. Ich war kurz vorm verzweifeln deswegen. Außerdem habe ich noch die Dateien per Download-Link mitgeschickt, falls sich jemand die Dateien ansehen will:
https://workupload.com/file/bXF6BRxuxYm.
Wolfvater Loki
Er wünscht euch schöne Grüße.
Benutzeravatar
mk-soft
Beiträge: 3845
Registriert: 24.11.2004 13:12
Wohnort: Germany

Re: Aufbereitung von Dateien verbessern

Beitrag von mk-soft »

Ich weiss nicht was du vor hast, aber du liest und schreibst nur immer die letzte Spalte.

Code: Alles auswählen

CreateFile(0,"YGO-Kartensammlung (gegliedert, eigene Karten, Ultimativ).txt")

OpenFile(1,"YGO-Kartensammlung (ungegliedert, eigene Karten, Ultimativ).txt")
reading$ = ReadString(1)

OpenFile(2,"YGO-Kartensammlung (eigene Karten, Ultimativ).txt")
lesen$ = ReadString(2)

Repeat
  lesen$ = ReadString(2)
  reading$ = ReadString(1)
  For i = 1 To 13
    titel$ = StringField(reading$,i,";")
    datenderkarten$ = StringField(lesen$,i,";")
    WriteStringN(0,titel$+";"+datenderkarten$)
  Next
  ;WriteStringN(0,titel$+";"+datenderkarten$)
Until Eof(1) And Eof(2)

CloseFile(0)
CloseFile(1)
CloseFile(2)
Alles ist möglich, fragt sich nur wie...
Projekte ThreadToGUI / EventDesigner V3 / OOP-BaseClass-Modul
Downloads auf MyWebspace / OneDrive
Nino
Beiträge: 1300
Registriert: 13.05.2010 09:26
Wohnort: Berlin

Re: Aufbereitung von Dateien verbessern

Beitrag von Nino »

Wolfvater Loki hat geschrieben: Hallo PB-Team,
Hier liest und schreibt außer dir nicht nur das PB-Team (das sind v.a. Fred, Freak, Andre), sondern hauptsächlich andere PB-Benutzer.
Wolfvater Loki hat geschrieben: Ich habe folgenden Code verwendet:
Bitte benutze in den Codes die du hier im Forum postest immer am Anfang EnableExplicit. Ansonsten kann allein schon ein Tippfehler z.B. in einem Variablen-Namen die Ursache des betr. Problems sein. Du möchtest nicht, dass wir unsere Zeit damit verbringen deine Tippfehler zu finden, oder?
Wolfvater Loki hat geschrieben: Bitte erklärt mir, was ich falsch gemacht habe.
Woher sollen wir das wissen?
Ein Fehler ist immer eine Diskrepanz zwischen einem Soll- und einem Ist-Zustand.
Du hast überhaupt nicht geschrieben, was der Code überhaupt machen soll.

Hier ist ein funktionierendes „Gerüst“ zum Verschmelzen zweier Textdateien. Ich empfehle, dass du das verwendest und entspr. Anpassungen vornimmst, damit der Code den von dir gewünschten Zweck erfüllt.
Wolfvater Loki
Beiträge: 53
Registriert: 22.05.2022 15:37

Re: Aufbereitung von Dateien verbessern

Beitrag von Wolfvater Loki »

Danke für die Hilfe. Ihr habt mir sehr geholfen.
Wolfvater Loki
Er wünscht euch schöne Grüße.
Antworten