txt Dateien in einder kopieren

taucher_2006

hi, :weinen:

ich muss nochmal ein Frage los werden. Momentan löse ich das Problem so.

Spoiler anzeigen

[autoit]

Run("cmd.exe")
Sleep(500)
send('cd\{enter}')
Sleep(500)
Send('cd Datensicherung {enter}')
Sleep(1000)
Send("copy /b *.txt test_"&@MDAY&@MON&@YEAR&".txt{Enter}")
Sleep(12000)
Send("Exit{Enter}")
Exit

[/autoit]

Da es sich hier um eine ständige (edit) wechselnde (edit) Anzahl von txt mit identischen Satzaufbau handelt. Hier im Forum wurde schon so etwas behandelt aber mit zwei Dateien. Da es mehr sind kann ich es nicht recht einsetzen. Auch habe ich mit _FileReadToArray getestet bin aber an der Stelle gescheitert das ich nicht wildcard einlesen konnnte.
Vielleicht habt Ihr ja nen tip wie es geht.

Taucher :irre:

**Xenobiologist**

HI,

verstehe ich nicht. Kannst du nicht _FileListToArray mit *.txt machen und dann alle durchgehen?

Oder verstehe ich dich falsch?

So long,

Mega

taucher_2006

hi,

ja das habe ich auch gemacht,

Spoiler anzeigen

[autoit]

#Include <File.au3>
#Include <Array.au3>
$FileList= _FilelistToArray("c:\datensicherung\", "*.txt")
$RPfad="C:\GLI_Prod\12 2006\" &@MDAY&"."&@MON &"."& @YEAR&".txt"
If @Error=1 Then
MsgBox (0,"","No Files\Folders Found.")
Exit
EndIf
_ArrayDisplay($FileList,"$FileList")
_FileWriteFromArray($filelist,$RPfad,1,0)

[/autoit]

vielleicht stelle ich es mir auch zu einfach vor. hier kopiert er nur die dateinamen in einander.

taucher

**BugFix**

Sry, aber du hast noch immer nicht geschrieben WAS als Ergebnis herauskommen soll??

**Xenobiologist**

Hi,

geht mir auch so. Warum können die Leute nicht einfach etwas mehr in ihren ersten Post investieren, sodass klar ist:

Ist-Situation

Soll-Situation

Skript für den Weg ...

So long,

Mega

P.S.: Ist jetzt nichts gegen dich Taucher!!!!!!!!!

taucher_2006

hi,

ergebinss soll sein das aus einzeldateien die in ein crm system gelesen werden eine gemacht wird, damit das einleseprogramm einmal bedient wird.

@meger

ist-situation z.b. 10 txt gleicher satzaufbau
soll-situation 1txt datei.
meine versuche habe ich ja geschrieben.

ich kann dich verstehen das ich manchmal wirres zeug von mir geb und du(ihr) meine(unser) gedanken lesen müsst.(glaskugel wäre manchmal hilfreich ;-))
taucher

**BugFix**

Erneut etwas raten:
Gesamten Inhalt von $anzahl Dateien in eine Zieldatei schreiben?

**Xenobiologist**

Hi,

erster Versuch

[autoit]

;Mehrere Txt Files zu einer machen.

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

#Include <File.au3>
#Include <Array.au3>

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

Global $FileList = _FileListToArray(@ScriptDir, "*.txt", 1)
_ArrayDisplay($FileList, "")

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

Global $sammlung = FileOpen(@ScriptDir & "\sammlung.txt", 1)

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

For $i = 1 To UBound($FileList) - 1
FileWrite($sammlung, FileRead(FileOpen(@ScriptDir & "\" & $FileList[$i], 0)))
Next

[/autoit]

So long,

Mega

taucher_2006

hi,

ja alle zusammen ohne satzaufbauänderung. das macht ja auch der dos befehl.

taucher

taucher_2006

hi,
@meger
danke funzt habe einfacher gedacht und wurde eines bessern belehrt.

:stolz_bin: :keks:

Taucher

**Xenobiologist**

Hi,

kein Problem. *mampf Keks*

Wie hattest du denn gedacht?

1. Quellen identifizieren
2. Quellen lesen
3. Sammlung schreiben ?

So long,

Mega

taucher_2006

hi,

nach langem muss ich das Script nochmals etwas anpassen und habe irgendwie ein Brett vor dem Kopf.
Ausgangsdatei z.b. so
1
2
3
und
4
5
6
Enddatei
1
2
34 ==> hier das Problem
5
wie bekommt man hier einen einmaligen Zeilenumbruch hin? Aber bitte nicht gleich schlagen!!!!

Taucher

**Xenobiologist**

Hi,

in dem du einen Zeilenumbruch mit z.B. @CRLF schreibst.

So long,

Mega

taucher_2006

hi,
danke hatte ein Zeichen vergessen
Taucher

**Xenobiologist**

Hi,

komisches Problem. Naja, hauptsache du hast die Lösung.

So long,

Mega