3. Txt dateien zusammen in 1. ini schreiben

noise

Hallo!

Ich stehe leider vor einen Problem und weiß leider nicht wie ich es lösen soll.

Es stehen drei Txt dateien zu verfügung, mit jeweils z.b. 5 einträgen.

datei1.txt

Code

Name1 
Name2 
Name3 
usw....

datei2.txt

Code

Nachname1 
Nachname2 
Nachname3 
usw...

datei3.txt

Code

Straße1 
straße2 
straße3 
usw...

Am ende sollen das alles so in einer Ini aussehen:

Code

Name1 - Nachname1 
Straße1 
Name2 - Nachname2 
Straße2 
usw....

Ich weiß leider nicht wie ich das umsetzen kann.

Vielen dank falls mir jemand Hilft!

Gruß Noise

**Schnitzel**

mit _FileReadToArray und iniwrite ist das doch schnell gemacht.

falls du noch hilfe brauchst meld dich^^

**BugFix**

Code

Name1 - Nachname1
Straße1 
Name2 - Nachname2
Straße2 
usw....

Das ist aber kein INI-Format.
Eine INI sieht so aus:

Code

[section]
key=value

Könnte bei dir etwa so aussehen:

Code

[adressen]
id=name,vorname,strasse_nr,plz,ort

ID deshalb, weil über Name+... keine eineindeutige Identifizierung gesichert ist. Ich hatte schon mal zwei Klaus Müller unter derselben Adresse und auch noch demselben Geburtstag. Sowas kommt häufiger vor als man denkt.

Wenn es mehr Daten werden solltest du evtl. über den Einsatz von SQLite nachdenken.

Beitrag # 4.444

Jam00

Ich sehen schon in der Zeit wo ich das script geschreiben hab hat BugFix schon was gepostete, aber ich poste es trozdem

Spoiler anzeigen

[autoit]

$Namen = StringSplit (FileRead(@ScriptDir & "\Namen.txt"),@CRLF)
$Nachnamen = StringSplit (FileRead(@ScriptDir & "\Nachnamen.txt"),@CRLF)
$Strassen = StringSplit (FileRead(@ScriptDir & "\Strassen.txt"),@CRLF)
If $Namen[0] <> $Nachnamen[0] Or $Namen[0] <> $Strassen[0] Or $Nachnamen[0] <> $Strassen[0] Then
If MsgBox (52,"Error","Die Dateien Stimmen nicht überein, dass kann zu einem Programmabsturz und fehlern in der Zusammenfassung hervorrufen!" & @CRLF & "Wollen sie Trozdem fortfahren?") = 7 Then Exit
EndIf
For $1 = 1 To $Namen[0]
FileWrite (@ScriptDir & "\Kontackte.txt",$Namen[$1] & " - " & $Nachnamen[$1] & @CRLF & $Strassen[$1])
Next
Exit MsgBox (64,"Fertig","Die Dateien wurden erfolgreich zusammengefasst")

[/autoit]

**Schnitzel**

hab auch n beispiel gemacht

[autoit]

#include <file.au3>
Global $datei1, $datei2, $datei3

[/autoit][autoit][/autoit][autoit]

_FileReadToArray(FileOpenDialog('Pfad zur 1. Datei (Name)', @DesktopDir, 'Textdateien (*.txt)'), $datei1)
_FileReadToArray(FileOpenDialog('Pfad zur 2. Datei (Nachname)', @DesktopDir, 'Textdateien (*.txt)'), $datei2)
_FileReadToArray(FileOpenDialog('Pfad zur 3. Datei (Adresse)', @DesktopDir, 'Textdateien (*.txt)'), $datei3)

[/autoit][autoit][/autoit][autoit]

For $counter = 1 To $datei1[0]
IniWrite( @ScriptDir & '\Meineini.ini', 'ID:' & $counter, 'Name', $datei1[$counter])
IniWrite( @ScriptDir & '\Meineini.ini', 'ID:' & $counter, 'Nachname', $datei2[$counter])
IniWrite( @ScriptDir & '\Meineini.ini', 'ID:' & $counter, 'Adresse', $datei3[$counter])
Next

[/autoit][autoit][/autoit][autoit]

MsgBox(0, '', 'Fertig')

[/autoit]

Is jetz n beispiel mit ner ini.
Aber wir BugFix schon sagte: Ini-Dateien sind anders formatiert als dein beispiel

nuts

Das ist so etwas riskant, da z.B. Adressen fehlen können und man somit unterschiedliche Arraygrößen hat.
Abhilfe: 3 Schleifen oder ein 2D-Array daraus machen oder was ganz anders (eigene : _Filesreadtoarray usw.)

**Schnitzel**

Zitat

Das ist so etwas riskant, da z.B. Adressen fehlen können und man somit unterschiedliche Arraygrößen hat.
Abhilfe: 3 Schleifen oder ein 2D-Array daraus machen oder was ganz anders (eigene : _Filesreadtoarray usw.)

hm ja mir ist das schon klar. ich wollte ja auch nur einen ansatz geben. das das ganze sehr riskant ist gibt sich ja schon an der tatsache dass es 3 einfache textfiles sind. 1 leerzeile oder eine versehn gelöschte zeile schmeisst alles durcheinander....

die dateilängen könnte man ja auch ganz einfach vergleichen...
aber wie gesagt, das ganze is ja nur n ansatz

noise

Hallo !

Danke für die vielen Bsp. und auch Hinweise. Das mit der Aufteilung der Ini ist mir bekannt, dann müsste ich das anders umsetzen bzw. als andere Dateiendung abspeichern.

Vielen Dank nochmal!!