VitAlll2013
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
А какая вообще функция меняет один текст на другой, но не StringRegExpReplace , так как она меняет, вроде, только тескт одной строки? По крайней мере у меня не получается заменить с помощью ней несколько строк.
Вот
Код: Global $file, $sOldText, $sNewText, $sBeginString, $sEndString, $sNewString
$file = FileOpen("D:\test.txt", 2)
FileWrite ($file, "1" & @CRLF & "2" & @CRLF & "3" & @CRLF & "4"& @CRLF & "5")
FileClose($file)
$sOldText = FileRead("D:\test.txt")
MsgBox(0, "Сейчас внутри файла:", $sOldText)
$sBeginString = "2"
$sEndString = "4"
$sNewString = "два-три-четыре"
$sNewText=StringRegExpReplace($sOldText,"(" & $sBeginString & ").*(" & $sEndString & ")","\1" & $sNewString & "\2")
MsgBox(0, "Результат:", $sNewText) |
Не заменяет. |
Всего записей: 33 | Зарегистр. 31-08-2008 | Отправлено: 13:45 24-09-2009 | Исправлено: VitAlll2013, 14:02 24-09-2009 |
|
