Hey Leute,
ich möchte gerne alles, was nach dem Buchstaben x steht gelöscht werden soll.
Txtdatei Beispiel:
Heyhoxdassollweg
hoheyxdassollauchweg
hahoheyxdasebenfalls
Wie stell ich das an?
[TXT]Alles nach Buchstaben x löschen
-
- [ offen ]
-
Desaster -
4. Juni 2010 um 01:24 -
Geschlossen -
Erledigt
-
-
Das müsste funktionieren.
[autoit]StringMid($sString, 1, StringInstr($sString, "x") - 1)
[/autoit] -
Wenn du das in der Txtdatei löschen willst:
Spoiler anzeigen
[autoit]
[/autoit]
$file = fileopen("txtname.txt", 0)
$text = fileread($file)
fileclose($file)
$newtext = StringMid($text, 1, StringInstr($text, "x") - 1)
$file = fileopen("txtname.txt", 2)
filewrite($file, $newtext)
fileclose($file) -
Wenn das ganze Zeile für Zeile ersetzt werden soll, dann so:
Spoiler anzeigen
[autoit]Local $sFile = @ScriptDir & "\test.txt", $sZeichen = "x"
[/autoit] [autoit][/autoit] [autoit][/autoit]
Local $sRepl = StringRegExpReplace(FileRead($sFile),"(?m)(^[^"&$sZeichen&"]+).+$","\1")
FileDelete($sFile)
FileWrite($sFile,$sRepl) -
hi
bevor ich jetzt n neues Thema öffne frage ich hier ma lieber nach .
also ich suche ein Programm,Skript was etwas aus einer txt Datei sucht und dann ersetzt durch etwas was ich ihm sage .
also z.b ich suche C:Musik und das Skript sucht .. findet x:Musik und ersetzt es durch C:Musik -
Ähm StringReplace?
-
name22 ich suche nach einem bereits vollständigen Skript
befohr ich ein selber skripte frage ich halt erstmal 