5
VBS - Zeile ersetzen
Hallo Ihr Lieben,
ich suche nach einer Möglichkeit die eine bestimmt Zeile sucht und diese vollständig ersetzt.
Suche nach
-H HUEL-SERVER (hinter -H kann auch was anderes stehen, also muss nur nach einer Zeile -H am Anfang gesucht werden)
Ersetzen durch
H- neuer Server
DANKE DANKE DANKE
VG, Marc
ich suche nach einer Möglichkeit die eine bestimmt Zeile sucht und diese vollständig ersetzt.
Suche nach
-H HUEL-SERVER (hinter -H kann auch was anderes stehen, also muss nur nach einer Zeile -H am Anfang gesucht werden)
Ersetzen durch
H- neuer Server
DANKE DANKE DANKE
VG, Marc
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 104094
Url: https://administrator.de/contentid/104094
Ausgedruckt am: 19.11.2024 um 07:11 Uhr
5 Kommentare
Neuester Kommentar
Moin Moin
Gruß L.
ich suche nach einer Möglichkeit die eine bestimmt Zeile sucht und diese vollständig ersetzt.
Zeile won was? Textdatei, Excel, ...Gruß L.
sorry, die Zeile soll in einer Textdatei ersetzt werden
Moin
DAs solte in etwa sein was du suchst (ungetestet).
Gruß L.
DAs solte in etwa sein was du suchst (ungetestet).
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objSourceFile = objFSO.OpenTextFile("C:\Source.txt", 1)
Set objDestFile = objFSO.CreateTextFile("C:\Dest.txt", True)
Do Until objSourceFile.AtEndOfStream
szNextLine = objSourceFile.Readline
If Instr(szNextLine,"-H ")=1 Then
szNextLine = "H- neuer Server"
end if
objDestFile.writeline szNextLine
LoopGruß L.
Vielen Dank erstmal!!!
Ich möchte die Zeile in der gleichen Datei ersetzen und keine neue Zeile in einer anderen Datei hinzufügen.
Vielleicht hat jemand noch eine Idee?
Ich möchte die Zeile in der gleichen Datei ersetzen und keine neue Zeile in einer anderen Datei hinzufügen.
Vielleicht hat jemand noch eine Idee?
Moin Moin
Wenn Du die zeile in der gleichen Datei ersetzen willst (was schon ginge) dann müstet Du nach jedem ersetzen diese Speicher und erneut öffnen.
Sinniger ist es die "alte Datei auszulesen, Zeilen zu ersetzen und diese in die "neue zu schreiben. Danach die alte löschen und die neue unbenennen.
Da hängst du einfach hinten noch ein...
ran.
Gruß L.
Wenn Du die zeile in der gleichen Datei ersetzen willst (was schon ginge) dann müstet Du nach jedem ersetzen diese Speicher und erneut öffnen.
Sinniger ist es die "alte Datei auszulesen, Zeilen zu ersetzen und diese in die "neue zu schreiben. Danach die alte löschen und die neue unbenennen.
Da hängst du einfach hinten noch ein...
...
objFSO.DeleteFile "C:\Source.txt", True
objFSO.MoveFile "C:\Dest.txt", "C:\Source.txt" Gruß L.
