webbudda
Goto Top

batch, string finden und erstezen

Hallo,

ich habe leider wenig ahnung von batches. ich habe eine datei, in welcher ich einen string bearbeiten möchte.

im original steht in der datei in einer zeile:
eintrag_name 4711

zwischen "eintrag_name" und dem entsprechenden value (4711) ist eine unbestimmte anzahl leerzeichen. Ich möchte diesen string in der datei finden und den value verändern (0815). leider bekomme ich das per batch nicht hin. kann mir jemand helfen?

wäre sehr sehr dankbar, habe schon viel ausprobiert, was ich hier gefunden habe. ohne erfolg.

Content-Key: 106158

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

Printed on: May 11, 2024 at 02:05 o'clock

Member: Turrex0100
Turrex0100 Jan 15, 2009 at 13:46:24 (UTC)
Goto Top
du möchtest also die zeichen 4711 durch 0215 in der datei austauschen?
Member: webbudda
webbudda Jan 15, 2009 at 13:48:05 (UTC)
Goto Top
ja richtig, sofern die 0815 da noch nicht steht.
möglich wäre aber eventuell auch, dass anstatt 4711 da eine 4710 stehen könnte. am besten die ganze zeile löschen und (möglichst an der stelle) ersetzen.
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 13:50:02 (UTC)
Goto Top
also mit batch ist das glaube ich nicht möglich du kannst jedoch ein temporäres vbs script in eine bat datei stecken
ich bastel dir ebend ein script zusammen....
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 13:53:33 (UTC)
Goto Top
@echo off & setlocal

set "Datei=C:\Dokumente und Einstellungen\text.txt"

set "Von=&&"

set "Nach=>"

set R=%temp%ReplaceInFile.vbs

%R% echo Set fso=CreateObject("Scripting.FileSystemObject"):Set a=WScript.Arguments:T=fso.OpenTextFile(a(0)).ReadAll:fso.CreateTextFile(a(0)).Write Replace(T,a(1),a(2))

cscript //nologo %R% "%Datei%" "%Von%" "%Nach%"


das musst du in eine bat datei stecken und die werte für dich ändern sollte dann klappen

lg Turrex
Member: webbudda
webbudda Jan 15, 2009 at 13:58:56 (UTC)
Goto Top
ehm erstmal natürlich besten dank. welche werte meinst du jetzt.
set "Von=4711"

set "Nach=0815"

? würde heissen ich hätte bei 4710 den wert nicht ersetzt?
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 14:03:07 (UTC)
Goto Top
genau,
du willst ja "von" 4711 "nach" 0215
ändern.

Allerdings: Das programm funktioniert nur, wenn in der datei der "von" wert steht

lg turrex
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 14:05:24 (UTC)
Goto Top
du kannst aber das script so aufbauen:


set "Datei=C:\Dokumente und Einstellungen\text.txt"
set "Von=3000"
set "Nach=1000"
:start
set R=%temp%ReplaceInFile.vbs
%R% echo Set fso=CreateObject("Scripting.FileSystemObject"):Set a=WScript.Arguments:T=fso.OpenTextFile(a(0)).ReadAll:fso.CreateTextFile(a(0)).Write Replace(T,a(1),a(2))
cscript //nologo %R% "%Datei%" "%Von%" "%Nach%"
cls
set "Von=4000"
set "Nach=0000"
goto :start
Member: webbudda
webbudda Jan 15, 2009 at 14:12:06 (UTC)
Goto Top
ok super, danke erstmal.
ich kann leider nicht davon ausgehen, dass ein bestimmter wert darin steht bzw kenne ich diesen nicht. muss nur sicherstellen, dass nach dem batch der neue drin steht...
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 14:20:44 (UTC)
Goto Top
naja ich hoffe erstmal das ich dir helfen konnte...

lg
Member: bastla
bastla Jan 15, 2009 at 15:28:17 (UTC)
Goto Top
@Turrex0100
Du bist ja ein richtiger Bastler ... face-wink

Grüße
bastla
Member: bastla
bastla Jan 15, 2009 at 15:31:49 (UTC)
Goto Top
Hallo webbudda und willkommen im Forum!
ich kann leider nicht davon ausgehen, dass ein bestimmter wert darin steht bzw kenne ich diesen nicht.
Lässt sich demnach das Problem so formulieren: "Ändere in allen Zeilen, die mit "eintrag_name" beginnen, die letzten 4 Stellen auf einen vorgegebenen Wert"?

Grüße
bastla
Member: webbudda
webbudda Jan 15, 2009 at 15:43:44 (UTC)
Goto Top
naja fast nech, würde da 123 stehen, die letzten 3 zeichen. ist halt schwierig.
Member: Turrex0100
Turrex0100 Jan 15, 2009 at 16:30:19 (UTC)
Goto Top
ich versuche nur zu helfen bin allerdings selbst ein neuling...

lg turrex
Member: bastla
bastla Jan 15, 2009 at 16:47:29 (UTC)
Goto Top
Hallo webbudda!

Wie sieht's mit folgender Formulierung aus: "Ändere in allen Zeilen, die mit "eintrag_name" beginnen, alles nach dem letzten Leerzeichen auf den vorgegebenen Wert"?

Grüße
bastla
Member: webbudda
webbudda Jan 15, 2009 at 19:28:33 (UTC)
Goto Top
ja so kann man es auch formulieren.
Member: bastla
bastla Jan 15, 2009 at 21:30:42 (UTC)
Goto Top
Hallo webbudda!

Dann könnte das etwa so gehen:
@echo off & setlocal
set "Datei=D:\Textdatei.txt"  
set "Suche=eintrag_name"  
set "Neu=0815"  

set R=%temp%\ReplaceInFile.vbs
> %R% echo Set fso=CreateObject("Scripting.FileSystemObject"):T=Split(fso.OpenTextFile("%Datei%").ReadAll,vbCrLF):N="%Neu%"  
>>%R% echo S="%Suche%":L=Len(S):For Each Z In T:If Left(Z,L)=S Then If InStrRev(Z," ")^>0 Then Z=Left(Z,InStrRev(Z," "))^&N  
>>%R% echo A=A^&vbCrLF^&Z:Next:fso.CreateTextFile("%Datei%",True).Write Mid(A,3)  

cscript //nologo %R%
Gesucht wird nach "eintrag_name" entsprechend der exakten Schreibweise (mit Berücksichtigung von Groß- und Kleinschreibung), und die Ersetzung erfolgt "in" der Datei (ohne Erstellung einer Sicherungskopie).

Grüße
bastla