superboh
Goto Top

Aus allen Text-Dateien in einem Verzeichnis die erste Zeile auslesen

Hallo zusammen,

irgendwie stehe ich momentan total auf dem Schlauch ...
In einem Verzeichnis habe ich einige Textdateien mit der Endung .pab und möchte nun von allen Dateien die jeweils erste Zeile in einer extra Datei zusammenfassen.

Mit zwei Batchdateien bekomme ich es hin, aber ich schaffe es nicht, aus den beiden eine Batch zu machen face-sad

@echo off
if exist _inhalt.txt del _inhalt.txt
for /f %%i in ('dir /b *.pab') do call erstezeile.cmd %%i  
Dieses Script ruft nun für jede Datei im Verzeichnis das zweite Script auf:


@echo off
Setlocal
for /F "delims=" %%i in (%1) do if not defined zeile set "zeile=%%i"  
echo %zeile% >> _inhalt.txt

Wie bekomme ich diese beiden Batches zu einer zusammen?

Danke,
Thomas

Content-Key: 55997

Url: https://administrator.de/contentid/55997

Printed on: April 26, 2024 at 02:04 o'clock

Member: bastla
bastla Apr 05, 2007 at 22:02:44 (UTC)
Goto Top
Hallo superboh!

Im Prinzip brauchst Du nur die zweite Batchdatei an die erste anzufügen und einen internen "call" durchführen:
@echo off & setlocal
if exist _inhalt.txt del _inhalt.txt
for /f "delims=" %%i in ('dir /b *.pab') do call :erstezeile "%%i"  
goto :eof
:erstezeile
set zeile=
for /f "delims=" %%i in ('type %1') do if not defined zeile set "zeile=%%i"  
echo %zeile% >> _inhalt.txt
Sollte ein Dateiname Leerstellen enthalten, sorgen das zusätzliche "delims=" und die Anführungszeichen bei der ersten "for"-Schleife für eine korrekte Übergabe an das Unterprogramm, wo der Inhalt der Datei mittels "type" zeilenweise ausgegeben wird.

Grüße
bastla
Member: Biber
Biber Apr 06, 2007 at 11:54:13 (UTC)
Goto Top
Moin superboh,

ist zwar schon als gelöst markiert, aber als Alternative noch dieser Halbliner:
findstr /n . *.pab|findstr /i /C:"pab:1:"  

Grüße
Biber
[Edit] Jepp...und dann den unerwünschten Teil der Zeilen mit einer FOR /F-Anweisung entsorgen wie unten von bastla gepostet. Wortwörtlich sozusagen.
Hatte ich einfach vergessen zu erwähnen... Thx bastla.
[/Edit]
Member: bastla
bastla Apr 06, 2007 at 13:35:12 (UTC)
Goto Top
... oder als Oneliner vom Prompt:
for /f "tokens=2* delims=:" %i in ('findstr /n . *.pab^|findstr /i /C:"pab:1:"') do echo %j  

Grüße
bastla