snowdream
11.10.2011, aktualisiert am 18.10.2012
view8633
view18
0
Goto Top

Mit batch string suchen und danach text einfügen

gelöstFrageEntwicklungBatch, Shell
Hallo zusammen, ich hoffe es hat einer eine Idee. Ich bin leider nicht so fit in der Programmierung, um dieses Problem selber lösen zu können.

Ich habe eine .txt mit folgendem Inhalt:

text1
text2
text3
;zyklischer Aufruf
text...
text...

Mit einer Batch möchte ich jetzt in der Datei suchen, und nach dem Suchstring einen Textblock einfügen, hier im Beispiel erst mal nur eine Zeile.
@echo off & setlocal 
set "Datei=C:\meine.txt"   
set "Suchen=;zyklischer Aufruf"   
set "Einfügen=neue Zeile mit einem Text"   
 
set "Bak=%temp%\txt.bak"   
move "%Datei%" %Bak%   
for /f "tokens=1* delims=:" %%i in ('findstr /n "^" %Bak%') do (set "Zeile=%%j" & call :ProcessLine)   
goto :eof 
 
:ProcessLine 
if not defined Zeile (>>"%Datei%" echo\ & goto :eof)   
if "%Zeile%" neq "%Suchen%" (>>"%Datei%" echo %Zeile% & goto :eof)   

>>"%Datei%" echo %Zeile%  
>>"%Datei%" echo %Einfügen%  
goto :eof
Diesen Code hab ich hier aus dem Forum, er funktioniert auch soweit ganz gut.
Aber: beginnt die Zeile in meine.txt mit einem "&", dann wird in der Datei diese Zeile gelöscht und dafür "Echo ist off." rein geschrieben.

Beispiel:
&text1
&text2
text3
;zyklischer Aufruf
text...
text...
ShareTeilen
Auf Facebook teilen Auf Twitter teilen Auf Reddit teilen Auf Linkedin teilen

Content-ID: 174475

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

Ausgedruckt am: 22.11.2024 um 10:11 Uhr

18 Kommentare
Neuester Kommentar
Goto Top
bastla
bastla 11.10.2011 um 21:41:06 Uhr
Goto Top
Hallo snowdream!
Diesen Code hab ich hier aus dem Forum
... wo er aber sicher etwas schöner war (was sich aber noch nachholen lässt face-wink) ...

Ich würde das eher so schreiben:
@echo off & setlocal
set "Datei=C:\meine.txt"  
set "Suchen=;zyklischer Aufruf"  
set "Einfügen=neue Zeile mit einem Text"  

set "Bak=%temp%\txt.bak"  
move "%Datei%" %Bak%  
for /f "tokens=1* delims=:" %%i in ('findstr /n "^" %Bak%') do (set "Zeile=%%j" & call :ProcessLine)  
goto :eof

:ProcessLine
(
    setlocal enabledelayedexpansion
    echo\!Zeile!
    if "%Zeile%"=="%Suchen%" echo %Einfügen%  
    endlocal
)>>"%Datei%"  

goto :eof
Grüße
bastla

[Edit] Korrektur für Ausgabe von Leerzeilen vorgenommen [/Edit]
snowdream
snowdream 12.10.2011 um 08:43:38 Uhr
Goto Top
Hallo Bastla,

besten Dank für deine Hilfe, läuft fast super. Allerdings wird, wenn Leerzeilen im Text vorhanden sind, zusätzlich immer eine Zeile mit "ECHO ist ausgeschaltet (OFF)." eingefügt.
Beispspie meine.txt:

 
&text1
&text2

text3
;zyklischer Aufruf
text4

text5
Kann man das auch noch unterdrücken?
Vielen Dank schon mal.
bastla
bastla 12.10.2011 um 10:38:05 Uhr
Goto Top
Hallo snowdream!
... zusätzlich immer eine Zeile mit "ECHO ist ausgeschaltet (OFF)." eingefügt.
Sollte nach der oben vorgenommenen Korrektur nicht mehr passieren ...

Grüße
bastla

P.S.: Danke für's Formatieren ... face-smile
jeb-the-batcher
jeb-the-batcher 12.10.2011 um 12:52:10 Uhr
Goto Top
Aber jetzt habe ich mit meinen Textdateien ein Problem

Zeile1
..\..\..\windows\system32\calc.exe Zeile2
Zeile3

Irgendwie wird Zeile2 nie ausgegeben, dafür startet jetzt der Taschenrechner face-wink

Aber nach tausch der Zeile 
echo\!Zeile!
durch 
echo(!Zeile!
klappt auch das wuncerbar

jeb
snowdream
snowdream 12.10.2011 um 14:05:48 Uhr
Goto Top
Hallo Bastla,

läuft jetzt perfekt mit der Testdatei. Danke nochmal.
Allerdings scheint es nicht wirklich mit jeder beliebigen Textdatei zu funktionieren, die bat bricht bei einigen Text-Dateien einfach ab.
Wie ich drauf komme? Ich habe den Part mit der Tempdatei abgeändert
von
set "Bak=%temp%\txt.bak"
nach
set "Bak=C:\txt.bak"
Vor dem letzen "goto :eof" in Zeile 19 lösche ich dann die temporäre Datei mit "del %bak%" wieder. Mit der Testdatei, wie weiter oben beschrieben, funktioniert alles, die Temp-Datei wird angelegt und auch wieder gelöscht. Bei meiner wirklich zu bearbeitenden Datei bricht die Batch einfach ab (läuft nicht bis zum Ende durch), da die txt.bak nicht gelöscht wird. Ich muss mal noch ein wenig probieren ob ich raus finden kann, an was das genau liegt. Das kann allerdings etwas dauern, da ich momentan wenig Zeit dafür habe.

Gruß
snowdream
bastla
bastla 12.10.2011 um 14:58:58 Uhr
Goto Top
Hallo snowdream!

Das "letzte" (hinsichtlich des Ablaufs) "goto :eof" befindet sich in Zeile 9!

Grüße
bastla
jeb-the-batcher
jeb-the-batcher 12.10.2011 um 15:09:45 Uhr
Goto Top
Hallo snodream,

versuch es mal mit einer leicht abgeänderten Variante.
Die Probleme können unter anderem vorher in der Zeile
if "%Zeile%"=="%Suchen%" echo %Einfügen%
auftreten, wenn z.B. in Zeile etwas in der Art
"Meins&Deins" & seins   

@echo off
setlocal DisableDelayedExpansion
set "Datei=C:\meine.txt"  
set "Suchen=;zyklischer Aufruf"  
set "Einfügen=neue Zeile mit einem Text"  

set "Bak=%temp%\txt.bak"  
move "%Datei%" %Bak%  
(
  for /f "tokens=1* delims=:" %%i in ('findstr /n "^" %Bak%') do (  
      setlocal enabledelayedexpansion
      set "Zeile=%%j"  
      (echo(!Zeile!)
      if "!Zeile!"=="!Suchen!" echo(!Einfügen!  
      endlocal
  )
) > "%Datei%"

jeb
snowdream
snowdream 12.10.2011 um 15:13:16 Uhr
Goto Top
Hallo bastla,

ich meinte es so:
@echo off & setlocal 
set "Datei=C:\meine.txt"   
set "Suchen=;zyklischer Aufruf"   
 
set "Bak=C:\txt.bak"   
move "%Datei%" %Bak%   
for /f "tokens=1* delims=:" %%i in ('findstr /n "^" %Bak%') do (set "Zeile=%%j" & call :ProcessLine)   
goto :eof 
 .
:ProcessLine 
( 
    setlocal enabledelayedexpansion 
    echo\!Zeile! 
    if "%Zeile%"=="%Suchen%" type c:\einfügen.txt  
    endlocal 
)>>"%Datei%"   
 
del %bak%
goto :eof

Statt dem "Echo %Einfügen%" soll alles aus "c:\einfügen.txt" eingefügt werden. Funktioniert auch, halt aber nur mit bestimmten Text-Dateien.

Gruß
snowdream
snowdream
snowdream 12.10.2011 um 15:57:25 Uhr
Goto Top
Hallo jeb,

das funktioniert mit meiner "Problem-Datei", Weltklasse!
Kannst du mir vielleicht noch verraten, wie ich den statt dem "echo(!Einfügen!" in Zeile 14 eine type-befehl einbinden kann => type c:\einfügen.txt ?

Gruß
snowdream
bastla
bastla 12.10.2011 um 16:45:59 Uhr
Goto Top
Hallo snowdream!

Abgesehen von der Tatsache, dass "del %bak%" weiterhin vor dem falschen "goto :eof" steht - gibt es ev einen Anhaltspunkt, was die Dateien, für die es nicht funktioniert, gemeinsam haben?

Grüße
bastla
jeb-the-batcher
jeb-the-batcher 12.10.2011 um 16:57:40 Uhr
Goto Top
Hallo snowdream,

Zitat von @snowdream:
Hallo jeb,

das funktioniert mit meiner "Problem-Datei", Weltklasse!
Kannst du mir vielleicht noch verraten, wie ich den statt dem "echo(!Einfügen!" in Zeile 14 eine type-befehl
einbinden kann => type c:\einfügen.txt ?

Ja, sollte eigentlich direkt so klappen

if "!Zeile!"=="!Suchen!" type einfügen.txt

Weil alles was innerhalb des Block ausgegeben wird, in die Zieldatei umgeleitet wird.

jeb
snowdream
snowdream 12.10.2011 um 16:59:16 Uhr
Goto Top
so läuft es jetzt perfekt:
@echo off 
setlocal DisableDelayedExpansion 
set "Datei=C:\meine.txt"   
set "Suchen=;zyklischer Aufruf"   
set "Einfügen=C:\einfügen.txt "   

del %temp% /f /q
set "Bak=%temp%\txt.bak"   
move "%Datei%" %Bak%   
( 
  for /f "tokens=1* delims=:" %%i in ('findstr /n "^" %Bak%') do (   
      setlocal enabledelayedexpansion 
      set "Zeile=%%j"   
      (echo(!Zeile!) 
      if "!Zeile!"=="!Suchen!" type %Einfügen%  
      endlocal 
  ) 
) > "%Datei%"

Danke an bastla & jeb für die schnelle Hilfe!
snowdream
snowdream 12.10.2011 um 17:03:04 Uhr
Goto Top
Zitat von @bastla:
Hallo snowdream!

Abgesehen von der Tatsache, dass "del %bak%" weiterhin vor dem falschen "goto :eof" steht - gibt es ev
einen Anhaltspunkt, was die Dateien, für die es nicht funktioniert, gemeinsam haben?

Grüße
bastla

nein, leider nicht...
snowdream
snowdream 17.10.2011 um 16:51:34 Uhr
Goto Top
Hallo nochmal,

hat vielleicht einer noch eine Lösung, wie ich den einzufügenden Text z.B. 2 Zeilen unter dem eigentlichen Suchstring (";zyklischer Aufruf"") einfügen kann.
Ich hab schon einiges an Syntax ausprobiert, bekomme es aber nicht hin face-sad

Gruß
snowdream
bastla
bastla 17.10.2011, aktualisiert am 18.10.2012 um 18:48:47 Uhr
Goto Top
Hallo snowdream!

Kann eigentlich der Suchstring auch mehrfach in der Datei vorkommen? Falls nein, würde ich eine Anleihe bei den Kollegen diesem Thread) nehmen und das so versuchen:
@echo off & setlocal DisableDelayedExpansion
set "Datei=C:\meine.txt"  
set "Suchen=;zyklischer Aufruf"  
set /a Versatz=2
set "Einf=C:\einfügen.txt"  

set "ZeilenNr="  
for /f "delims=:" %%i in ('findstr /n /c:"%Suchen%" "%Datei%"') do set /a ZeilenNr=%%i  
if not defined ZeilenNr (
    echo "%Suchen%" in "%Datei%" nicht gefunden!  
    goto :eof
)
set /a ZeilenNr+=Versatz

set "Bak=%temp%\txt.bak"  
move "%Datei%" %Bak%  
(
    for /l %%i in (1,1,%ZeilenNr%) do (
        set "Zeile="  
        set /p "Zeile="  
        setlocal enabledelayedexpansion
        echo(!Zeile!
        endlocal
    )
)<%Bak% >"%Datei%"  

>>"%Datei%" type "%Einf%"  
>>"%Datei%" more +%ZeilenNr% %Bak%
Kurzer Hinweis zur Zeile 19: Falls es nach der Zeile mit dem Suchtext weniger als %Versatz% Zeilen gibt, wird dadurch nicht die letzte gefundene Zeile mehrfach in die Zieldatei geschrieben, sondern die fehlenden Quellzeilen werden durch Leerzeilen ersetzt ...

Grüße
bastla
snowdream
snowdream 18.10.2011 um 07:42:46 Uhr
Goto Top
Zitat von @bastla:

Kann eigentlich der Suchstring auch mehrfach in der Datei vorkommen?

Hallo bastla, genau da liegt das Problem, den Suchstring gibt es zum Teil mehrmals. Hier ein Beispiel:

Text1
gleicher_Text
Suchstring
Text2
gleicher_Text
Suchstring
Text3
Text4

Ich möchte jetzt nur nach dem 1. Suchstring einfügen, also vor Text3. Mein Ansatz ist gewesen, in diesem Fall nach Text1 zu suchen und dann einfach 2 Zeilen danach einzufügen.
Ja, das hätte ich etwas besser beschreiben sollen! Somit funktioniert dein Codebeispiel nicht, wenn ich das richtig verstanden habe.

Gruß
snowdream
bastla
bastla 18.10.2011 um 12:32:25 Uhr
Goto Top
Hallo snowdream!

Versuch es mit folgender Zeile 8:
for /f "delims=:" %%i in ('findstr /n /c:"%Suchen%" "%Datei%"') do if not defined ZeilenNr set /a ZeilenNr=%%i
Grüße
bastla
snowdream
snowdream 18.10.2011 um 13:52:06 Uhr
Goto Top
Hallo bastla,

was soll ich sagen... perfekt! Weltklase!

Gruß
snowdream
gelöstFrageEntwicklungBatch, Shell
Mehr von snowdreamsnowdreamSuchen und Ersetzen mit Sonderzeichensnowdream - 6 KommentaresnowdreamZeichenkette variable kürzensnowdream - 2 KommentaresnowdreamAb einer beliebigen Verzeichnisebene Dateien inklusive Dateien in Unterverzeichnisssen kopierensnowdream - 5 KommentaresnowdreamVariable mit Sonderzeichen über ECHO ausgebensnowdream - 3 Kommentare
Heiß diskutiert
superfun2k24Sophos SFOS 20 DNAT funktioniert nichtsuperfun2k24 - 26 Kommentareuser217Kaufberatung Hardware - Hyper-V Cluster 3 Nodesuser217 - 25 KommentarePharaunIntel-E810 QSFP28 to Mikrotik QSPF+ mit 40Gbit VerbindungPharaun - 23 KommentarecseLaufwege erfassen in großer Hallecse - 20 Kommentareprplemk2Testumgebung bauen (Grundlegend)prplemk2 - 19 KommentareaufdemmarsHP Z620 USB hat kein Strom beim Startenaufdemmars - 17 KommentareTJ.Hooker74Dom.Admin-Passwort ändern - Auswirkungen auf EX, HCW, AADCTJ.Hooker74 - 14 KommentareUnluckyProccess1999Creo 4.0 Lizenz Server (LMTOOLS)UnluckyProccess1999 - 13 KommentareJudgelgZertifikate in die Exchange Online GAL hochladenJudgelg - 13 KommentaremaisenkaiserSwitch ohne STP ins Netzwerkmaisenkaiser - 13 KommentareadmtechEntwicklertagebuch: Release 6.4 - Filteradmtech - 13 KommentareleberkaeseFB7590 ISDN Fax-Funktionleberkaese - 12 Kommentare